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

35
Copybook/DTSIALEN.cpy Normal file
View File

@ -0,0 +1,35 @@
00001 ***** 06/29/02
00002 * DTSIALEN
00003 * DTSIALEN ACCOUNTING TRANSACTION FILE RECORD LENGTHS. LV005
00004 * DTSIALEN
00005 * DTSIALEN
00006 * 09/29/1998 REVIEWED AND MODIFIED FOR DC. EHH DTSIALEN
00007 * DTSIALEN
00008 ***** DTSIALEN
00009 DTSIALEN
00010 10 ALEN-LENGTHS. DTSIALEN
00011 15 ALEN-ADJ-LENGTH PIC S9(04) COMP VALUE +100. DTSIALEN
00012 DTSIALEN
00013 15 ALEN-HDR-LENGTH PIC S9(04) COMP VALUE +96. DTSIALEN
00014 DTSIALEN
00015 15 ALEN-PAY-LENGTH PIC S9(04) COMP VALUE +96. DTSIALEN
00016 DTSIALEN
00017 15 ALEN-RPT-LENGTH PIC S9(04) COMP VALUE +128. DTSIALEN
00018 DTSIALEN
00019 15 ALEN-ATX-LENGTH PIC S9(04) COMP VALUE +128. DTSIALEN
00020 DTSIALEN
00021 DTSIALEN
00022 15 ALEN-MAX-LENGTH PIC S9(04) COMP VALUE +128. DTSIALEN
00023 DTSIALEN
00024 15 ALEN-KEY-LENGTH PIC S9(04) COMP VALUE +5. DTSIALEN
00025 DTSIALEN
00026 DTSIALEN
00027 15 ALEN-ADJ-PREFIX PIC X(04) VALUE 'AADJ'. DTSIALEN
00028 DTSIALEN
00029 15 ALEN-HDR-PREFIX PIC X(04) VALUE 'AHDR'. DTSIALEN
00030 DTSIALEN
00031 15 ALEN-PAY-PREFIX PIC X(04) VALUE 'APAY'. DTSIALEN
00032 DTSIALEN
00033 15 ALEN-RPT-PREFIX PIC X(04) VALUE 'ARPT'. DTSIALEN
00034 DTSIALEN
00035 15 ALEN-ATX-PREFIX PIC X(04) VALUE 'AATX'. DTSIALEN