393 lines
31 KiB
COBOL
393 lines
31 KiB
COBOL
00001 ***** 05/04/16
|
|
00002 * DTSIC119
|
|
00003 * DTSIC119 AGENCY FACTS CONSTANTS. LV042
|
|
00004 * DTSIC119
|
|
00005 * DTSIC119
|
|
00006 * MODIFICATION HISTORY: DTSIC119
|
|
00007 * DTSIC119
|
|
00008 * 11/04/97 MASSIVELY MODIFIED TO REFLECT THE MOVE OF UI DTSIC119
|
|
00009 * TAX OPERATION FROM DLI TO DOR. DTSIC119
|
|
00010 * REQ: TCL 208 PROGRAMMER: EHH DTSIC119
|
|
00011 * DTSIC119
|
|
00012 * 10/06/1998 REVIEWED AND MODIFIED FOR DC. DTSIC119
|
|
00013 * REFERENCE: DC DEVELOPMENT PROGRAMMER: EHH DTSIC119
|
|
00014 * DTSIC119
|
|
00015 * 04/20/2000 MODIFIED FOR NAME AND PHONE NUMBER CHANGES DTSIC119
|
|
00016 * REFERENCE: DC DEVELOPMENT PROGRAMMER: ZL1 DTSIC119
|
|
00017 * DTSIC119
|
|
00018 * 09/06/2006 MODIFIED FOR NAME CHANGE (bobby tucker) DTSIC119
|
|
00019 * REFERENCE: DC DEVELOPMENT PROGRAMMER: ZL1 DTSIC119
|
|
00020 * DTSIC119
|
|
00021 * 07/28/2008 MODIFIED FOR NAME CHANGE (scott kubly ) DTSIC119
|
|
00022 * REFERENCE: DC DEVELOPMENT PROGRAMMER: ZL1 DTSIC119
|
|
00023 * DTSIC119
|
|
00024 * 04/10/2009 MODIFIED FOR NAME CHANGE (valarie kitchings) DTSIC119
|
|
00025 * REFERENCE: DC DEVELOPMENT PROGRAMMER: ZL1 DTSIC119
|
|
00026 * DTSIC119
|
|
00027 * DTSIC119
|
|
00028 * 07/23/2010 MODIFIED FOR NAME CHANGE (mary tucker ) DTSIC119
|
|
00029 * REFERENCE: DC DEVELOPMENT PROGRAMMER: ZL1 DTSIC119
|
|
00030 * DTSIC119
|
|
00031 * DTSIC119
|
|
00032 * 07/23/2010 MODIFIED FOR NAME CHANGE (marilyn seabrook ) DTSIC119
|
|
00033 * REFERENCE: DC DEVELOPMENT PROGRAMMER: ZL1 DTSIC119
|
|
00034 * DTSIC119
|
|
00035 * DTSIC119
|
|
00036 * 04/01/2011 MODIFIED FOR NAME ui dir (dorothy jones ) DTSIC119
|
|
00037 * REFERENCE: DC DEVELOPMENT PROGRAMMER: ZL1 DTSIC119
|
|
00038 * DTSIC119
|
|
00039 * DTSIC119
|
|
00040 * 08/15/2012 MODIFIED FOR NAME ui dir (partrick holmes ) DTSIC119
|
|
00041 * REFERENCE: DC DEVELOPMENT PROGRAMMER: ZL1 DTSIC119
|
|
00042 * DTSIC119
|
|
00043 * 01/06/2014 MODIFIED FOR NAME ui dir (F. Thomas Luparello ) DTSIC119
|
|
00044 * REFERENCE: does ticket 2228 programmer: NH1 DTSIC119
|
|
00045 ***** DTSIC119
|
|
00046 DTSIC119
|
|
00047 10 C119-AGY-ADDR. DTSIC119
|
|
00048 15 C119-AGY-NAME-ADDR-CAPS. DTSIC119
|
|
00049 20 C119-AGY-NAMEA-C PIC X(40) DTSIC119
|
|
00050 VALUE 'DC DEPARTMENT OF EMPLOYMENT SERVICES '.DTSIC119
|
|
00051 20 C119-AGY-NAMEB1-C PIC X(40) DTSIC119
|
|
00052 VALUE 'DISTRICT OF COLUMBIA '. DTSIC119
|
|
00053 20 C119-AGY-NAMEB2-C PIC X(40) DTSIC119
|
|
00054 VALUE 'DEPARTMENT OF EMPLOYMENT SERVICES '. DTSIC119
|
|
00055 20 C119-AGY-MAIL1-C PIC X(40) DTSIC119
|
|
00056 VALUE '4058 MINNESOTA AVE NE 4TH FLOOR '. DTSIC119
|
|
00057 20 C119-AGY-MAIL2-C PIC X(40) DTSIC119
|
|
00058 VALUE 'WASHINGTON, DC 20019 '. DTSIC119
|
|
00059 20 C119-AGY-PHYS1-C PIC X(40) DTSIC119
|
|
00060 VALUE '4058 MINNESOTA AVE NE 4TH FLOOR '. DTSIC119
|
|
00061 20 C119-AGY-PHYS2-C PIC X(40) DTSIC119
|
|
00062 VALUE 'WASHINGTON, DC 20019 '. DTSIC119
|
|
00063 15 C119-AGY-NAME-ADDR-MIXED. DTSIC119
|
|
00064 20 C119-AGY-NAMEA-M PIC X(40) DTSIC119
|
|
00065 VALUE 'DC Department of Employment Services '.DTSIC119
|
|
00066 20 C119-AGY-NAMEB1-M PIC X(40) DTSIC119
|
|
00067 VALUE 'District of Columbia '. DTSIC119
|
|
00068 20 C119-AGY-NAMEB2-M PIC X(40) DTSIC119
|
|
00069 VALUE 'Department of Employment Services '. DTSIC119
|
|
00070 20 C119-AGY-MAIL1-M PIC X(40) DTSIC119
|
|
00071 VALUE '4058 Minnesota Ave NE 4th Floor '. DTSIC119
|
|
00072 20 C119-AGY-MAIL2-M PIC X(40) DTSIC119
|
|
00073 VALUE 'Washington, DC 20019 '. DTSIC119
|
|
00074 20 C119-AGY-PHYS1-M PIC X(40) DTSIC119
|
|
00075 VALUE '4058 Minnesota Ave NE 4th Floor '. DTSIC119
|
|
00076 20 C119-AGY-PHYS2-M PIC X(40) DTSIC119
|
|
00077 VALUE 'Washington, DC 20019 '. DTSIC119
|
|
00078 DTSIC119
|
|
00079 10 C119-AGY-MISC. DTSIC119
|
|
00080 15 C119-AGY-MISC-CAPS. DTSIC119
|
|
00081 20 C119-AGY-CHIEF-NAME-C PIC X(40) DTSIC119
|
|
00082 VALUE 'F. THOMAS LUPARELLO '. DTSIC119
|
|
00083 20 C119-AGY-CHIEF-TITLE-C PIC X(40) DTSIC119
|
|
00084 VALUE 'Interim Director '. DTSIC119
|
|
00085 20 C119-AGY-EMAIL-C PIC X(40) DTSIC119
|
|
00086 VALUE ' '. DTSIC119
|
|
00087 15 C119-AGY-MISC-MIXED. DTSIC119
|
|
00088 20 C119-AGY-CHIEF-NAME-M PIC X(40) DTSIC119
|
|
00089 VALUE 'F. Thomas Luparello '. DTSIC119
|
|
00090 20 C119-AGY-CHIEF-TITLE-M PIC X(40) DTSIC119
|
|
00091 VALUE 'Interim Director '. DTSIC119
|
|
00092 20 C119-AGY-EMAIL-M PIC X(40) DTSIC119
|
|
00093 VALUE ' '. DTSIC119
|
|
00094 15 C119-AGY-MISC-TEL. DTSIC119
|
|
00095 20 C119-AGY-VOICE PIC X(15) DTSIC119
|
|
00096 VALUE '2026712409 '. DTSIC119
|
|
00097 20 C119-AGY-FAX PIC X(15) DTSIC119
|
|
00098 VALUE ' '. DTSIC119
|
|
00099 20 C119-AGY-MODEM PIC X(15) DTSIC119
|
|
00100 VALUE ' '. DTSIC119
|
|
00101 20 C119-AGY-TDD PIC X(15) DTSIC119
|
|
00102 VALUE ' '. DTSIC119
|
|
00103 DTSIC119
|
|
00104 10 C119-TAX-DIV. DTSIC119
|
|
00105 15 C119-TAX-DIV-CAPS. DTSIC119
|
|
00106 20 C119-TAX-DIV-NAME-C PIC X(40) DTSIC119
|
|
00107 VALUE 'TAX DIVISION '. DTSIC119
|
|
00108 20 C119-TAX-DIV-CHIEF-NAME-C PIC X(40) DTSIC119
|
|
00109 VALUE 'PATRICK HOLMES '. DTSIC119
|
|
00110 20 C119-TAX-DIV-CHIEF-TITLE-C PIC X(40) DTSIC119
|
|
00111 VALUE 'UI COMPLIANCE '. DTSIC119
|
|
00112 20 C119-TAX-DIV-EMAIL-C PIC X(40) DTSIC119
|
|
00113 VALUE 'PATRICK.HOLMES@DC.GOV '. DTSIC119
|
|
00114 15 C119-TAX-DIV-MIXED. DTSIC119
|
|
00115 20 C119-TAX-DIV-NAME-M PIC X(40) DTSIC119
|
|
00116 VALUE 'Tax Division '. DTSIC119
|
|
00117 20 C119-TAX-DIV-CHIEF-NAME-M PIC X(40) DTSIC119
|
|
00118 VALUE 'Patrick Holmes '. DTSIC119
|
|
00119 20 C119-TAX-DIV-CHIEF-TITLE-M PIC X(40) DTSIC119
|
|
00120 VALUE 'UI Compliance '. DTSIC119
|
|
00121 20 C119-TAX-DIV-EMAIL-M PIC X(40) DTSIC119
|
|
00122 VALUE 'Patrick.Holmes@dc.gov '. DTSIC119
|
|
00123 15 C119-TAX-DIV-TEL. DTSIC119
|
|
00124 20 C119-TAX-DIV-VOICE PIC X(15) DTSIC119
|
|
00125 VALUE '2026987550 '. DTSIC119
|
|
00126 20 C119-TAX-DIV-FAX PIC X(15) DTSIC119
|
|
00127 VALUE '2026985706 '. DTSIC119
|
|
00128 20 C119-TAX-DIV-MODEM PIC X(15) DTSIC119
|
|
00129 VALUE ' '. DTSIC119
|
|
00130 20 C119-TAX-DIV-TDD PIC X(15) DTSIC119
|
|
00131 VALUE ' '. DTSIC119
|
|
00132 DTSIC119
|
|
00133 10 C119-TAX-BUR. DTSIC119
|
|
00134 15 C119-TAX-BUR-CAPS. DTSIC119
|
|
00135 20 C119-TAX-BUR-NAME-C PIC X(40) DTSIC119
|
|
00136 VALUE 'TAX DIVSION '. DTSIC119
|
|
00137 20 C119-TAX-BUR-CHIEF-NAME-C PIC X(40) DTSIC119
|
|
00138 VALUE 'RYAN MOORE-LEE '. CL*42
|
|
00139 20 C119-TAX-BUR-CHIEF-TITLE-C PIC X(40) DTSIC119
|
|
00140 VALUE 'UI COMPLIANCE '. DTSIC119
|
|
00141 20 C119-TAX-BUR-EMAIL-C PIC X(40) DTSIC119
|
|
00142 VALUE 'RYAN.MOORE-LEE@DC.GOV '. CL*42
|
|
00143 15 C119-TAX-BUR-MIXED. DTSIC119
|
|
00144 20 C119-TAX-BUR-NAME-M PIC X(40) DTSIC119
|
|
00145 VALUE 'Tax Division '. DTSIC119
|
|
00146 20 C119-TAX-BUR-CHIEF-NAME-M PIC X(40) DTSIC119
|
|
00147 VALUE 'Ryan moore-lee '. CL*42
|
|
00148 20 C119-TAX-BUR-CHIEF-TITLE-M PIC X(40) DTSIC119
|
|
00149 VALUE 'UI Compliance '. DTSIC119
|
|
00150 20 C119-TAX-BUR-EMAIL-M PIC X(40) DTSIC119
|
|
00151 VALUE 'Ryan.moore-lee@dc.gov '. CL*42
|
|
00152 15 C119-TAX-BUR-TEL. DTSIC119
|
|
00153 20 C119-TAX-BUR-VOICE PIC X(15) DTSIC119
|
|
00154 VALUE '2026987550 '. DTSIC119
|
|
00155 20 C119-TAX-BUR-FAX PIC X(15) DTSIC119
|
|
00156 VALUE '2026985706 '. DTSIC119
|
|
00157 20 C119-TAX-BUR-MODEM PIC X(15) DTSIC119
|
|
00158 VALUE ' '. DTSIC119
|
|
00159 20 C119-TAX-BUR-TDD PIC X(15) DTSIC119
|
|
00160 VALUE ' '. DTSIC119
|
|
00161 DTSIC119
|
|
00162 10 C119-UC-OFFICE. DTSIC119
|
|
00163 15 C119-UC-OFFICE-CAPS. DTSIC119
|
|
00164 20 C119-UC-OFFICE-NAME-C PIC X(40) DTSIC119
|
|
00165 VALUE 'OFFICE OF UNEMPLOYMENT COMPENSATION'. DTSIC119
|
|
00166 20 C119-UC-OFFICE-CHIEF-NAME-C PIC X(40) DTSIC119
|
|
00167 VALUE 'ROBERT THOMPSON '. CL*42
|
|
00168 20 C119-UC-OFFICE-CHIEF-TITLE-C PIC X(40) DTSIC119
|
|
00169 VALUE 'ASSOCIATE DIRECTOR '. DTSIC119
|
|
00170 20 C119-UC-OFFICE-EMAIL-C PIC X(40) DTSIC119
|
|
00171 VALUE ' '. DTSIC119
|
|
00172 15 C119-UC-OFFICE-MIXED. DTSIC119
|
|
00173 20 C119-UC-OFFICE-NAME-M PIC X(40) DTSIC119
|
|
00174 VALUE 'Office of Unemployment Compensation '. DTSIC119
|
|
00175 20 C119-UC-OFFICE-CHIEF-NAME-M PIC X(40) DTSIC119
|
|
00176 VALUE 'Robert Thompson '. CL*42
|
|
00177 20 C119-UC-OFFICE-CHIEF-TITLE-M PIC X(40) DTSIC119
|
|
00178 VALUE 'Associate Director '. DTSIC119
|
|
00179 20 C119-UC-OFFICE-EMAIL-M PIC X(40) DTSIC119
|
|
00180 VALUE ' '. DTSIC119
|
|
00181 15 C119-UC-OFFICE-TEL. DTSIC119
|
|
00182 20 C119-UC-OFFICE-VOICE PIC X(15) DTSIC119
|
|
00183 VALUE '2026987550 '. DTSIC119
|
|
00184 20 C119-UC-OFFICE-FAX PIC X(15) DTSIC119
|
|
00185 VALUE '2027270426 '. DTSIC119
|
|
00186 20 C119-UC-OFFICE-MODEM PIC X(15) DTSIC119
|
|
00187 VALUE ' '. DTSIC119
|
|
00188 20 C119-UC-OFFICE-TDD PIC X(15) DTSIC119
|
|
00189 VALUE ' '. DTSIC119
|
|
00190 DTSIC119
|
|
00191 10 C119-EMP-REG-UNIT. DTSIC119
|
|
00192 15 C119-EMP-REG-CAPS. DTSIC119
|
|
00193 20 C119-EMP-REG-NAME-C PIC X(40) DTSIC119
|
|
00194 VALUE 'EMPLOYER REGISTRATION UNIT '. DTSIC119
|
|
00195 20 C119-EMP-REG-SUPER-NAME-C PIC X(40) DTSIC119
|
|
00196 VALUE 'RYAN MOORE-LEE '. CL*42
|
|
00197 20 C119-EMP-REG-SUPER-TITLE-C PIC X(40) DTSIC119
|
|
00198 VALUE 'EMPLOYER REGISTRATION SUPERVISOR '. DTSIC119
|
|
00199 20 C119-EMP-REG-EMAIL-C PIC X(40) DTSIC119
|
|
00200 VALUE ' '. DTSIC119
|
|
00201 15 C119-EMP-REG-MIXED. DTSIC119
|
|
00202 20 C119-EMP-REG-NAME-M PIC X(40) DTSIC119
|
|
00203 VALUE 'Employer Registration Unit '. DTSIC119
|
|
00204 20 C119-EMP-REG-SUPER-NAME-M PIC X(40) DTSIC119
|
|
00205 VALUE 'Ryan Moore-Lee '. CL*42
|
|
00206 20 C119-EMP-REG-SUPER-TITLE-M PIC X(40) DTSIC119
|
|
00207 VALUE 'Employer Registration Supervisor '. DTSIC119
|
|
00208 20 C119-EMP-REG-EMAIL-M PIC X(40) DTSIC119
|
|
00209 VALUE ' '. DTSIC119
|
|
00210 15 C119-EMP-REG-TEL. DTSIC119
|
|
00211 20 C119-EMP-REG-VOICE PIC X(15) DTSIC119
|
|
00212 VALUE '2026987550 '. DTSIC119
|
|
00213 20 C119-EMP-REG-FAX PIC X(15) DTSIC119
|
|
00214 VALUE '2026985706 '. DTSIC119
|
|
00215 20 C119-EMP-REG-MODEM PIC X(15) DTSIC119
|
|
00216 VALUE ' '. DTSIC119
|
|
00217 20 C119-EMP-REG-TDD PIC X(15) DTSIC119
|
|
00218 VALUE ' '. DTSIC119
|
|
00219 DTSIC119
|
|
00220 10 C119-EXP-RATE-UNIT. DTSIC119
|
|
00221 15 C119-EXP-RATE-CAPS. DTSIC119
|
|
00222 20 C119-EXP-RATE-NAME-C PIC X(40) DTSIC119
|
|
00223 VALUE 'EXPERIENCE RATING UNIT '. DTSIC119
|
|
00224 20 C119-EXP-RATE-SUPER-NAME-C PIC X(40) DTSIC119
|
|
00225 VALUE 'RYAN MOORE-LEE '. CL*42
|
|
00226 20 C119-EXP-RATE-SUPER-TITLE-C PIC X(40) DTSIC119
|
|
00227 VALUE 'EXPERIENCE RATING SUPERVISOR '. DTSIC119
|
|
00228 20 C119-EXP-RATE-EMAIL-C PIC X(40) DTSIC119
|
|
00229 VALUE ' '. DTSIC119
|
|
00230 15 C119-EXP-RATE-MIXED. DTSIC119
|
|
00231 20 C119-EXP-RATE-NAME-M PIC X(40) DTSIC119
|
|
00232 VALUE 'Experience Rating Unit '. DTSIC119
|
|
00233 20 C119-EXP-RATE-SUPER-NAME-M PIC X(40) DTSIC119
|
|
00234 VALUE 'Ryan Moore-Lee '. CL*42
|
|
00235 20 C119-EXP-RATE-SUPER-TITLE-M PIC X(40) DTSIC119
|
|
00236 VALUE 'Experience Rating Supervisor '. DTSIC119
|
|
00237 20 C119-EXP-RATE-EMAIL-M PIC X(40) DTSIC119
|
|
00238 VALUE ' '. DTSIC119
|
|
00239 15 C119-EXP-RATE-TEL. DTSIC119
|
|
00240 20 C119-EXP-RATE-VOICE PIC X(15) DTSIC119
|
|
00241 VALUE '2026987550 '. DTSIC119
|
|
00242 20 C119-EXP-RATE-FAX PIC X(15) DTSIC119
|
|
00243 VALUE '2026985706 '. DTSIC119
|
|
00244 20 C119-EXP-RATE-MODEM PIC X(15) DTSIC119
|
|
00245 VALUE ' '. DTSIC119
|
|
00246 20 C119-EXP-RATE-TDD PIC X(15) DTSIC119
|
|
00247 VALUE ' '. DTSIC119
|
|
00248 DTSIC119
|
|
00249 10 C119-TAX-ACCT-UNIT. DTSIC119
|
|
00250 15 C119-TAX-ACCT-CAPS. DTSIC119
|
|
00251 20 C119-TAX-ACCT-NAME-C PIC X(40) DTSIC119
|
|
00252 VALUE 'TAX ACCOUNTING UNIT '. DTSIC119
|
|
00253 20 C119-TAX-ACCT-SUPER-NAME-C PIC X(40) DTSIC119
|
|
00254 VALUE 'ESAYAS LEMMA '. CL*42
|
|
00255 20 C119-TAX-ACCT-SUPER-TITLE-C PIC X(40) DTSIC119
|
|
00256 VALUE 'TAX ACCOUNTING SUPERVISOR '. DTSIC119
|
|
00257 20 C119-TAX-ACCT-EMAIL-C PIC X(40) DTSIC119
|
|
00258 VALUE ' '. DTSIC119
|
|
00259 15 C119-TAX-ACCT-MIXED. DTSIC119
|
|
00260 20 C119-TAX-ACCT-NAME-M PIC X(40) DTSIC119
|
|
00261 VALUE 'Tax Accounting Unit '. DTSIC119
|
|
00262 20 C119-TAX-ACCT-SUPER-NAME-M PIC X(40) DTSIC119
|
|
00263 VALUE 'Esayas Lemma '. CL*42
|
|
00264 20 C119-TAX-ACCT-SUPER-TITLE-M PIC X(40) DTSIC119
|
|
00265 VALUE 'Tax Accounting Supervisor '. DTSIC119
|
|
00266 20 C119-TAX-ACCT-EMAIL-M PIC X(40) DTSIC119
|
|
00267 VALUE ' '. DTSIC119
|
|
00268 15 C119-TAX-ACCT-TEL. DTSIC119
|
|
00269 20 C119-TAX-ACCT-VOICE PIC X(15) DTSIC119
|
|
00270 VALUE '2026987550 '. DTSIC119
|
|
00271 20 C119-TAX-ACCT-FAX PIC X(15) DTSIC119
|
|
00272 VALUE '2026985706 '. DTSIC119
|
|
00273 20 C119-TAX-ACCT-MODEM PIC X(15) DTSIC119
|
|
00274 VALUE ' '. DTSIC119
|
|
00275 20 C119-TAX-ACCT-TDD PIC X(15) DTSIC119
|
|
00276 VALUE ' '. DTSIC119
|
|
00277 DTSIC119
|
|
00278 10 C119-COLL-UNIT. DTSIC119
|
|
00279 15 C119-COLL-CAPS. DTSIC119
|
|
00280 20 C119-COLL-NAME-C PIC X(40) DTSIC119
|
|
00281 VALUE 'ENFORCEMENT UNIT '. DTSIC119
|
|
00282 20 C119-COLL-SUPER-NAME-C PIC X(40) DTSIC119
|
|
00283 VALUE 'RYAN MOORE-LEE '. CL*42
|
|
00284 20 C119-COLL-SUPER-TITLE-C PIC X(40) DTSIC119
|
|
00285 VALUE 'ENFORCEMENT SUPERVISOR '. DTSIC119
|
|
00286 20 C119-COLL-EMAIL-C PIC X(40) DTSIC119
|
|
00287 VALUE ' '. DTSIC119
|
|
00288 15 C119-COLL-MIXED. DTSIC119
|
|
00289 20 C119-COLL-NAME-M PIC X(40) DTSIC119
|
|
00290 VALUE 'Enforcement Unit '. DTSIC119
|
|
00291 20 C119-COLL-SUPER-NAME-M PIC X(40) DTSIC119
|
|
00292 VALUE 'Ryan Moore-Lee '. CL*42
|
|
00293 20 C119-COLL-SUPER-TITLE-M PIC X(40) DTSIC119
|
|
00294 VALUE 'Enforcement Supervisor '. DTSIC119
|
|
00295 20 C119-COLL-EMAIL-M PIC X(40) DTSIC119
|
|
00296 VALUE ' '. DTSIC119
|
|
00297 15 C119-COLL-TEL. DTSIC119
|
|
00298 20 C119-COLL-VOICE PIC X(15) DTSIC119
|
|
00299 VALUE '2026987550 '. DTSIC119
|
|
00300 20 C119-COLL-FAX PIC X(15) DTSIC119
|
|
00301 VALUE '2026985706 '. DTSIC119
|
|
00302 20 C119-COLL-MODEM PIC X(15) DTSIC119
|
|
00303 VALUE ' '. DTSIC119
|
|
00304 20 C119-COLL-TDD PIC X(15) DTSIC119
|
|
00305 VALUE ' '. DTSIC119
|
|
00306 DTSIC119
|
|
00307 10 C119-FLD-SUPP-UNIT. DTSIC119
|
|
00308 15 C119-FLD-SUPP-CAPS. DTSIC119
|
|
00309 20 C119-FLD-SUPP-NAME-C PIC X(40) DTSIC119
|
|
00310 VALUE 'FIELD UNIT '. DTSIC119
|
|
00311 20 C119-FLD-SUPP-SUPER-NAME-C PIC X(40) DTSIC119
|
|
00312 VALUE 'RYAN MOORE-LEE '. CL*42
|
|
00313 20 C119-FLD-SUPP-SUPER-TITLE-C PIC X(40) DTSIC119
|
|
00314 VALUE 'FIELD SUPERVISOR '. DTSIC119
|
|
00315 20 C119-FLD-SUPP-EMAIL-C PIC X(40) DTSIC119
|
|
00316 VALUE ' '. DTSIC119
|
|
00317 15 C119-FLD-SUPP-MIXED. DTSIC119
|
|
00318 20 C119-FLD-SUPP-NAME-M PIC X(40) DTSIC119
|
|
00319 VALUE 'Field Unit '. DTSIC119
|
|
00320 20 C119-FLD-SUPP-SUPER-NAME-M PIC X(40) DTSIC119
|
|
00321 VALUE 'Ryan Moore-Lee '. CL*42
|
|
00322 20 C119-FLD-SUPP-SUPER-TITLE-M PIC X(40) DTSIC119
|
|
00323 VALUE 'Field Supervisor '. DTSIC119
|
|
00324 20 C119-FLD-SUPP-EMAIL-M PIC X(40) DTSIC119
|
|
00325 VALUE ' '. DTSIC119
|
|
00326 15 C119-FLD-SUPP-TEL. DTSIC119
|
|
00327 20 C119-FLD-SUPP-VOICE PIC X(15) DTSIC119
|
|
00328 VALUE '2026987550 '. DTSIC119
|
|
00329 20 C119-FLD-SUPP-FAX PIC X(15) DTSIC119
|
|
00330 VALUE '2026985706 '. DTSIC119
|
|
00331 20 C119-FLD-SUPP-MODEM PIC X(15) DTSIC119
|
|
00332 VALUE ' '. DTSIC119
|
|
00333 20 C119-FLD-SUPP-TDD PIC X(15) DTSIC119
|
|
00334 VALUE ' '. DTSIC119
|
|
00335 DTSIC119
|
|
00336 10 C119-RQC-TPL-UNIT. DTSIC119
|
|
00337 15 C119-RQC-TPL-CAPS. DTSIC119
|
|
00338 20 C119-RQC-TPL-NAME-C PIC X(40) DTSIC119
|
|
00339 VALUE 'RQC/TPL UNIT '. DTSIC119
|
|
00340 20 C119-RQC-TPL-SUPER-NAME-C PIC X(40) DTSIC119
|
|
00341 VALUE 'GERALD SMART '. CL*42
|
|
00342 20 C119-RQC-TPL-SUPER-TITLE-C PIC X(40) DTSIC119
|
|
00343 VALUE 'RQC/TPL COORDINATOR '. DTSIC119
|
|
00344 20 C119-RQC-TPL-EMAIL-C PIC X(40) DTSIC119
|
|
00345 VALUE ' '. DTSIC119
|
|
00346 15 C119-RQC-TPL-MIXED. DTSIC119
|
|
00347 20 C119-RQC-TPL-NAME-M PIC X(40) DTSIC119
|
|
00348 VALUE 'RQC/TPL Unit '. DTSIC119
|
|
00349 20 C119-RQC-TPL-SUPER-NAME-M PIC X(40) DTSIC119
|
|
00350 VALUE 'Gerald Smart '. CL*42
|
|
00351 20 C119-RQC-TPL-SUPER-TITLE-M PIC X(40) DTSIC119
|
|
00352 VALUE 'RQC/TPL Coordinator '. DTSIC119
|
|
00353 20 C119-RQC-TPL-EMAIL-M PIC X(40) DTSIC119
|
|
00354 VALUE ' '. DTSIC119
|
|
00355 15 C119-RQC-TPL-TEL. DTSIC119
|
|
00356 20 C119-RQC-TPL-VOICE PIC X(15) DTSIC119
|
|
00357 VALUE '2026983565 '. DTSIC119
|
|
00358 20 C119-RQC-TPL-FAX PIC X(15) DTSIC119
|
|
00359 VALUE '2026985706 '. DTSIC119
|
|
00360 20 C119-RQC-TPL-MODEM PIC X(15) DTSIC119
|
|
00361 VALUE ' '. DTSIC119
|
|
00362 20 C119-RQC-TPL-TDD PIC X(15) DTSIC119
|
|
00363 VALUE ' '. DTSIC119
|
|
00364 DTSIC119
|
|
00365 10 C119-FUTA-UNIT. DTSIC119
|
|
00366 15 C119-FUTA-CAPS. DTSIC119
|
|
00367 20 C119-FUTA-NAME-C PIC X(40) DTSIC119
|
|
00368 VALUE 'FUTA CERTIFICATION UNIT '. DTSIC119
|
|
00369 20 C119-FUTA-SUPER-NAME-C PIC X(40) DTSIC119
|
|
00370 VALUE 'GERALD SMART '. CL*42
|
|
00371 20 C119-FUTA-SUPER-TITLE-C PIC X(40) DTSIC119
|
|
00372 VALUE 'FUTA CERTIFICATION SUPERVISOR '. DTSIC119
|
|
00373 20 C119-FUTA-EMAIL-C PIC X(40) DTSIC119
|
|
00374 VALUE ' '. DTSIC119
|
|
00375 15 C119-FUTA-MIXED. DTSIC119
|
|
00376 20 C119-FUTA-NAME-M PIC X(40) DTSIC119
|
|
00377 VALUE 'FUTA Certification Unit '. DTSIC119
|
|
00378 20 C119-FUTA-SUPER-NAME-M PIC X(40) DTSIC119
|
|
00379 VALUE 'Gerald Smart '. CL*42
|
|
00380 20 C119-FUTA-SUPER-TITLE-M PIC X(40) DTSIC119
|
|
00381 VALUE 'FUTA Certification Supervisor '. DTSIC119
|
|
00382 20 C119-FUTA-EMAIL-M PIC X(40) DTSIC119
|
|
00383 VALUE ' '. DTSIC119
|
|
00384 15 C119-FUTA-TEL. DTSIC119
|
|
00385 20 C119-FUTA-VOICE PIC X(15) DTSIC119
|
|
00386 VALUE '2026987550 '. DTSIC119
|
|
00387 20 C119-FUTA-FAX PIC X(15) DTSIC119
|
|
00388 VALUE '2026985706 '. DTSIC119
|
|
00389 20 C119-FUTA-MODEM PIC X(15) DTSIC119
|
|
00390 VALUE ' '. DTSIC119
|
|
00391 20 C119-FUTA-TDD PIC X(15) DTSIC119
|
|
00392 VALUE ' '. DTSIC119
|