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/DTSIL422.cpy Normal file
View File

@ -0,0 +1,35 @@
00001 ***** 02/26/04
00002 * DTSIL422
00003 * DTSIL422 FIND CURRENT EMPLOYEES AND WAGES LV003
00004 * FOR A GIVEN EMPLOYER DTSIL422
00005 * DTSIL422
00006 * *** ANNUAL VERSION *** DTSIL422
00007 * DTSIL422
00008 * DTSIL422
00009 * 02/18/2002 INITIAL DEVELOPMENT. GD DTSIL422
00010 * DTSIL422
00011 * DTSIL422
00012 ***** DTSIL422
00013 DTSIL422
00014 10 L422-INPUT-AREA. DTSIL422
00015 15 L422-RPT-TYPE PIC X(01). DTSIL422
00016 88 L422-RPT-TYPE-ORIG-88 VALUE '0'. DTSIL422
00017 88 L422-RPT-TYPE-SUPPL-88 VALUE '1'. DTSIL422
00018 88 L422-RPT-TYPE-WD-88 VALUE '2'. DTSIL422
00019 15 L422-EMP-NO PIC S9(07) COMP-3. DTSIL422
00020 15 L422-QTR1 PIC S9(05) COMP-3. DTSIL422
00021 15 L422-QTR2 PIC S9(05) COMP-3. DTSIL422
00022 15 L422-QTR3 PIC S9(05) COMP-3. DTSIL422
00023 15 L422-QTR4 PIC S9(05) COMP-3. DTSIL422
00024 15 L422-TS-NAME-PREFIX PIC X(07). DTSIL422
00025 DTSIL422
00026 DTSIL422
00027 10 L422-RETURN-AREA. DTSIL422
00028 15 L422-WAGE-TBL-CNT PIC S9(04) COMP. DTSIL422
00029 15 L422-TS-CNT PIC S9(04) COMP. DTSIL422
00030 15 L422-LAST-DUMMY-SSN PIC S9(09) COMP-3. DTSIL422
00031 15 L422-ERR-IND PIC X(02). DTSIL422
00032 88 L422-ERR-NO-88 VALUE '00'. DTSIL422
00033 88 L422-ERR-OVER-250-88 VALUE '01'. DTSIL422
00034 DTSIL422
00035 10 FILLER PIC X(28). DTSIL422