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

39
Copybook/DTSIY779.cpy Normal file
View File

@ -0,0 +1,39 @@
00001 ***** 08/28/20
00002 * DTSIY779
00003 * DTSIY779 ETA581 MISCELLANEOUS DATA LV004
00004 * DTSIY779
00005 * DTSBE770 EXTRACTS DATA FOR ITEMS 12 AND 13 OF THE ETA581 DTSIY779
00006 * REPORT. THE RECORDS ARE PASSED TO DTSBX770, WHICH UPDATES DTSIY779
00007 * THE REFERENCE FILE ETA581 RECORD. DTSIY779
00008 * DTSIY779
00009 * 10/02/2010 ADDED WAGE ITEM COUNT GD DTSIY779
00010 * 01/13/2011 ADDED ANNUAL REPORT COUNT GD DTSIY779
00011 * 02/11/2011 REMOVED ANNUAL REPORT COUNT - DTSIY779
00012 * AFTER CHANGES TO DTSBE770, IT IS DTSIY779
00013 * NO LONGER NEEDED. GD DTSIY779
00014 * 04/15/2013 ITEMS 12 AND 13 NO LONGER USED, BUT THE DTSIY779
00015 * DATA FIELDS ON THE F581 WILL BE RETAINED. DTSIY779
00016 * THREE SUTA DUMPING NUMBERS HAVE BEEN DTSIY779
00017 * ADDED TO THE RECORD. GD DTSIY779
00018 * CL**2
00019 * 08/28/2020 ITEMS 63, 64 AND 65 ADDED FOR TAX AVOIDANCE CL**2
00020 * DATA PER DOL UPIL 12-20. NH CL**2
00021 * CL**2
00022 * CL**2
00023 ***** DTSIY779
00024 10 Y779-LENGTH PIC S9(04) COMP. DTSIY779
00025 DTSIY779
00026 10 Y779-SORT-AREA. DTSIY779
00027 15 Y779-REC-TYPE PIC X(03). DTSIY779
00028 88 Y779-REC-TYPE-779-88 VALUE '779'. DTSIY779
00029 DTSIY779
00030 10 Y779-DATA-AREA. DTSIY779
00031 15 Y779-OUTSTANDING-QTR-CNT PIC S9(07) COMP-3. DTSIY779
00032 15 Y779-OUTSTANDING-BAL PIC S9(11)V99 COMP-3. DTSIY779
00033 15 Y779-WAGE-ITEM-CNT PIC S9(09) COMP-3. DTSIY779
00034 15 Y779-MANDATORY-XFER-CNT PIC S9(07) COMP-3. DTSIY779
00035 15 Y779-PROHIBITED-XFER-CNT PIC S9(07) COMP-3. DTSIY779
00036 15 Y779-SUTA-CONTRIB-DUE PIC S9(11) COMP-3. DTSIY779
00037 15 Y779-TAXAVD-MAN-XFER-CNT PIC S9(07) COMP-3. CL**3
00038 15 Y779-TAXAVD-PROH-XFER-CNT PIC S9(07) COMP-3. CL**3
00039 15 Y779-TAXAVD-CONTRIB-DUE PIC S9(11) COMP-3. CL**3