giteaadmin/DUTAS
4
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

DUTAS re-platformed to Raincode - Initial Source Code

Browse Source
This commit is contained in:
Neeraj Kumar
2025-07-21 07:44:09 -04:00
commit ca3572c5df
2773 changed files with 798221 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

29
Copybook/DTSIR906.cpy Normal file
View File

@ -0,0 +1,29 @@
00001 ***** 04/03/20
00002 * REVIEWED BY D. SHEPPERSON 10/23/1998 DTSIR906
00003 * LV001
00004 * DTSIR906 ON-LINE UPDATE LOG REPORT RECORD. DTSIR906
00005 * DTSIR906
00006 * ADDED BATCH AND ITEM NUMBERS TO TRACK DTSIR906
00007 * UPDATES TO ACCOUNTING TRANSACTIONS. 9/15/2006 GDTSIR906
00008 * DTSIR906
00009 ***** DTSIR906
00010 DTSIR906
00011 10 R906-LENGTH PIC S9(04) COMP. DTSIR906
00012 DTSIR906
00013 10 R906-SORT-AREA. DTSIR906
00014 15 R906-REC-TYPE PIC X(03) VALUE '906'. DTSIR906
00015 15 R906-OP-ID PIC X(08). DTSIR906
00016 15 R906-EMP-NO PIC S9(07) COMP-3. DTSIR906
00017 15 R906-TASK-START-DATE PIC S9(09) COMP-3. DTSIR906
00018 15 R906-TASK-START-TIME PIC S9(07) COMP-3. DTSIR906
00019 DTSIR906
00020 10 R906-DATA-AREA. DTSIR906
00021 15 R906-TASK-ID PIC S9(08) COMP. DTSIR906
00022 15 R906-TERM-ID PIC X(04). DTSIR906
00023 15 R906-NETNAME PIC X(08). DTSIR906
00024 15 R906-SCR-ID PIC X(02). DTSIR906
00025 15 R906-FUNCTION PIC X(01). DTSIR906
00026 15 R906-BATCH-NO PIC S9(05) COMP-3. DTSIR906
00027 15 R906-ITEM-NO PIC S9(03) COMP-3. DTSIR906
00028 DTSIR906
00029 10 R906-PADDING-FOR-SYNCSORT PIC X(30). DTSIR906