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

18
Copybook/DTSIL131.cpy Normal file
View File

@ -0,0 +1,18 @@
00001 ***** 07/27/98
00002 * DTSIL131
00003 * MACIL131 JOB SERVICE CODE AND AREA CODE / LV001
00004 * JOB SERVICE OFFICE MODULE LINKAGE. DTSIL131
00005 * DTSIL131
00006 ***** DTSIL131
00007 SKIP1 DTSIL131
00008 10 L131-LENGTH PIC S9(04) COMP VALUE +32. DTSIL131
00009 SKIP1 DTSIL131
00010 10 L131-JS-ZIP PIC X(10). DTSIL131
00011 10 L131-AREA-CD PIC S9(03) COMP-3. DTSIL131
00012 SKIP1 DTSIL131
00013 10 L131-RESULT-IND PIC X(01). DTSIL131
00014 88 L131-OK VALUE '1'. DTSIL131
00015 SKIP1 DTSIL131
00016 10 L131-JS-OFFICE-ID PIC S9(03) COMP-3. DTSIL131
00017 SKIP1 DTSIL131
00018 10 FILLER PIC X(15). DTSIL131