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

89
Copybook/DTSIAADJ.cpy Normal file
View File

@ -0,0 +1,89 @@
00001 ***** 05/20/13
00002 * DTSIAADJ
00003 * DTSIAADJ ACCOUNTING TRANSACTION FILE 'ADJUSTMENT' LV011
00004 * TRANSACTION RECORD DEFINITION. DTSIAADJ
00005 * DTSIAADJ
00006 * DTSIAADJ
00007 * 09/29/1998 REVIEWED AND MODIFIED FOR DC. EHH DTSIAADJ
00008 * 04/22/2004 ADDED AADJ-CMP-ESTB-ABSTIME, WHICH DTSIAADJ
00009 * LINKS THE ADJUSTMENT TRANSACTION TO DTSIAADJ
00010 * A COMPROMISE SETTLEMENT (MCMP) REC. GD DTSIAADJ
00011 * 08/14/2012 ADDED AADJ-FILING-SCHED-88. GD DTSIAADJ
00012 * DTSIAADJ
00013 ***** DTSIAADJ
00014 DTSIAADJ
00015 10 AADJ-KEY-AREA. DTSIAADJ
00016 15 AADJ-DOC-NO. DTSIAADJ
00017 20 AADJ-BATCH-NO PIC S9(05) COMP-3. DTSIAADJ
00018 20 AADJ-ITEM-NO PIC S9(03) COMP-3. DTSIAADJ
00019 DTSIAADJ
00020 10 AADJ-DATA-AREA. DTSIAADJ
00021 15 AADJ-REC-TYPE PIC X(01). DTSIAADJ
00022 88 AADJ-ADJ-88 VALUE 'A'. DTSIAADJ
00023 DTSIAADJ
00024 DTSIAADJ
00025 15 AADJ-NAME-CHECK PIC X(04). DTSIAADJ
00026 DTSIAADJ
00027 15 AADJ-EMP-NO PIC S9(07) COMP-3. DTSIAADJ
00028 DTSIAADJ
00029 15 AADJ-ADJ-TYPE PIC X(02). DTSIAADJ
00030 88 AADJ-CHARGE-88 VALUE 'CH'. DTSIAADJ
00031 88 AADJ-WAIVE-88 VALUE 'WV'. DTSIAADJ
00032 88 AADJ-TOLER-88 VALUE 'TL'. DTSIAADJ
00033 88 AADJ-AUTO-88 VALUE 'CA'. DTSIAADJ
00034 88 AADJ-MANUAL-88 VALUE 'CM'. DTSIAADJ
00035 88 AADJ-WAGE-RPT-88 VALUE 'WG'. DTSIAADJ
00036 88 AADJ-DUE-DATE-88 VALUE 'QD'. DTSIAADJ
00037 88 AADJ-WAIVE-DATE-88 VALUE 'WD'. DTSIAADJ
00038 88 AADJ-INT-DATE-88 VALUE 'ID'. DTSIAADJ
00039 88 AADJ-WRITE-OFF-88 VALUE 'WO'. DTSIAADJ
00040 88 AADJ-WRITE-OFF-REV-88 VALUE 'WR'. DTSIAADJ
00041 88 AADJ-FILING-SCHED-88 VALUE 'FS'. DTSIAADJ
00042 DTSIAADJ
00043 15 AADJ-AMT PIC S9(09)V9(02) COMP-3. DTSIAADJ
00044 DTSIAADJ
00045 15 AADJ-RECEIVED-DATE PIC S9(09) COMP-3. DTSIAADJ
00046 DTSIAADJ
00047 15 AADJ-DEPOSIT-DATE PIC S9(09) COMP-3. DTSIAADJ
00048 DTSIAADJ
00049 15 AADJ-APPLIC-YRQ PIC S9(05) COMP-3. DTSIAADJ
00050 DTSIAADJ
00051 15 AADJ-APPLIC-IND PIC X(02). DTSIAADJ
00052 88 AADJ-UI-88 VALUE 'UI'. DTSIAADJ
00053 88 AADJ-SUR-88 VALUE 'SU'. DTSIAADJ
00054 88 AADJ-INT-88 VALUE 'I '. DTSIAADJ
00055 88 AADJ-LATE-PEN-88 VALUE 'LP'. DTSIAADJ
00056 88 AADJ-NSF-PEN-88 VALUE 'NP'. DTSIAADJ
00057 88 AADJ-MISC-PEN-88 VALUE 'MP'. DTSIAADJ
00058 88 AADJ-CREDIT-88 VALUE 'CR'. DTSIAADJ
00059 88 AADJ-LP-INT-88 VALUE 'PI'. DTSIAADJ
00060 DTSIAADJ
00061 15 AADJ-APPLIC-DOC-NO. DTSIAADJ
00062 20 AADJ-APPLIC-BATCH-NO DTSIAADJ
00063 PIC S9(05) COMP-3. DTSIAADJ
00064 20 AADJ-APPLIC-ITEM-NO PIC S9(03) COMP-3. DTSIAADJ
00065 DTSIAADJ
00066 15 AADJ-DATE-1 PIC S9(09) COMP-3. DTSIAADJ
00067 DTSIAADJ
00068 15 AADJ-DATE-2 PIC S9(09) COMP-3. DTSIAADJ
00069 DTSIAADJ
00070 15 AADJ-INT-SPAN-IND PIC X(01). DTSIAADJ
00071 88 AADJ-INT-SPAN-1-88 VALUE '1'. DTSIAADJ
00072 88 AADJ-INT-SPAN-2-88 VALUE '2'. DTSIAADJ
00073 DTSIAADJ
00074 15 AADJ-INT-RATE PIC S9(01)V9(04) COMP-3. DTSIAADJ
00075 DTSIAADJ
00076 15 AADJ-DISREGARD-EDITS-IND DTSIAADJ
00077 PIC X(01). DTSIAADJ
00078 DTSIAADJ
00079 15 AADJ-RESPONSIBLE-ACTIVITY DTSIAADJ
00080 PIC X(03). DTSIAADJ
00081 DTSIAADJ
00082 15 AADJ-RESPONSIBLE-OP-ID PIC X(08). DTSIAADJ
00083 DTSIAADJ
00084 15 AADJ-CMP-ESTB-ABSTIME PIC S9(15) COMP-3. DTSIAADJ
00085 DTSIAADJ
00086 15 FILLER PIC X(19). DTSIAADJ
00087 DTSIAADJ
00088 15 AADJ-PROCESSED-DATE PIC S9(09) COMP-3. DTSIAADJ
00089 88 AADJ-NOT-PROCESSED-88 VALUE ZERO. DTSIAADJ