00001 ***** 05/25/07 00002 * DTSIC036 00003 * DTSIC036 FIELD SUPPORT CODES VALUES AND DESCRIPTIONS. LV006 00004 * DTSIC036 00005 ***** DTSIC036 00006 SKIP3 DTSIC036 00007 ***** DTSIC036 00008 * OPTION 01 = MFAS-EMP-SIZE-IND DTSIC036 00009 ***** DTSIC036 00010 10 C036-01-AREA. DTSIC036 00011 15 FILLER PIC X(01) VALUE ' '. DTSIC036 00012 15 FILLER PIC X(10) VALUE 'NON-AUDIT'. DTSIC036 00013 15 FILLER PIC X(40) DTSIC036 00014 VALUE 'NOT AN AUDIT ASSIGNMENT'. DTSIC036 00015 15 FILLER PIC X(01) VALUE 'L'. DTSIC036 00016 15 FILLER PIC X(10) VALUE 'LARGE'. DTSIC036 00017 15 FILLER PIC X(40) DTSIC036 00018 VALUE 'LARGE'. DTSIC036 00019 15 FILLER PIC X(01) VALUE 'S'. DTSIC036 00020 15 FILLER PIC X(10) VALUE 'SMALL'. DTSIC036 00021 15 FILLER PIC X(40) DTSIC036 00022 VALUE 'SMALL'. DTSIC036 00023 SKIP1 DTSIC036 00024 10 FILLER REDEFINES C036-01-AREA. DTSIC036 00025 15 C036-01-ENTRY OCCURS 3 TIMES DTSIC036 00026 INDEXED BY C036-01-IDX. DTSIC036 00027 20 C036-01-CD PIC X(01). DTSIC036 00028 20 C036-01-SHORT-DSCR PIC X(10). DTSIC036 00029 20 C036-01-LONG-DSCR PIC X(40). DTSIC036 00030 SKIP3 DTSIC036 00031 ***** DTSIC036 00032 * OPTION 02 = MFAS-STATUS-IND DTSIC036 00033 ***** DTSIC036 00034 10 C036-02-AREA. DTSIC036 00035 15 FILLER PIC X(01) VALUE 'A'. DTSIC036 00036 15 FILLER PIC X(10) VALUE 'ACTIVE'. DTSIC036 00037 15 FILLER PIC X(40) DTSIC036 00038 VALUE 'ACTIVE'. DTSIC036 00039 15 FILLER PIC X(01) VALUE 'C'. DTSIC036 00040 15 FILLER PIC X(10) VALUE 'COMPLETED'. DTSIC036 00041 15 FILLER PIC X(40) DTSIC036 00042 VALUE 'COMPLETED'. DTSIC036 00043 15 FILLER PIC X(01) VALUE 'P'. DTSIC036 00044 15 FILLER PIC X(10) VALUE 'PROCESSED'. DTSIC036 00045 15 FILLER PIC X(40) DTSIC036 00046 VALUE 'PROCESSED'. DTSIC036 00047 15 FILLER PIC X(01) VALUE 'H'. DTSIC036 00048 15 FILLER PIC X(10) VALUE 'HELD'. DTSIC036 00049 15 FILLER PIC X(40) DTSIC036 00050 VALUE 'HELD'. DTSIC036 00051 15 FILLER PIC X(01) VALUE 'K'. DTSIC036 00052 15 FILLER PIC X(10) VALUE 'KILLED'. DTSIC036 00053 15 FILLER PIC X(40) DTSIC036 00054 VALUE 'KILLED (CANCELED)'. DTSIC036 00055 SKIP1 DTSIC036 00056 10 FILLER REDEFINES C036-02-AREA. DTSIC036 00057 15 C036-02-ENTRY OCCURS 5 TIMES DTSIC036 00058 INDEXED BY C036-02-IDX. DTSIC036 00059 20 C036-02-CD PIC X(01). DTSIC036 00060 20 C036-02-SHORT-DSCR PIC X(10). DTSIC036 00061 20 C036-02-LONG-DSCR PIC X(40). DTSIC036 00062 SKIP3 DTSIC036 00063 ***** DTSIC036 00064 * OPTION 03 = MFAS-AUDIT-SEL-REASON DTSIC036 00065 ***** DTSIC036 00066 10 C036-03-AREA. DTSIC036 00067 15 FILLER PIC X(02) VALUE '01'. DTSIC036 00068 15 FILLER PIC X(10) VALUE 'RANDOM'. DTSIC036 00069 15 FILLER PIC X(40) DTSIC036 00070 VALUE 'RANDOM'. DTSIC036 00071 15 FILLER PIC X(02) VALUE '02'. DTSIC036 00072 15 FILLER PIC X(10) VALUE 'LARGE EMP '. DTSIC036 00073 15 FILLER PIC X(40) DTSIC036 00074 VALUE 'LARGE EMPLOYER'. DTSIC036 00075 15 FILLER PIC X(02) VALUE '03'. DTSIC036 00076 15 FILLER PIC X(10) VALUE 'REQUEST '. DTSIC036 00077 15 FILLER PIC X(40) DTSIC036 00078 VALUE 'REQUEST'. DTSIC036 00079 SKIP1 DTSIC036 00080 10 FILLER REDEFINES C036-03-AREA. DTSIC036 00081 15 C036-03-ENTRY OCCURS 3 TIMES DTSIC036 00082 INDEXED BY C036-03-IDX. DTSIC036 00083 20 C036-03-CD PIC X(02). DTSIC036 00084 20 C036-03-SHORT-DSCR PIC X(10). DTSIC036 00085 20 C036-03-LONG-DSCR PIC X(40). DTSIC036 00086 SKIP3 DTSIC036 00087 ***** DTSIC036 00088 * OPTION 04 = MAUR-EMP-SIZE-IND DTSIC036 00089 ***** DTSIC036 00090 10 C036-04-AREA. DTSIC036 00091 15 FILLER PIC X(01) VALUE 'L'. DTSIC036 00092 15 FILLER PIC X(10) VALUE 'LARGE'. DTSIC036 00093 15 FILLER PIC X(40) DTSIC036 00094 VALUE 'LARGE'. DTSIC036 00095 15 FILLER PIC X(01) VALUE 'S'. DTSIC036 00096 15 FILLER PIC X(10) VALUE 'SMALL'. DTSIC036 00097 15 FILLER PIC X(40) DTSIC036 00098 VALUE 'SMALL'. DTSIC036 00099 SKIP1 DTSIC036 00100 10 FILLER REDEFINES C036-04-AREA. DTSIC036 00101 15 C036-04-ENTRY OCCURS 2 TIMES DTSIC036 00102 INDEXED BY C036-04-IDX. DTSIC036 00103 20 C036-04-CD PIC X(01). DTSIC036 00104 20 C036-04-SHORT-DSCR PIC X(10). DTSIC036 00105 20 C036-04-LONG-DSCR PIC X(40). DTSIC036 00106 SKIP3 DTSIC036 00107 ***** DTSIC036 00108 * OPTION 05 = MAUR-ERROR-TYPE DTSIC036 00109 ***** DTSIC036 00110 10 C036-05-AREA. DTSIC036 00111 15 FILLER PIC X(02) VALUE '51'. DTSIC036 00112 15 FILLER PIC X(10) VALUE 'IND CONTRC'. DTSIC036 00113 15 FILLER PIC X(40) DTSIC036 00114 VALUE 'INDEPENDENT CONTRACTOR'. DTSIC036 00115 15 FILLER PIC X(02) VALUE '52'. DTSIC036 00116 15 FILLER PIC X(10) VALUE 'OFFICR WGS'. DTSIC036 00117 15 FILLER PIC X(40) DTSIC036 00118 VALUE 'CORPORATE OFFICER WAGES'. DTSIC036 00119 15 FILLER PIC X(02) VALUE '53'. DTSIC036 00120 15 FILLER PIC X(10) VALUE 'TIPS'. DTSIC036 00121 15 FILLER PIC X(40) DTSIC036 00122 VALUE 'TIPS'. DTSIC036 00123 15 FILLER PIC X(02) VALUE '54'. DTSIC036 00124 15 FILLER PIC X(10) VALUE 'MEALS'. DTSIC036 00125 15 FILLER PIC X(40) DTSIC036 00126 VALUE 'MEALS AND LODGING'. DTSIC036 00127 15 FILLER PIC X(02) VALUE '55'. DTSIC036 00128 15 FILLER PIC X(10) VALUE 'CASUAL LBR'. DTSIC036 00129 15 FILLER PIC X(40) DTSIC036 00130 VALUE 'CASUAL AND SPOT LABOR'. DTSIC036 00131 15 FILLER PIC X(02) VALUE '56'. DTSIC036 00132 15 FILLER PIC X(10) VALUE 'BENEFT PLN'. DTSIC036 00133 15 FILLER PIC X(40) DTSIC036 00134 VALUE 'BENEFIT PLANS'. DTSIC036 00135 15 FILLER PIC X(02) VALUE '57'. DTSIC036 00136 15 FILLER PIC X(10) VALUE 'EXPNS REIM'. DTSIC036 00137 15 FILLER PIC X(40) DTSIC036 00138 VALUE 'EXPENSE REIMBURSEMENT'. DTSIC036 00139 15 FILLER PIC X(02) VALUE '58'. DTSIC036 00140 15 FILLER PIC X(10) VALUE 'EXEMPT EMP'. DTSIC036 00141 15 FILLER PIC X(40) DTSIC036 00142 VALUE 'EXEMPT EMPLOYEES REPORTED IN ERROR'. DTSIC036 00143 15 FILLER PIC X(02) VALUE '59'. DTSIC036 00144 15 FILLER PIC X(10) VALUE 'WG BAS ERR'. DTSIC036 00145 15 FILLER PIC X(40) DTSIC036 00146 VALUE 'WAGE BASE ERROR'. DTSIC036 00147 15 FILLER PIC X(02) VALUE '60'. DTSIC036 00148 15 FILLER PIC X(10) VALUE 'COMMISSION'. DTSIC036 00149 15 FILLER PIC X(40) DTSIC036 00150 VALUE 'COMMISSIONS'. DTSIC036 00151 15 FILLER PIC X(02) VALUE '61'. DTSIC036 00152 15 FILLER PIC X(10) VALUE 'BONUSES'. DTSIC036 00153 15 FILLER PIC X(40) DTSIC036 00154 VALUE 'BONUSES'. DTSIC036 00155 15 FILLER PIC X(02) VALUE '62'. DTSIC036 00156 15 FILLER PIC X(10) VALUE 'DOMESTIC'. DTSIC036 00157 15 FILLER PIC X(40) DTSIC036 00158 VALUE 'DOMESTIC'. DTSIC036 00159 15 FILLER PIC X(02) VALUE '63'. DTSIC036 00160 15 FILLER PIC X(10) VALUE 'SEVER PAY'. DTSIC036 00161 15 FILLER PIC X(40) DTSIC036 00162 VALUE 'SEVERANCE PAY'. DTSIC036 00163 15 FILLER PIC X(02) VALUE '64'. DTSIC036 00164 15 FILLER PIC X(10) VALUE 'ARITH ERR'. DTSIC036 00165 15 FILLER PIC X(40) DTSIC036 00166 VALUE 'ARITHMETIC ERROR'. DTSIC036 00167 15 FILLER PIC X(02) VALUE '65'. DTSIC036 00168 15 FILLER PIC X(10) VALUE 'MISCLASS '. DTSIC036 00169 15 FILLER PIC X(40) DTSIC036 00170 VALUE 'MISC MISCLASSIFIED WORKERS'. DTSIC036 00171 15 FILLER PIC X(02) VALUE '66'. DTSIC036 00172 15 FILLER PIC X(10) VALUE 'UNRPT MIS'. DTSIC036 00173 15 FILLER PIC X(40) DTSIC036 00174 VALUE 'OTHER UNREPORTED MISCLASSIFIED WORKERS'. DTSIC036 00175 15 FILLER PIC X(02) VALUE '67'. DTSIC036 00176 15 FILLER PIC X(10) VALUE 'EMPL OMIT'. DTSIC036 00177 15 FILLER PIC X(40) DTSIC036 00178 VALUE 'EMPLOYEES OMITTED'. DTSIC036 00179 15 FILLER PIC X(02) VALUE '68'. DTSIC036 00180 15 FILLER PIC X(10) VALUE 'WGE UNRPT'. DTSIC036 00181 15 FILLER PIC X(40) DTSIC036 00182 VALUE 'WAGES UNREPORTED'. DTSIC036 00183 15 FILLER PIC X(02) VALUE '69'. DTSIC036 00184 15 FILLER PIC X(10) VALUE 'INTERNS '. DTSIC036 00185 15 FILLER PIC X(40) DTSIC036 00186 VALUE 'INTERNS MISCLASSIFIED'. DTSIC036 00187 15 FILLER PIC X(02) VALUE '70'. DTSIC036 00188 15 FILLER PIC X(10) VALUE 'WRONG ST '. DTSIC036 00189 15 FILLER PIC X(40) DTSIC036 00190 VALUE 'WAGES REPORTED TO WRONG STATE'. DTSIC036 00191 15 FILLER PIC X(02) VALUE '71'. DTSIC036 00192 15 FILLER PIC X(10) VALUE 'UNDEFINED'. DTSIC036 00193 15 FILLER PIC X(40) DTSIC036 00194 VALUE 'UNDEFINED'. DTSIC036 00195 15 FILLER PIC X(02) VALUE '72'. DTSIC036 00196 15 FILLER PIC X(10) VALUE 'UNDEFINED'. DTSIC036 00197 15 FILLER PIC X(40) DTSIC036 00198 VALUE 'UNDEFINED'. DTSIC036 00199 15 FILLER PIC X(02) VALUE '73'. DTSIC036 00200 15 FILLER PIC X(10) VALUE 'UNDEFINED'. DTSIC036 00201 15 FILLER PIC X(40) DTSIC036 00202 VALUE 'UNDEFINED'. DTSIC036 00203 15 FILLER PIC X(02) VALUE '74'. DTSIC036 00204 15 FILLER PIC X(10) VALUE 'UNDEFINED'. DTSIC036 00205 15 FILLER PIC X(40) DTSIC036 00206 VALUE 'UNDEFINED'. DTSIC036 00207 15 FILLER PIC X(02) VALUE '75'. DTSIC036 00208 15 FILLER PIC X(10) VALUE 'OTHER'. DTSIC036 00209 15 FILLER PIC X(40) DTSIC036 00210 VALUE 'OTHER'. DTSIC036 00211 SKIP1 DTSIC036 00212 10 FILLER REDEFINES C036-05-AREA. DTSIC036 00213 15 C036-05-ENTRY OCCURS 25 TIMES DTSIC036 00214 INDEXED BY C036-05-IDX. DTSIC036 00215 20 C036-05-CD PIC X(02). DTSIC036 00216 20 C036-05-SHORT-DSCR PIC X(10). DTSIC036 00217 20 C036-05-LONG-DSCR PIC X(40). DTSIC036 00218 SKIP3 DTSIC036 00219 ***** DTSIC036 00220 * OPTION 06 = MAUR-MONEY-REASON-CD DTSIC036 00221 ***** DTSIC036 00222 10 C036-06-AREA. DTSIC036 00223 15 FILLER PIC X(01) VALUE '0'. DTSIC036 00224 15 FILLER PIC X(10) VALUE 'N/A'. DTSIC036 00225 15 FILLER PIC X(40) DTSIC036 00226 VALUE 'NOT APPLICABLE: DUE AMT = COLLECT AMT'. DTSIC036 00227 15 FILLER PIC X(01) VALUE '1'. DTSIC036 00228 15 FILLER PIC X(10) VALUE 'WAIVER '. DTSIC036 00229 15 FILLER PIC X(40) DTSIC036 00230 VALUE 'WAIVER GRANTED'. DTSIC036 00231 15 FILLER PIC X(01) VALUE '2'. DTSIC036 00232 15 FILLER PIC X(10) VALUE 'DPC SIGNED'. DTSIC036 00233 15 FILLER PIC X(40) DTSIC036 00234 VALUE 'DEFERRED PAYMENT CONTRACT SIGNED'. DTSIC036 00235 15 FILLER PIC X(01) VALUE '3'. DTSIC036 00236 15 FILLER PIC X(10) VALUE 'EMP REFUSE'. DTSIC036 00237 15 FILLER PIC X(40) DTSIC036 00238 VALUE 'EMP REFUSED TO SIGN AUDIT - WILL APPEAL'. DTSIC036 00239 15 FILLER PIC X(01) VALUE '4'. DTSIC036 00240 15 FILLER PIC X(10) VALUE 'REFUSE PAY'. DTSIC036 00241 15 FILLER PIC X(40) DTSIC036 00242 VALUE 'EMP REFUSED TO PAY'. DTSIC036 00243 15 FILLER PIC X(01) VALUE '5'. DTSIC036 00244 15 FILLER PIC X(10) VALUE 'REQ BILL'. DTSIC036 00245 15 FILLER PIC X(40) DTSIC036 00246 VALUE 'EMP REQUESTED BILL'. DTSIC036 00247 15 FILLER PIC X(01) VALUE '8'. DTSIC036 00248 15 FILLER PIC X(10) VALUE 'OTHER'. DTSIC036 00249 15 FILLER PIC X(40) DTSIC036 00250 VALUE 'OTHER'. DTSIC036 00251 15 FILLER PIC X(01) VALUE '9'. DTSIC036 00252 15 FILLER PIC X(10) VALUE 'UNKNOWN'. DTSIC036 00253 15 FILLER PIC X(40) DTSIC036 00254 VALUE 'UNKNOWN'. DTSIC036 00255 SKIP1 DTSIC036 00256 10 FILLER REDEFINES C036-06-AREA. DTSIC036 00257 15 C036-06-ENTRY OCCURS 8 TIMES DTSIC036 00258 INDEXED BY C036-06-IDX. DTSIC036 00259 20 C036-06-CD PIC X(01). DTSIC036 00260 20 C036-06-SHORT-DSCR PIC X(10). DTSIC036 00261 20 C036-06-LONG-DSCR PIC X(40). DTSIC036