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

34
Copybook/DTSIAATH.cpy Normal file
View File

@ -0,0 +1,34 @@
00001 ***** 12/30/09
00002 * DTSIAATH
00003 * DTSIAATH ACCOUNTING TRANSACTION HISTORY FILE RECORD LV001
00004 * DEFINITION. DTSIAATH
00005 * DTSIAATH
00006 * 12/11/2009 INITIAL DEVELOPMENT GD DTSIAATH
00007 * DTSIAATH
00008 ***** DTSIAATH
00009 DTSIAATH
00010 10 AATH-KEY-AREA. DTSIAATH
00011 15 AATH-DOC-NO. DTSIAATH
00012 20 AATH-BATCH-NO PIC S9(05) COMP-3. DTSIAATH
00013 20 AATH-ITEM-NO PIC S9(03) COMP-3. DTSIAATH
00014 DTSIAATH
00015 10 AATH-DATA-AREA. DTSIAATH
00016 15 AATH-REC-TYPE PIC X(01). DTSIAATH
00017 88 AATH-ADJ-88 VALUE 'A'. DTSIAATH
00018 88 AATH-HDR-88 VALUE 'H'. DTSIAATH
00019 88 AATH-PAY-88 VALUE 'P'. DTSIAATH
00020 88 AATH-RPT-88 VALUE 'R'. DTSIAATH
00021 88 AATH-ATX-88 VALUE 'T'. DTSIAATH
00022 DTSIAATH
00023 15 AATH-DATA-FILLER PIC X(122). DTSIAATH
00024 DTSIAATH
00025 10 AATH-AUDIT-AREA. DTSIAATH
00026 15 AATH-ACTION PIC X(01). DTSIAATH
00027 88 AATH-ACTION-ADD-88 VALUE 'A'. DTSIAATH
00028 88 AATH-ACTION-UPD-88 VALUE 'U'. DTSIAATH
00029 88 AATH-ACTION-DEL-88 VALUE 'D'. DTSIAATH
00030 15 AATH-OP-ID PIC X(08). DTSIAATH
00031 15 AATH-DATE PIC S9(09) COMP-3. DTSIAATH
00032 15 AATH-TIME PIC S9(07) COMP-3. DTSIAATH
00033 DTSIAATH
00034 10 AATH-FILLER PIC X(110). DTSIAATH