DUTAS re-platformed to Raincode - Initial Source Code
This commit is contained in:
Neeraj Kumar
392
Copybook/DTSIC119.cpy
Normal file
392
Copybook/DTSIC119.cpy
Normal file
@ -0,0 +1,392 @@
|
||||
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
|
||||
Reference in New Issue
Block a user