DUTAS re-platformed to Raincode - Initial Source Code
This commit is contained in:
Neeraj Kumar
115
Copybook/DTSIMRPT.cpy
Normal file
115
Copybook/DTSIMRPT.cpy
Normal file
@ -0,0 +1,115 @@
|
||||
00001 ***** 10/01/12
|
||||
00002 * DTSIMRPT
|
||||
00003 * DTSIMRPT MASTER FILE 'REPORT' RECORD DEFINITION. LV003
|
||||
00004 * DTSIMRPT
|
||||
00005 * DTSIMRPT
|
||||
00006 * 08/31/1998 REVIEWED AND MODIFIED FOR DC. EHH DTSIMRPT
|
||||
00007 * DTSIMRPT
|
||||
00008 * 11/28/2001 ADDED MRPT-ANNUAL-IND TO INDICATE DTSIMRPT
|
||||
00009 * WHETHER THE REPORT RECORD IS PART OF ANDTSIMRPT
|
||||
00010 * ANNUAL REPORT OR NOT. GD DTSIMRPT
|
||||
00011 * DTSIMRPT
|
||||
00012 * 10/06/2005 ADDED MRPT-STATUS-CHNG-IND GD DTSIMRPT
|
||||
00013 * 03/29/2006 ADDED MRPT-SUR-CHARGED-IND ZL1 DTSIMRPT
|
||||
00014 * 09/27/2012 ADDED CLAIMANT WAGE REPORT TYPE - CL**3
|
||||
00015 * CW. GD CL**3
|
||||
00016 * DTSIMRPT
|
||||
00017 ***** DTSIMRPT
|
||||
00018 DTSIMRPT
|
||||
00019 10 MRPT-KEY-AREA. DTSIMRPT
|
||||
00020 15 MRPT-EMP-NO PIC S9(07) COMP-3. DTSIMRPT
|
||||
00021 15 MRPT-REC-TYPE PIC S9(04) COMP. DTSIMRPT
|
||||
00022 88 MRPT-RPT-88 VALUE +44. DTSIMRPT
|
||||
00023 15 MRPT-YRQ PIC S9(05) COMP-3. DTSIMRPT
|
||||
00024 15 MRPT-DOC-NO. DTSIMRPT
|
||||
00025 20 MRPT-BATCH-NO PIC S9(05) COMP-3. DTSIMRPT
|
||||
00026 20 MRPT-ITEM-NO PIC S9(03) COMP-3. DTSIMRPT
|
||||
00027 15 MRPT-KEY-FILLER PIC X(02). DTSIMRPT
|
||||
00028 DTSIMRPT
|
||||
00029 DTSIMRPT
|
||||
00030 10 MRPT-PURGE-DATE PIC S9(09) COMP-3. DTSIMRPT
|
||||
00031 DTSIMRPT
|
||||
00032 DTSIMRPT
|
||||
00033 10 MRPT-DATA-AREA. DTSIMRPT
|
||||
00034 15 MRPT-RPT-TYPE PIC X(02). DTSIMRPT
|
||||
00035 88 MRPT-ORIG-88 VALUE 'OR'. DTSIMRPT
|
||||
00036 88 MRPT-EMP-AMEND-88 VALUE 'EA'. DTSIMRPT
|
||||
00037 88 MRPT-AUDIT-88 VALUE 'AU'. DTSIMRPT
|
||||
00038 88 MRPT-FLD-SUP-88 VALUE 'FS'. DTSIMRPT
|
||||
00039 88 MRPT-ADMIN-CORR-88 VALUE 'AC'. DTSIMRPT
|
||||
00040 88 MRPT-ESTIM-88 VALUE 'ES'. DTSIMRPT
|
||||
00041 88 MRPT-CLMT-WAGE-88 VALUE 'CW'. CL**2
|
||||
00042 88 MRPT-WITHDRW-88 VALUE 'WD'. DTSIMRPT
|
||||
00043 88 MRPT-SUPPLEM-88 VALUE 'EA' 'AU' DTSIMRPT
|
||||
00044 'FS' 'AC'. DTSIMRPT
|
||||
00045 DTSIMRPT
|
||||
00046 15 MRPT-TOTAL-EMPL-CNT PIC S9(07) COMP-3. DTSIMRPT
|
||||
00047 DTSIMRPT
|
||||
00048 15 MRPT-1ST-MTH-EMPL-CNT PIC S9(07) COMP-3. DTSIMRPT
|
||||
00049 DTSIMRPT
|
||||
00050 15 MRPT-2ND-MTH-EMPL-CNT PIC S9(07) COMP-3. DTSIMRPT
|
||||
00051 DTSIMRPT
|
||||
00052 15 MRPT-3RD-MTH-EMPL-CNT PIC S9(07) COMP-3. DTSIMRPT
|
||||
00053 DTSIMRPT
|
||||
00054 15 MRPT-UI-RATE PIC S9(01)V9(04) COMP-3. DTSIMRPT
|
||||
00055 DTSIMRPT
|
||||
00056 15 MRPT-TOT-WAGE PIC S9(11)V9(02) COMP-3. DTSIMRPT
|
||||
00057 DTSIMRPT
|
||||
00058 15 MRPT-EXCESS-WAGE PIC S9(11)V9(02) COMP-3. DTSIMRPT
|
||||
00059 DTSIMRPT
|
||||
00060 15 MRPT-TAX-WAGE PIC S9(11)V9(02) COMP-3. DTSIMRPT
|
||||
00061 DTSIMRPT
|
||||
00062 15 MRPT-UI-CHARGED-AMT PIC S9(09)V9(02) COMP-3. DTSIMRPT
|
||||
00063 DTSIMRPT
|
||||
00064 15 MRPT-SUR-CHARGED-AMT PIC S9(09)V9(02) COMP-3. DTSIMRPT
|
||||
00065 DTSIMRPT
|
||||
00066 15 MRPT-REMIT-AMT PIC S9(09)V9(02) COMP-3. DTSIMRPT
|
||||
00067 DTSIMRPT
|
||||
00068 15 MRPT-WAGE-RPT-IND PIC X(01). DTSIMRPT
|
||||
00069 88 MRPT-WAGE-RPT-YES-88 VALUE 'Y'. DTSIMRPT
|
||||
00070 88 MRPT-WAGE-RPT-NO-88 VALUE 'N'. DTSIMRPT
|
||||
00071 88 MRPT-WAGE-RPT-NO-ENTRY-88 VALUE 'D'. DTSIMRPT
|
||||
00072 DTSIMRPT
|
||||
00073 15 MRPT-WAIVE-INT-IND PIC X(01). DTSIMRPT
|
||||
00074 88 MRPT-WAIVE-INT-YES-88 VALUE 'Y'. DTSIMRPT
|
||||
00075 88 MRPT-WAIVE-INT-NO-88 VALUE 'N'. DTSIMRPT
|
||||
00076 DTSIMRPT
|
||||
00077 15 MRPT-WAIVE-LATE-PEN-IND PIC X(01). DTSIMRPT
|
||||
00078 88 MRPT-WAIVE-LATE-PEN-YES-88 VALUE 'Y'. DTSIMRPT
|
||||
00079 88 MRPT-WAIVE-LATE-PEN-NO-88 VALUE 'N'. DTSIMRPT
|
||||
00080 DTSIMRPT
|
||||
00081 15 MRPT-RECEIVED-DATE PIC S9(09) COMP-3. DTSIMRPT
|
||||
00082 DTSIMRPT
|
||||
00083 15 MRPT-DEPOSIT-DATE PIC S9(09) COMP-3. DTSIMRPT
|
||||
00084 DTSIMRPT
|
||||
00085 15 MRPT-RESPONSIBLE-ACTIVITY DTSIMRPT
|
||||
00086 PIC X(03). DTSIMRPT
|
||||
00087 DTSIMRPT
|
||||
00088 15 MRPT-RESPONSIBLE-OP-ID PIC X(08). DTSIMRPT
|
||||
00089 DTSIMRPT
|
||||
00090 DTSIMRPT
|
||||
00091 15 MRPT-ANNUAL-IND PIC X(01). DTSIMRPT
|
||||
00092 88 MRPT-ANNUAL-YES-88 VALUE 'Y'. DTSIMRPT
|
||||
00093 88 MRPT-ANNUAL-NO-88 VALUE 'N'. DTSIMRPT
|
||||
00094 DTSIMRPT
|
||||
00095 15 MRPT-TRACE-NO PIC S9(13) COMP-3. DTSIMRPT
|
||||
00096 DTSIMRPT
|
||||
00097 15 MRPT-STATUS-CHNG-IND PIC X(01). DTSIMRPT
|
||||
00098 88 MRPT-STATUS-CHNG-YES-88 VALUE 'Y'. DTSIMRPT
|
||||
00099 88 MRPT-STATUS-CHNG-NO-88 VALUE 'N'. DTSIMRPT
|
||||
00100 DTSIMRPT
|
||||
00101 15 MRPT-SUR-CHARGED-IND PIC X(01). DTSIMRPT
|
||||
00102 88 MRPT-SUR-CHARGED-YES-88 VALUE 'Y'. DTSIMRPT
|
||||
00103 88 MRPT-SUR-CHARGED-NO-88 VALUE 'N'. DTSIMRPT
|
||||
00104 DTSIMRPT
|
||||
00105 15 FILLER PIC X(22). DTSIMRPT
|
||||
00106 DTSIMRPT
|
||||
00107 DTSIMRPT
|
||||
00108 15 MRPT-CONVERTED-IND PIC X(01). DTSIMRPT
|
||||
00109 88 MRPT-CONVERTED-88 VALUE 'Y'. DTSIMRPT
|
||||
00110 88 MRPT-NOT-CONVERTED-88 VALUE 'N'. DTSIMRPT
|
||||
00111 DTSIMRPT
|
||||
00112 DTSIMRPT
|
||||
00113 15 MRPT-ESTB-DATE PIC S9(09) COMP-3. DTSIMRPT
|
||||
00114 DTSIMRPT
|
||||
00115 15 MRPT-CHNG-DATE PIC S9(09) COMP-3. DTSIMRPT
|
||||
Reference in New Issue
Block a user