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

74
Copybook/DTSIMRCT.cpy Normal file
View File

@ -0,0 +1,74 @@
00001 ***** 11/11/02
00002 * DTSIMRCT
00003 * DTSIMRCT MASTER FILE 'RATE CUTOFF' RECORD DEFINITION. LV004
00004 * DTSIMRCT
00005 * DTSIMRCT
00006 * 08/31/1998 REVIEWED AND MODIFIED FOR DC. EHH DTSIMRCT
00007 * 07/05/2002 ADDED MRCT-ESTIM-WAGE-IND GD DTSIMRCT
00008 * DTSIMRCT
00009 ***** DTSIMRCT
00010 DTSIMRCT
00011 10 MRCT-KEY-AREA. DTSIMRCT
00012 15 MRCT-EMP-NO PIC S9(07) COMP-3. DTSIMRCT
00013 15 MRCT-REC-TYPE PIC S9(04) COMP. DTSIMRCT
00014 88 MRCT-RCT-88 VALUE +09. DTSIMRCT
00015 15 MRCT-EFF-YRQ PIC S9(05) COMP-3. DTSIMRCT
00016 15 MRCT-KEY-FILLER PIC X(07). DTSIMRCT
00017 DTSIMRCT
00018 DTSIMRCT
00019 10 MRCT-PURGE-DATE PIC S9(09) COMP-3. DTSIMRCT
00020 DTSIMRCT
00021 DTSIMRCT
00022 10 MRCT-DATA-AREA. DTSIMRCT
00023 15 MRCT-ACTIVE-IND PIC X(01). DTSIMRCT
00024 88 MRCT-EMP-ACTIVE-YES-88 VALUE 'Y'. DTSIMRCT
00025 88 MRCT-EMP-ACTIVE-NO-88 VALUE 'N'. DTSIMRCT
00026 DTSIMRCT
00027 15 MRCT-PRIOR-RESERVE-AMT PIC S9(09)V9(02) COMP-3.DTSIMRCT
00028 DTSIMRCT
00029 15 MRCT-UI-TAX-PAID-AMT PIC S9(09)V9(02) COMP-3.DTSIMRCT
00030 DTSIMRCT
00031 15 MRCT-TRUST-FUND-INTEREST-AMT DTSIMRCT
00032 PIC S9(09)V9(02) COMP-3.DTSIMRCT
00033 DTSIMRCT
00034 15 MRCT-BENEFITS-CHARGED-AMT DTSIMRCT
00035 PIC S9(09)V9(02) COMP-3.DTSIMRCT
00036 DTSIMRCT
00037 15 MRCT-WAGES-AREA DTSIMRCT
00038 OCCURS 3 TIMES DTSIMRCT
00039 INDEXED BY MRCT-WAGES-IDX. DTSIMRCT
00040 20 MRCT-TOT-WAGE PIC S9(11)V9(02) COMP-3.DTSIMRCT
00041 20 MRCT-TAX-WAGE PIC S9(11)V9(02) COMP-3.DTSIMRCT
00042 DTSIMRCT
00043 15 MRCT-EARLIEST-LIAB-DATE PIC S9(09) COMP-3.DTSIMRCT
00044 DTSIMRCT
00045 15 MRCT-MISS-RPT-CNT PIC S9(03) COMP-3.DTSIMRCT
00046 DTSIMRCT
00047 15 MRCT-TOT-UI-TAX-BALANCE-AMT DTSIMRCT
00048 PIC S9(09)V9(02) COMP-3.DTSIMRCT
00049 DTSIMRCT
00050 15 MRCT-PRED-DUE-IND PIC X(01). DTSIMRCT
00051 88 MRCT-PRED-DUE-NO-88 VALUE 'N'. DTSIMRCT
00052 88 MRCT-PRED-DUE-YES-88 VALUE 'Y'. DTSIMRCT
00053 DTSIMRCT
00054 15 MRCT-TRANSFERRED-TO-EMP-NO DTSIMRCT
00055 PIC S9(07) COMP-3. DTSIMRCT
00056 DTSIMRCT
00057 15 MRCT-CHNG-OP-ID PIC X(08). DTSIMRCT
00058 88 MRCT-CHNG-SYSTEM-88 VALUE 'SYSTEM'. DTSIMRCT
00059 DTSIMRCT
00060 DTSIMRCT
00061 15 MRCT-QTR1-ESTIM-TAX-WAGE DTSIMRCT
00062 PIC S9(11)V9(02) COMP-3.DTSIMRCT
00063 DTSIMRCT
00064 15 FILLER PIC X(25). DTSIMRCT
00065 DTSIMRCT
00066 DTSIMRCT
00067 15 MRCT-CONVERTED-IND PIC X(01). DTSIMRCT
00068 88 MRCT-CONVERTED-88 VALUE 'Y'. DTSIMRCT
00069 88 MRCT-NOT-CONVERTED-88 VALUE 'N'. DTSIMRCT
00070 DTSIMRCT
00071 DTSIMRCT
00072 15 MRCT-ESTB-DATE PIC S9(09) COMP-3. DTSIMRCT
00073 DTSIMRCT
00074 15 MRCT-CHNG-DATE PIC S9(09) COMP-3. DTSIMRCT