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

36
Copybook/DTSIISKL.cpy Normal file
View File

@ -0,0 +1,36 @@
00001 ***** 07/01/08
00002 * DTSIISKL
00003 * DTSIISKL ALTERNATE INDEX FILE SKELETAL RECORD DEFINITON. LV009
00004 * DTSIISKL
00005 * 08/13/1998 REVIEWED AND MODIFIED FOR DC. EHH DTSIISKL
00006 * 01/20/2001 MODIFIED FOR ELECTRONIC MEDIA DTSIISKL
00007 * TRACKING. GD DTSIISKL
00008 * 02/08/2008 ADDED IRFD FOR REFUNDS GD DTSIISKL
00009 * DTSIISKL
00010 ***** DTSIISKL
00011 DTSIISKL
00012 10 ISKL-KEY-AREA. DTSIISKL
00013 15 ISKL-REC-TYPE PIC S9(04) COMP. DTSIISKL
00014 88 ISKL-BTB-88 VALUE +01. DTSIISKL
00015 88 ISKL-EIN-88 VALUE +02. DTSIISKL
00016 88 ISKL-FAN-88 VALUE +03. DTSIISKL
00017 88 ISKL-FID-88 VALUE +04. DTSIISKL
00018 88 ISKL-OPN-88 VALUE +05. DTSIISKL
00019 88 ISKL-OPS-88 VALUE +06. DTSIISKL
00020 88 ISKL-PES-88 VALUE +07. DTSIISKL
00021 88 ISKL-TDS-88 VALUE +08. DTSIISKL
00022 88 ISKL-ZIP-88 VALUE +09. DTSIISKL
00023 88 ISKL-BTN-88 VALUE +10. DTSIISKL
00024 88 ISKL-ENM-88 VALUE +11. DTSIISKL
00025 88 ISKL-EAL-88 VALUE +12. DTSIISKL
00026 88 ISKL-EAE-88 VALUE +13. DTSIISKL
00027 88 ISKL-EBX-88 VALUE +14. DTSIISKL
00028 88 ISKL-EOP-88 VALUE +15. DTSIISKL
00029 88 ISKL-ESR-88 VALUE +16. DTSIISKL
00030 88 ISKL-EER-88 VALUE +17. DTSIISKL
00031 88 ISKL-EET-88 VALUE +18. DTSIISKL
00032 88 ISKL-EPR-88 VALUE +19. DTSIISKL
00033 88 ISKL-TRT-88 VALUE +20. DTSIISKL
00034 88 ISKL-TRE-88 VALUE +21. DTSIISKL
00035 88 ISKL-RFD-88 VALUE +22. DTSIISKL
00036 15 ISKL-KEY-FILLER PIC X(62). DTSIISKL