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

25
Copybook/DTSIR522.cpy Normal file
View File

@ -0,0 +1,25 @@
00001 ***** 04/21/99
00002 * DTSIR522
00003 * DTSIR522 DETERMINATION OF NON CLASSIFED (NEW) EMPOYER LV007
00004 * RATE REPORT RECORD. CL**6
00005 * CL**6
00006 * CL**6
00007 * 04/21/1999 CREATED FOR DC. EHH CL**6
00008 * CL**6
00009 ***** DTSIR522
00010 CL**2
00011 10 R522-LENGTH PIC S9(04) COMP. CL**6
00012 CL**2
00013 10 R522-SORT-AREA. CL**6
00014 15 R522-REC-TYPE PIC X(03). CL**6
00015 CL**2
00016 10 R522-DATA-AREA. CL**6
00017 15 R522-RTE-YR-EFF-QTR PIC S9(05) COMP-3. CL**6
00018 15 R522-PRIOR-RTE-YR-EFF-QTR CL**6
00019 PIC S9(05) COMP-3. CL**6
00020 15 R522-PRIOR-RTE-YR-EMP-CNT CL**6
00021 PIC S9(07) COMP-3. CL**7
00022 15 R522-SUM-OF-PRIOR-RTE-YR-RATES CL**6
00023 PIC S9(07)V9(04) COMP-3. CL**6
00024 15 R522-DEFAULT-NEW-EMP-RATE CL**6
00025 PIC S9(01)V9(04) COMP-3. CL**6