Screen18, screen 13, and screen L1 are fixed.

This commit is contained in:
faizana
2025-09-13 06:24:12 -04:00
parent f4842b4a6f
commit c59b4762c2
6 changed files with 887 additions and 938 deletions

View File

@ -1305,11 +1305,14 @@
01304 SKIP1 DTSCS18 01304 SKIP1 DTSCS18
01305 IF CURSOR-SET-GOTO DTSCS18 01305 IF CURSOR-SET-GOTO DTSCS18
01306 MOVE CATB-CURSOR TO MAP-GOTO-L DTSCS18 01306 MOVE CATB-CURSOR TO MAP-GOTO-L DTSCS18
RCODE MOVE CATB-UNPROT-BRT-NUM-MDTON TO MAP-GOTO-A
01307 ELSE DTSCS18 01307 ELSE DTSCS18
01308 IF CURSOR-SET-LINE-NUMBER DTSCS18 01308 IF CURSOR-SET-LINE-NUMBER DTSCS18
01309 MOVE CATB-CURSOR TO MAP-LINE-NUMBER-L DTSCS18 01309 MOVE CATB-CURSOR TO MAP-LINE-NUMBER-L DTSCS18
RCODE MOVE CATB-UNPROT-BRT-NUM-MDTON TO MAP-LINE-NUMBER-A
01310 ELSE DTSCS18 01310 ELSE DTSCS18
01311 MOVE CATB-CURSOR TO MAP-EMP-NO-1-L. DTSCS18 01311 MOVE CATB-CURSOR TO MAP-EMP-NO-1-L DTSCS18
RCODE MOVE CATB-UNPROT-BRT-NUM-MDTON TO MAP-EMP-NO-1-A.
01312 SKIP1 DTSCS18 01312 SKIP1 DTSCS18
01313 SET L851-SEND-DATAONLY-88 TO TRUE. DTSCS18 01313 SET L851-SEND-DATAONLY-88 TO TRUE. DTSCS18
01314 SKIP1 DTSCS18 01314 SKIP1 DTSCS18

File diff suppressed because it is too large Load Diff

View File

@ -1,4 +1,4 @@
E:\Faizan_Folder\DUTAS_DEV_UPDATE\DUTAS\CICS\DTSCS26.cob E:\Faizan_Folder\DUTAS_DEV_UPDATE\DUTAS\CICS\DTSCSL1.cob

View File

@ -1,285 +1,270 @@
* DATA SET DTSML1 AT LEVEL 014 AS OF 09/22/06 * DATA SET DTSML1 AT LEVEL 012 AS OF 07/19/99
* DATA SET DTSML1 AT LEVEL 003 AS OF 09/21/06 00001 DTSML1 DFHMDI SIZE=(24,80), X00001**3
* DATA SET DTSML1 AT LEVEL 012 AS OF 07/19/99 00002 LINE=01, X00002
DTSML1 DFHMDI SIZE=(24,80), X00003 COLUMN=01 00003
LINE=01, X00004 FL10101 DFHMDF POS=(01,01), X00004**4
COLUMN=01 00005 ATTRB=(ASKIP,FSET), X00005
FL10101 DFHMDF POS=(01,01), X00006 LENGTH=002, X00006
ATTRB=(ASKIP,FSET), X00007 INITIAL='L1' 00007**7
LENGTH=002, X00008 DFHMDF POS=(01,20), X00008
INITIAL='L1' 00009 ATTRB=(ASKIP), X00009
DFHMDF POS=(01,20), X00010 LENGTH=020, X00010
ATTRB=(ASKIP), X00011 INITIAL=' LMI INQUIRY/UPDATE ' 00011**8
LENGTH=020, X00012 FL10162 DFHMDF POS=(01,62), X00012**4
INITIAL=' LMI INQUIRY/UPDATE ' 00013 ATTRB=(ASKIP), X00013
FL10162 DFHMDF POS=(01,62), X00014 LENGTH=008 00014
ATTRB=(ASKIP), X00015 FL10172 DFHMDF POS=(01,72), X00015**4
LENGTH=008 00016 ATTRB=(ASKIP), X00016
FL10172 DFHMDF POS=(01,72), X00017 LENGTH=008 00017
ATTRB=(ASKIP), X00018 FL10272 DFHMDF POS=(02,72), X00018**4
LENGTH=008 00019 ATTRB=(ASKIP), X00019
FL10272 DFHMDF POS=(02,72), X00020 LENGTH=008 00020
ATTRB=(ASKIP), X00021 DFHMDF POS=(03,05), X00021
LENGTH=008 00022 ATTRB=(ASKIP), X00022
DFHMDF POS=(03,05), X00023 LENGTH=007, X00023
ATTRB=(ASKIP), X00024 INITIAL='EMP NO:' 00024
LENGTH=007, X00025 FL10313 DFHMDF POS=(03,13), X00025**4
INITIAL='EMP NO:' 00026 ATTRB=(ASKIP), X00026
FL10313 DFHMDF POS=(03,13), X00027 LENGTH=003 00027
ATTRB=(ASKIP), X00028 FL10317 DFHMDF POS=(03,17), X00028**4
LENGTH=003 00029 ATTRB=(ASKIP), X00029
FL10317 DFHMDF POS=(03,17), X00030 LENGTH=003 00030
ATTRB=(ASKIP), X00031 DFHMDF POS=(03,21), X00031
LENGTH=003 00032 ATTRB=(ASKIP), X00032
DFHMDF POS=(03,21), X00033 LENGTH=001 00033
ATTRB=(ASKIP), X00034 FL10324 DFHMDF POS=(03,24), X00034**4
LENGTH=001 00035 ATTRB=(ASKIP), X00035
FL10324 DFHMDF POS=(03,24), X00036 LENGTH=040 00036
ATTRB=(ASKIP), X00037 FL10372 DFHMDF POS=(03,72), X00037**4
LENGTH=040 00038 ATTRB=(ASKIP), X00038
FL10372 DFHMDF POS=(03,72), X00039 LENGTH=002 00039
ATTRB=(ASKIP), X00040 DFHMDF POS=(03,75), X00040
LENGTH=002 00041 ATTRB=(ASKIP), X00041
DFHMDF POS=(03,75), X00042 LENGTH=002, X00042
ATTRB=(ASKIP), X00043 INITIAL='OF' 00043
LENGTH=002, X00044 FL10378 DFHMDF POS=(03,78), X00044**4
INITIAL='OF' 00045 ATTRB=(ASKIP), X00045
FL10378 DFHMDF POS=(03,78), X00046 LENGTH=002 00046
ATTRB=(ASKIP), X00047 DFHMDF POS=(05,16), X00047
LENGTH=002 00048 ATTRB=(ASKIP), X00048
DFHMDF POS=(05,16), X00049 LENGTH=004, X00049
ATTRB=(ASKIP), X00050 INITIAL='QTR:' 00050
LENGTH=004, X00051 FL10521 DFHMDF POS=(05,21), X00051**4
INITIAL='QTR:' 00052 ATTRB=(ASKIP), X00052
FL10521 DFHMDF POS=(05,21), X00053 LENGTH=002 00053
ATTRB=(ASKIP), X00054 FL10524 DFHMDF POS=(05,24), X00054**4
LENGTH=002 00055 ATTRB=(ASKIP), X00055
FL10524 DFHMDF POS=(05,24), X00056 LENGTH=001 00056
ATTRB=(ASKIP), X00057 DFHMDF POS=(05,26), X00057
LENGTH=001 00058 ATTRB=(ASKIP), X00058
DFHMDF POS=(05,26), X00059 LENGTH=001 00059
ATTRB=(ASKIP), X00060 DFHMDF POS=(07,04), X00060
LENGTH=001 00061 ATTRB=(ASKIP), X00061
DFHMDF POS=(07,04), X00062 LENGTH=016, X00062
ATTRB=(ASKIP), X00063 INITIAL='MONTH 1 EMP CNT:' 00063
LENGTH=016, X00064 FL10721 DFHMDF POS=(07,21), X00064**4
INITIAL='MONTH 1 EMP CNT:' 00065 ATTRB=(ASKIP), X00065
FL10721 DFHMDF POS=(07,21), X00066 LENGTH=009 00066*12
ATTRB=(ASKIP), X00067 DFHMDF POS=(07,31), X00067*12
LENGTH=009 00068 ATTRB=(ASKIP), X00068
DFHMDF POS=(07,31), X00069 LENGTH=001 00069
ATTRB=(ASKIP), X00070 DFHMDF POS=(07,42), X00070
LENGTH=001 00071 ATTRB=(ASKIP), X00071
DFHMDF POS=(07,42), X00072 LENGTH=009, X00072
ATTRB=(ASKIP), X00073 INITIAL='TOT WAGE:' 00073
LENGTH=009, X00074 FL10752 DFHMDF POS=(07,52), X00074**4
INITIAL='TOT WAGE:' 00075 ATTRB=(ASKIP), X00075
FL10752 DFHMDF POS=(07,52), X00076 LENGTH=014 00076
ATTRB=(ASKIP), X00077 DFHMDF POS=(08,04), X00077
LENGTH=014 00078 ATTRB=(ASKIP), X00078
DFHMDF POS=(08,04), X00079 LENGTH=016, X00079
ATTRB=(ASKIP), X00080 INITIAL='MONTH 2 EMP CNT:' 00080
LENGTH=016, X00081 FL10821 DFHMDF POS=(08,21), X00081**4
INITIAL='MONTH 2 EMP CNT:' 00082 ATTRB=(ASKIP), X00082
FL10821 DFHMDF POS=(08,21), X00083 LENGTH=009 00083*12
ATTRB=(ASKIP), X00084 DFHMDF POS=(08,31), X00084*12
LENGTH=009 00085 ATTRB=(ASKIP), X00085
DFHMDF POS=(08,31), X00086 LENGTH=001 00086
ATTRB=(ASKIP), X00087 DFHMDF POS=(08,42), X00087
LENGTH=001 00088 ATTRB=(ASKIP), X00088
DFHMDF POS=(08,42), X00089 LENGTH=009, X00089
ATTRB=(ASKIP), X00090 INITIAL='TAX WAGE:' 00090
LENGTH=009, X00091 FL10852 DFHMDF POS=(08,52), X00091**4
INITIAL='TAX WAGE:' 00092 ATTRB=(ASKIP), X00092
FL10852 DFHMDF POS=(08,52), X00093 LENGTH=014 00093
ATTRB=(ASKIP), X00094 DFHMDF POS=(09,04), X00094
LENGTH=014 00095 ATTRB=(ASKIP), X00095
DFHMDF POS=(09,04), X00096 LENGTH=016, X00096
ATTRB=(ASKIP), X00097 INITIAL='MONTH 3 EMP CNT:' 00097
LENGTH=016, X00098 FL10921 DFHMDF POS=(09,21), X00098**4
INITIAL='MONTH 3 EMP CNT:' 00099 ATTRB=(ASKIP), X00099
FL10921 DFHMDF POS=(09,21), X00100 LENGTH=009 00100*12
ATTRB=(ASKIP), X00101 DFHMDF POS=(09,31), X00101*12
LENGTH=009 00102 ATTRB=(ASKIP), X00102
DFHMDF POS=(09,31), X00103 LENGTH=001 00103
ATTRB=(ASKIP), X00104 DFHMDF POS=(09,42), X00104
LENGTH=001 00105 ATTRB=(ASKIP), X00105
DFHMDF POS=(09,42), X00106 LENGTH=009, X00106
ATTRB=(ASKIP), X00107 INITIAL='WGE CHNG:' 00107
LENGTH=009, X00108 FL10952 DFHMDF POS=(09,52), X00108**4
INITIAL='WGE CHNG:' 00109 ATTRB=(ASKIP), X00109
FL10952 DFHMDF POS=(09,52), X00110 LENGTH=008 00110
ATTRB=(ASKIP), X00111 DFHMDF POS=(10,42), X00111
LENGTH=008 00112 ATTRB=(ASKIP), X00112
DFHMDF POS=(10,42), X00113 LENGTH=009, X00113
ATTRB=(ASKIP), X00114 INITIAL='RPT TYPE:' 00114
LENGTH=009, X00115 FL11052 DFHMDF POS=(10,52), X00115**4
INITIAL='RPT TYPE:' 00116 ATTRB=(ASKIP), X00116
FL11052 DFHMDF POS=(10,52), X00117 LENGTH=010 00117
ATTRB=(ASKIP), X00118 DFHMDF POS=(11,42), X00118
LENGTH=010 00119 ATTRB=(ASKIP), X00119
DFHMDF POS=(11,42), X00120 LENGTH=009, X00120
ATTRB=(ASKIP), X00121 INITIAL='CNT CHNG:' 00121
LENGTH=009, X00122 FL11152 DFHMDF POS=(11,52), X00122**4
INITIAL='CNT CHNG:' 00123 ATTRB=(ASKIP), X00123
FL11152 DFHMDF POS=(11,52), X00124 LENGTH=008 00124
ATTRB=(ASKIP), X00125 DFHMDF POS=(13,08), X00125**5
LENGTH=008 00126 ATTRB=(ASKIP), X00126
DFHMDF POS=(13,08), X00127 LENGTH=007, X00127
ATTRB=(ASKIP), X00128 INITIAL='SIC CD:' 00128
LENGTH=007, X00129 FL11310 DFHMDF POS=(13,16), X00129**6
INITIAL='SIC CD:' 00130 ATTRB=(ASKIP), X00130
FL11310 DFHMDF POS=(13,16), X00131 LENGTH=004 00131**5
ATTRB=(ASKIP), X00132 DFHMDF POS=(13,21), X00132**5
LENGTH=004 00133 ATTRB=(ASKIP), X00133
DFHMDF POS=(13,21), X00134 LENGTH=001 00134
ATTRB=(ASKIP), X00135 FL11320 DFHMDF POS=(13,25), X00135**6
LENGTH=001 00136 ATTRB=(ASKIP), X00136
FL11320 DFHMDF POS=(13,25), X00137 LENGTH=020 00137
ATTRB=(ASKIP), X00138 DFHMDF POS=(13,49), X00138**5
LENGTH=020 00139 ATTRB=(ASKIP), X00139
DFHMDF POS=(13,49), X00140 LENGTH=008, X00140
ATTRB=(ASKIP), X00141 INITIAL='OLD SIC:' 00141
LENGTH=008, X00142 FL11355 DFHMDF POS=(13,58), X00142**6
INITIAL='OLD SIC:' 00143 ATTRB=(ASKIP), X00143
FL11355 DFHMDF POS=(13,58), X00144 LENGTH=004 00144**5
ATTRB=(ASKIP), X00145 DFHMDF POS=(13,65), X00145**5
LENGTH=004 00146 ATTRB=(ASKIP), X00146
DFHMDF POS=(13,65), X00147 LENGTH=005, X00147
ATTRB=(ASKIP), X00148 INITIAL='CHNG:' 00148
LENGTH=005, X00149 FL11371 DFHMDF POS=(13,71), X00149**6
INITIAL='CHNG:' 00150 ATTRB=(ASKIP), X00150
FL11371 DFHMDF POS=(13,71), X00151 LENGTH=008 00151
ATTRB=(ASKIP), X00152 DFHMDF POS=(15,04), X00152*10
LENGTH=008 00153 ATTRB=(ASKIP), X00153**5
DFHMDF POS=(15,04), X00154 LENGTH=011, X00154*10
ATTRB=(ASKIP), X00155 INITIAL='SIC AUX CD:' 00155*10
LENGTH=011, X00156 FL11516 DFHMDF POS=(15,16), X00156*10
INITIAL='SIC AUX CD:' 00157 ATTRB=(ASKIP), X00157**5
FL11516 DFHMDF POS=(15,16), X00158 LENGTH=001 00158**5
ATTRB=(ASKIP), X00159 DFHMDF POS=(15,18), X00159*10
LENGTH=001 00160 ATTRB=(ASKIP), X00160**5
DFHMDF POS=(15,18), X00161 LENGTH=001 00161**5
ATTRB=(ASKIP), X00162 FL11525 DFHMDF POS=(15,25), X00162*10
LENGTH=001 00163 ATTRB=(ASKIP), X00163**5
FL11525 DFHMDF POS=(15,25), X00164 LENGTH=010 00164**5
ATTRB=(ASKIP), X00165 DFHMDF POS=(17,06), X00165*10
LENGTH=010 00166 ATTRB=(ASKIP), X00166*10
DFHMDF POS=(17,06), X00167 LENGTH=009, X00167*10
ATTRB=(ASKIP), X00168 INITIAL='NAICS CD:' 00168*10
LENGTH=009, X00169 FL11716 DFHMDF POS=(17,16), X00169*10
INITIAL='NAICS CD:' 00170 ATTRB=(ASKIP), X00170*11
FL11716 DFHMDF POS=(17,16), X00171 LENGTH=006 00171*10
ATTRB=(ASKIP), X00172 DFHMDF POS=(17,23), X00172*10
LENGTH=006 00173 ATTRB=(ASKIP), X00173*10
DFHMDF POS=(17,23), X00174 LENGTH=001 00174*10
ATTRB=(ASKIP), X00175 FL11725 DFHMDF POS=(17,25), X00175*10
LENGTH=001 00176 ATTRB=(ASKIP), X00176*10
FL11725 DFHMDF POS=(17,25), X00177 LENGTH=020 00177*10
ATTRB=(ASKIP), X00178 DFHMDF POS=(17,47), X00178*10
LENGTH=020 00179 ATTRB=(ASKIP), X00179*10
DFHMDF POS=(17,47), X00180 LENGTH=010, X00180*10
ATTRB=(ASKIP), X00181 INITIAL='OLD NAICS:' 00181*10
LENGTH=010, X00182 FL11758 DFHMDF POS=(17,58), X00182*10
INITIAL='OLD NAICS:' 00183 ATTRB=(ASKIP), X00183*10
FL11758 DFHMDF POS=(17,58), X00184 LENGTH=006 00184*10
ATTRB=(ASKIP), X00185 DFHMDF POS=(17,65), X00185*10
LENGTH=006 00186 ATTRB=(ASKIP), X00186*10
DFHMDF POS=(17,65), X00187 LENGTH=005, X00187*10
ATTRB=(ASKIP), X00188 INITIAL='CHNG:' 00188*10
LENGTH=005, X00189 FL11771 DFHMDF POS=(17,71), X00189*10
INITIAL='CHNG:' 00190 ATTRB=(ASKIP), X00190*10
FL11771 DFHMDF POS=(17,71), X00191 LENGTH=008 00191*10
ATTRB=(ASKIP), X00192 DFHMDF POS=(19,08), X00192**5
LENGTH=008 00193 ATTRB=(ASKIP), X00193**5
DFHMDF POS=(18,05), X00194 LENGTH=007, X00194**5
ATTRB=(ASKIP), X00195 INITIAL='OWN CD:' 00195**5
LENGTH=010, X00196 FL11910 DFHMDF POS=(19,16), X00196**6
INITIAL='ALT NAICS:' 00197 ATTRB=(ASKIP), X00197**5
FL11816 DFHMDF POS=(18,16), X00198 LENGTH=002 00198**5
ATTRB=(ASKIP), X00199 DFHMDF POS=(19,19), X00199**5
LENGTH=006 00200 ATTRB=(ASKIP), X00200**5
DFHMDF POS=(18,23), X00201 LENGTH=001 00201**5
ATTRB=(ASKIP), X00202 FL11920 DFHMDF POS=(19,25), X00202**6
LENGTH=001 00203 ATTRB=(ASKIP), X00203**5
FL11825 DFHMDF POS=(18,25), X00204 LENGTH=010 00204**5
ATTRB=(ASKIP), X00205 DFHMDF POS=(19,49), X00205**5
LENGTH=020 00206 ATTRB=(ASKIP), X00206**5
DFHMDF POS=(19,08), X00207 LENGTH=008, X00207**5
ATTRB=(ASKIP), X00208 INITIAL='OLD OWN:' 00208**5
LENGTH=007, X00209 FL11955 DFHMDF POS=(19,58), X00209**6
INITIAL='OWN CD:' 00210 ATTRB=(ASKIP), X00210**5
FL11910 DFHMDF POS=(19,16), X00211 LENGTH=002 00211**5
ATTRB=(ASKIP), X00212 DFHMDF POS=(19,65), X00212**5
LENGTH=002 00213 ATTRB=(ASKIP), X00213**5
DFHMDF POS=(19,19), X00214 LENGTH=005, X00214**5
ATTRB=(ASKIP), X00215 INITIAL='CHNG:' 00215**5
LENGTH=001 00216 FL11971 DFHMDF POS=(19,71), X00216**6
FL11920 DFHMDF POS=(19,25), X00217 ATTRB=(ASKIP), X00217**5
ATTRB=(ASKIP), X00218 LENGTH=008 00218**5
LENGTH=010 00219 DFHMDF POS=(21,05), X00219**6
DFHMDF POS=(19,49), X00220 ATTRB=(ASKIP), X00220**5
ATTRB=(ASKIP), X00221 LENGTH=010, X00221**6
LENGTH=008, X00222 INITIAL='MULTI IND:' 00222**6
INITIAL='OLD OWN:' 00223 FL12110 DFHMDF POS=(21,16), X00223**6
FL11955 DFHMDF POS=(19,58), X00224 ATTRB=(ASKIP), X00224**5
ATTRB=(ASKIP), X00225 LENGTH=001 00225**6
LENGTH=002 00226 DFHMDF POS=(21,18), X00226**6
DFHMDF POS=(19,65), X00227 ATTRB=(ASKIP), X00227**5
ATTRB=(ASKIP), X00228 LENGTH=001 00228**5
LENGTH=005, X00229 FL12120 DFHMDF POS=(21,25), X00229**6
INITIAL='CHNG:' 00230 ATTRB=(ASKIP), X00230**5
FL11971 DFHMDF POS=(19,71), X00231 LENGTH=010 00231**5
ATTRB=(ASKIP), X00232 DFHMDF POS=(21,49), X00232**6
LENGTH=008 00233 ATTRB=(ASKIP), X00233**5
DFHMDF POS=(21,05), X00234 LENGTH=008, X00234**5
ATTRB=(ASKIP), X00235 INITIAL='WARD CD:' 00235**6
LENGTH=010, X00236 FL12155 DFHMDF POS=(21,58), X00236**6
INITIAL='MULTI IND:' 00237 ATTRB=(ASKIP), X00237**5
FL12110 DFHMDF POS=(21,16), X00238 LENGTH=002 00238**9
ATTRB=(ASKIP), X00239 FL12312 DFHMDF POS=(23,12), X00239**4
LENGTH=001 00240 ATTRB=(ASKIP), X00240
DFHMDF POS=(21,18), X00241 LENGTH=008 00241
ATTRB=(ASKIP), X00242 FL12322 DFHMDF POS=(23,22), X00242**4
LENGTH=001 00243 ATTRB=(ASKIP), X00243
FL12120 DFHMDF POS=(21,25), X00244 LENGTH=007 00244
ATTRB=(ASKIP), X00245 FL12331 DFHMDF POS=(23,31), X00245**4
LENGTH=010 00246 ATTRB=(ASKIP), X00246
DFHMDF POS=(21,49), X00247 LENGTH=007 00247
ATTRB=(ASKIP), X00248 FL12340 DFHMDF POS=(23,40), X00248**4
LENGTH=008, X00249 ATTRB=(ASKIP), X00249
INITIAL='WARD CD:' 00250 LENGTH=007 00250
FL12155 DFHMDF POS=(21,58), X00251 FL12350 DFHMDF POS=(23,50), X00251**4
ATTRB=(ASKIP), X00252 ATTRB=(ASKIP), X00252
LENGTH=002 00253 LENGTH=007 00253
FL12312 DFHMDF POS=(23,12), X00254 FL12401 DFHMDF POS=(24,01), X00254**4
ATTRB=(ASKIP), X00255 ATTRB=(ASKIP), X00255
LENGTH=008 00256 LENGTH=008 00256
FL12322 DFHMDF POS=(23,22), X00257 FL12410 DFHMDF POS=(24,10), X00257**4
ATTRB=(ASKIP), X00258 ATTRB=(ASKIP), X00258
LENGTH=007 00259 LENGTH=058 00259
FL12331 DFHMDF POS=(23,31), X00260 DFHMDF POS=(24,69), X00260
ATTRB=(ASKIP), X00261 ATTRB=(ASKIP), X00261
LENGTH=007 00262 LENGTH=006, X00262
FL12340 DFHMDF POS=(23,40), X00263 INITIAL='GO TO:' 00263
ATTRB=(ASKIP), X00264 FL12476 DFHMDF POS=(24,76), X00264**4
LENGTH=007 00265 ATTRB=(ASKIP), X00265
FL12350 DFHMDF POS=(23,50), X00266 LENGTH=002 00266
ATTRB=(ASKIP), X00267 DFHMDF POS=(24,79), X00267
LENGTH=007 00268 ATTRB=(ASKIP), X00268
FL12401 DFHMDF POS=(24,01), X00269 LENGTH=001 00269
ATTRB=(ASKIP), X00270
LENGTH=008 00271
FL12410 DFHMDF POS=(24,10), X00272
ATTRB=(ASKIP), X00273
LENGTH=058 00274
DFHMDF POS=(24,69), X00275
ATTRB=(ASKIP), X00276
LENGTH=006, X00277
INITIAL='GO TO:' 00278
FL12476 DFHMDF POS=(24,76), X00279
ATTRB=(ASKIP), X00280
LENGTH=002 00281
DFHMDF POS=(24,79), X00282
ATTRB=(ASKIP), X00283
LENGTH=001 00284

View File

@ -29677,16 +29677,6 @@
02 FILLER REDEFINES FL11771F. 02 FILLER REDEFINES FL11771F.
04 FL11771A PIC X. 04 FL11771A PIC X.
02 FL11771I PIC X(8). 02 FL11771I PIC X(8).
02 FL11816L PIC S9(4) COMP-5.
02 FL11816F PIC X(1).
02 FILLER REDEFINES FL11816F.
04 FL11816A PIC X.
02 FL11816I PIC X(6).
02 FL11825L PIC S9(4) COMP-5.
02 FL11825F PIC X(1).
02 FILLER REDEFINES FL11825F.
04 FL11825A PIC X.
02 FL11825I PIC X(20).
02 FL11910L PIC S9(4) COMP-5. 02 FL11910L PIC S9(4) COMP-5.
02 FL11910F PIC X(1). 02 FL11910F PIC X(1).
02 FILLER REDEFINES FL11910F. 02 FILLER REDEFINES FL11910F.
@ -29823,10 +29813,6 @@
02 FILLER PIC X(3). 02 FILLER PIC X(3).
02 FL11771O PIC X(8). 02 FL11771O PIC X(8).
02 FILLER PIC X(3). 02 FILLER PIC X(3).
02 FL11816O PIC X(6).
02 FILLER PIC X(3).
02 FL11825O PIC X(20).
02 FILLER PIC X(3).
02 FL11910O PIC X(2). 02 FL11910O PIC X(2).
02 FILLER PIC X(3). 02 FILLER PIC X(3).
02 FL11920O PIC X(10). 02 FL11920O PIC X(10).

View File

@ -85284,51 +85284,6 @@
Intensity="NORM" Intensity="NORM"
/> />
</BMSField> </BMSField>
<BMSField
Length="10"
Initial="ALT NAICS:"
Line="18"
Col="5"
>
<BMSFieldAttributes
Protection="ASKIP"
Intensity="NORM"
/>
</BMSField>
<BMSField
Name="FL11816"
Length="6"
Line="18"
Col="16"
ByteLength="9"
>
<BMSFieldAttributes
Protection="ASKIP"
Intensity="NORM"
/>
</BMSField>
<BMSField
Length="1"
Line="18"
Col="23"
>
<BMSFieldAttributes
Protection="ASKIP"
Intensity="NORM"
/>
</BMSField>
<BMSField
Name="FL11825"
Length="20"
Line="18"
Col="25"
ByteLength="23"
>
<BMSFieldAttributes
Protection="ASKIP"
Intensity="NORM"
/>
</BMSField>
<BMSField <BMSField
Length="7" Length="7"
Initial="OWN CD:" Initial="OWN CD:"