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

67
Copybook/DTSIMAUY.cpy Normal file
View File

@ -0,0 +1,67 @@
00001 ***** 08/28/98
00002 * DTSIMAUY
00003 * MACIMAUY MASTER FILE 'CALENDAR YEAR AUDIT RESULTS' LV002
00004 * RECORD DEFINITION. DTSIMAUY
00005 * DTSIMAUY
00006 * NOTE: L810-COUNT-88 RETURNS THE NUMBER OF RECORDS FOR THE DTSIMAUY
00007 * SINGLE MAUY-ASSIGN-NO PROVIDED. DTSIMAUY
00008 * DTSIMAUY
00009 * CL**2
00010 * 08/28/1998 REVIEWED AND MODIFIED FOR DC. EHH CL**2
00011 * CL**2
00012 ***** DTSIMAUY
00013 CL**2
00014 10 MAUY-KEY-AREA. DTSIMAUY
00015 15 MAUY-EMP-NO PIC S9(07) COMP-3. DTSIMAUY
00016 15 MAUY-REC-TYPE PIC S9(04) COMP. DTSIMAUY
00017 88 MAUY-AUY-88 VALUE +28. DTSIMAUY
00018 15 MAUY-ASSIGN-NO PIC S9(09) COMP-3. DTSIMAUY
00019 15 MAUY-CALENDAR-YEAR PIC 9(04). DTSIMAUY
00020 15 MAUY-KEY-FILLER PIC X(01). DTSIMAUY
00021 CL**2
00022 CL**2
00023 10 MAUY-PURGE-DATE PIC S9(09) COMP-3. DTSIMAUY
00024 CL**2
00025 CL**2
00026 10 MAUY-DATA-AREA. DTSIMAUY
00027 15 MAUY-YR. DTSIMAUY
00028 20 MAUY-QTR OCCURS 4 DTSIMAUY
00029 INDEXED BY MAUY-QTR-IDX. DTSIMAUY
00030 25 MAUY-QTR-AUDITED-IND DTSIMAUY
00031 PIC X(01). DTSIMAUY
00032 88 MAUY-QTR-AUDITED-88 VALUE 'Y'. DTSIMAUY
00033 88 MAUY-QTR-NOT-AUDITED-88 VALUE 'N'. DTSIMAUY
00034 CL**2
00035 25 MAUY-QTR-GROSS-PAYROLL DTSIMAUY
00036 PIC S9(11)V9(02) COMP-3. DTSIMAUY
00037 CL**2
00038 25 MAUY-QTR-UNDER-TOT-WAGE DTSIMAUY
00039 PIC S9(11)V9(02) COMP-3. DTSIMAUY
00040 CL**2
00041 25 MAUY-QTR-UNDER-TAX-WAGE DTSIMAUY
00042 PIC S9(11)V9(02) COMP-3. DTSIMAUY
00043 CL**2
00044 25 MAUY-QTR-UNDER-CONTRIB DTSIMAUY
00045 PIC S9(09)V9(02) COMP-3. DTSIMAUY
00046 CL**2
00047 25 MAUY-QTR-OVER-TOT-WAGE DTSIMAUY
00048 PIC S9(11)V9(02) COMP-3. DTSIMAUY
00049 CL**2
00050 25 MAUY-QTR-OVER-TAX-WAGE DTSIMAUY
00051 PIC S9(11)V9(02) COMP-3. DTSIMAUY
00052 CL**2
00053 25 MAUY-QTR-OVER-CONTRIB DTSIMAUY
00054 PIC S9(09)V9(02) COMP-3. DTSIMAUY
00055 CL**2
00056 CL**2
00057 15 FILLER PIC X(48). DTSIMAUY
00058 CL**2
00059 CL**2
00060 15 MAUY-CONVERTED-IND PIC X(01). DTSIMAUY
00061 88 MAUY-CONVERTED-88 VALUE 'Y'. DTSIMAUY
00062 88 MAUY-NOT-CONVERTED-88 VALUE 'N'. DTSIMAUY
00063 CL**2
00064 CL**2
00065 15 MAUY-ESTB-DATE PIC S9(09) COMP-3. DTSIMAUY
00066 CL**2
00067 15 MAUY-CHNG-DATE PIC S9(09) COMP-3. DTSIMAUY