DUTAS re-platformed to Raincode - Initial Source Code
This commit is contained in:
12
Copybook/DTSIX461.cpy
Normal file
12
Copybook/DTSIX461.cpy
Normal file
@ -0,0 +1,12 @@
|
||||
00001 ***** 04/15/08
|
||||
00002 * DTSIX461
|
||||
00003 * DTSIX461 HEADER RECORD FOR DAILY "CLEAN HANDS" EXTRACT. LV006
|
||||
00004 * DTSIX461
|
||||
00005 * DTSIX461
|
||||
00006 ***** DTSIX461
|
||||
00007 DTSIX461
|
||||
00008 15 X461-HEADER-TITLE PIC X(07) CL**3
|
||||
00009 VALUE 'HEADER='. CL**5
|
||||
00010 15 X461-HEADER-CNT PIC 9(07). CL**3
|
||||
00011 15 FILLER PIC X(372) CL**6
|
||||
00012 VALUE SPACES. CL**4
|
||||
Reference in New Issue
Block a user