DUTAS re-platformed to Raincode - Initial Source Code

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

19
Copybook/DTSIR432.cpy Normal file
View File

@ -0,0 +1,19 @@
00001 ***** 02/05/99
00002 * D.SHEPPERSON MODIFIED 02/05/99 DTSIR432
00003 * LV004
00004 * DTSIR432 ACCOUNTS RECEIVABLE AUDIT TRAIL REPORT RECORD. CL**3
00005 * DTSIR432
00006 ***** DTSIR432
00007 SKIP1 DTSIR432
00008 10 R432-LENGTH PIC S9(04) COMP. CL**2
00009 SKIP1 DTSIR432
00010 10 R432-SORT-AREA. DTSIR432
00011 15 R432-REC-TYPE PIC X(03) VALUE '432'. DTSIR432
00012 15 R432-DOC-NO. CL**2
00013 20 R432-BATCH-NO PIC S9(05) COMP-3. CL**4
00014 20 R432-ITEM-NO PIC S9(03) COMP-3. CL**4
00015 15 R432-EMP-NO PIC S9(07) COMP-3. DTSIR432
00016 15 R432-YRQ PIC S9(05) COMP-3. DTSIR432
00017 SKIP1 DTSIR432
00018 10 R432-DATA-AREA. DTSIR432
00019 15 R432-RPT-TYPE PIC X(02). DTSIR432