Files
DUTAS/Maps/DTSM13.bms
2025-07-21 11:20:11 -04:00

322 lines
24 KiB
Plaintext

* DATA SET DTSM13 AT LEVEL 014 AS OF 09/29/04
* DATA SET DTSM13 AT LEVEL 002 AS OF 07/21/04 00001
* DATA SET DTSM13 AT LEVEL 012 AS OF 07/18/00 00002
* DATA SET DTSM13 AT LEVEL 002 AS OF 06/05/00 00003
* DATA SET DTSM13 AT LEVEL 010 AS OF 09/07/99 00004
* DATA SET MACM13 AT LEVEL 010 AS OF 10/30/95 00005
***** 00006
* 00007
* 13 TAX ADDRESS INQUIRY/UPDATE. 00008
* 00009
***** 00010
SPACE 00011
DTSM13 DFHMDI SIZE=(24,80),LINE=1,COLUMN=1 00012
SPACE 00013
F130101 DFHMDF POS=(01,01),LENGTH=02,ATTRB=(FSET,ASKIP), *00014
INITIAL='13' 00015
SPACE 00016
DFHMDF POS=(01,23),LENGTH=26,ATTRB=(ASKIP), *00017
INITIAL='TAX ADDRESS INQUIRY/UPDATE' 00018
SPACE 00019
F130162 DFHMDF POS=(01,62),LENGTH=08,ATTRB=ASKIP 00020
SPACE 00021
F130172 DFHMDF POS=(01,72),LENGTH=08,ATTRB=ASKIP 00022
SPACE 00023
F130272 DFHMDF POS=(02,72),LENGTH=08,ATTRB=ASKIP 00024
SPACE 00025
DFHMDF POS=(03,08),LENGTH=07,ATTRB=ASKIP, *00026
INITIAL='EMP NO:' 00027
SPACE 00028
F130316 DFHMDF POS=(03,16),LENGTH=03,ATTRB=ASKIP 00029
SPACE 00030
F130320 DFHMDF POS=(03,20),LENGTH=03,ATTRB=ASKIP 00031
SPACE 00032
DFHMDF POS=(03,24),LENGTH=01,ATTRB=ASKIP 00033
SPACE 00034
DFHMDF POS=(04,01),LENGTH=14,ATTRB=ASKIP, *00035
INITIAL=' PRIMARY NAME:' 00036
SPACE 00037
F130416 DFHMDF POS=(04,16),LENGTH=40,ATTRB=ASKIP 00038
SPACE 00039
DFHMDF POS=(04,57),LENGTH=01,ATTRB=ASKIP 00040
SPACE 00041
DFHMDF POS=(04,60),LENGTH=12,ATTRB=ASKIP, *00042
INITIAL='ENTITY NAME?' 00043
SPACE 00044
F130465 DFHMDF POS=(04,73),LENGTH=01,ATTRB=ASKIP 00045
SPACE 00046
DFHMDF POS=(04,75),LENGTH=01,ATTRB=ASKIP 00047
SPACE 00048
DFHMDF POS=(05,01),LENGTH=14,ATTRB=ASKIP, *00049
INITIAL=' ENTITY NAME:' 00050
SPACE 00051
F130516 DFHMDF POS=(05,16),LENGTH=40,ATTRB=ASKIP 00052
SPACE 00053
DFHMDF POS=(05,57),LENGTH=01,ATTRB=ASKIP 00054
SPACE 00055
F130609 DFHMDF POS=(06,09),LENGTH=07,ATTRB=(ASKIP) 00056
SPACE 00057
F130617 DFHMDF POS=(06,17),LENGTH=01,ATTRB=(ASKIP) 00058
SPACE 00059
DFHMDF POS=(06,19),LENGTH=01,ATTRB=(ASKIP) 00060
SPACE 00061
DFHMDF POS=(07,09),LENGTH=15,ATTRB=ASKIP, *00062
INITIAL='MAILING ADDRESS' 00063
SPACE 00064
DFHMDF POS=(07,56),LENGTH=13,ATTRB=ASKIP, *00065
INITIAL='FISCAL AGENT:' 00066
SPACE 00067
F130770 DFHMDF POS=(07,70),LENGTH=03,ATTRB=ASKIP 00068
SPACE 00069
DFHMDF POS=(07,74),LENGTH=01,ATTRB=ASKIP 00070
SPACE 00071
DFHMDF POS=(08,01),LENGTH=05,ATTRB=ASKIP, *00072
INITIAL='ATTN:' 00073
SPACE 00074
F130807 DFHMDF POS=(08,07),LENGTH=40,ATTRB=ASKIP 00075
SPACE 00076
DFHMDF POS=(08,48),LENGTH=01,ATTRB=ASKIP 00077
SPACE 00078
DFHMDF POS=(08,56),LENGTH=05,ATTRB=ASKIP, *00079
INITIAL='CASS?' 00080
SPACE 00081
F130862 DFHMDF POS=(08,62),LENGTH=01,ATTRB=ASKIP 00082
SPACE 00083
DFHMDF POS=(08,64),LENGTH=01,ATTRB=ASKIP 00084
SPACE 00085
DFHMDF POS=(09,01),LENGTH=05,ATTRB=ASKIP, *00086
INITIAL='DLV1:' 00087
SPACE 00088
F130907 DFHMDF POS=(09,07),LENGTH=40,ATTRB=ASKIP 00089
SPACE 00090
DFHMDF POS=(09,48),LENGTH=01,ATTRB=ASKIP 00091
SPACE 00092
DFHMDF POS=(09,56),LENGTH=07,ATTRB=ASKIP, *00093
INITIAL='CASS CD' 00094
SPACE 00095
DFHMDF POS=(10,01),LENGTH=05,ATTRB=ASKIP, *00096
INITIAL='DLV2:' 00097
SPACE 00098
F131007 DFHMDF POS=(10,07),LENGTH=40,ATTRB=ASKIP 00099
SPACE 00100
DFHMDF POS=(10,48),LENGTH=01,ATTRB=ASKIP 00101
SPACE 00102
F131054 DFHMDF POS=(10,54),LENGTH=25,ATTRB=ASKIP 00103
SPACE 00104
DFHMDF POS=(11,01),LENGTH=05,ATTRB=ASKIP, *00105
INITIAL='CITY:' 00106
SPACE 00107
F131107 DFHMDF POS=(11,07),LENGTH=25,ATTRB=ASKIP 00108
SPACE 00109
DFHMDF POS=(11,33),LENGTH=01,ATTRB=ASKIP, *00110
INITIAL=':' 00111
SPACE 00112
F131135 DFHMDF POS=(11,35),LENGTH=02,ATTRB=ASKIP 00113
SPACE 00114
DFHMDF POS=(11,38),LENGTH=01,ATTRB=ASKIP, *00115
INITIAL=':' 00116
SPACE 00117
F131140 DFHMDF POS=(11,40),LENGTH=10,ATTRB=ASKIP 00118
SPACE 00119
DFHMDF POS=(11,51),LENGTH=01,ATTRB=ASKIP 00120
SPACE 00121
DFHMDF POS=(12,01),LENGTH=05,ATTRB=ASKIP, *00122
INITIAL='TEL1:' 00123
SPACE 00124
F131207 DFHMDF POS=(12,07),LENGTH=03,ATTRB=ASKIP 00125
SPACE 00126
F131211 DFHMDF POS=(12,11),LENGTH=03,ATTRB=ASKIP 00127
SPACE 00128
F131215 DFHMDF POS=(12,15),LENGTH=04,ATTRB=ASKIP 00129
SPACE 00130
F131320 DFHMDF POS=(12,20),LENGTH=05,ATTRB=ASKIP 00131
SPACE 00132
DFHMDF POS=(12,26),LENGTH=01,ATTRB=ASKIP 00133
SPACE 00134
DFHMDF POS=(12,29),LENGTH=05,ATTRB=ASKIP, *00135
INITIAL='TEL2:' 00136
SPACE 00137
F131235 DFHMDF POS=(12,35),LENGTH=03,ATTRB=ASKIP 00138
SPACE 00139
F131239 DFHMDF POS=(12,39),LENGTH=03,ATTRB=ASKIP 00140
SPACE 00141
F131243 DFHMDF POS=(12,43),LENGTH=04,ATTRB=ASKIP 00142
SPACE 00143
F131248 DFHMDF POS=(12,48),LENGTH=05,ATTRB=ASKIP 00144
SPACE 00145
DFHMDF POS=(12,54),LENGTH=01,ATTRB=ASKIP 00146
SPACE 00147
DFHMDF POS=(12,57),LENGTH=04,ATTRB=ASKIP, *00148
INITIAL='FAX:' 00149
SPACE 00150
F131262 DFHMDF POS=(12,62),LENGTH=03,ATTRB=ASKIP 00151
SPACE 00152
F131266 DFHMDF POS=(12,66),LENGTH=03,ATTRB=ASKIP 00153
SPACE 00154
F131270 DFHMDF POS=(12,70),LENGTH=04,ATTRB=ASKIP 00155
SPACE 00156
F131275 DFHMDF POS=(12,75),LENGTH=05,ATTRB=ASKIP 00157
SPACE 00158
DFHMDF POS=(13,01),LENGTH=01,ATTRB=ASKIP 00159
SPACE 00160
DFHMDF POS=(13,03),LENGTH=06,ATTRB=ASKIP, *00161
INITIAL='EMAIL:' 00162
SPACE 00163
F131310 DFHMDF POS=(13,10),LENGTH=40,ATTRB=ASKIP 00164
SPACE 00165
DFHMDF POS=(13,51),LENGTH=01,ATTRB=ASKIP 00166
SPACE 00167
DFHMDF POS=(14,01),LENGTH=12,ATTRB=ASKIP, *00168
INITIAL=' DEBIT MEMO?' 00169
SPACE 00170
F131414 DFHMDF POS=(14,14),LENGTH=01,ATTRB=ASKIP 00171
SPACE 00172
DFHMDF POS=(14,16),LENGTH=01,ATTRB=ASKIP 00173
SPACE 00174
DFHMDF POS=(14,20),LENGTH=13,ATTRB=ASKIP, *00175
INITIAL='MISS RPT LTR?' 00176
SPACE 00177
F131433 DFHMDF POS=(14,34),LENGTH=01,ATTRB=ASKIP 00178
SPACE 00179
DFHMDF POS=(14,36),LENGTH=01,ATTRB=ASKIP 00180
SPACE 00181
DFHMDF POS=(14,40),LENGTH=14,ATTRB=ASKIP, *00182
INITIAL='PHYSICAL ADDR?' 00183
SPACE 00184
F131455 DFHMDF POS=(14,55),LENGTH=01,ATTRB=ASKIP 00185
SPACE 00186
DFHMDF POS=(14,57),LENGTH=01,ATTRB=ASKIP 00187
SPACE 00188
DFHMDF POS=(15,09),LENGTH=17,ATTRB=ASKIP, *00189
INITIAL='DC STREET ADDRESS' 00190
SPACE 00191
DFHMDF POS=(16,01),LENGTH=05,ATTRB=ASKIP, *00192
INITIAL='ATTN:' 00193
SPACE 00194
F131607 DFHMDF POS=(16,07),LENGTH=40,ATTRB=ASKIP 00195
SPACE 00196
DFHMDF POS=(16,48),LENGTH=01,ATTRB=ASKIP 00197
SPACE 00198
DFHMDF POS=(16,56),LENGTH=05,ATTRB=ASKIP, *00199
INITIAL='CASS?' 00200
SPACE 00201
F131662 DFHMDF POS=(16,62),LENGTH=01,ATTRB=ASKIP 00202
SPACE 00203
DFHMDF POS=(16,64),LENGTH=01,ATTRB=ASKIP 00204
SPACE 00205
DFHMDF POS=(17,01),LENGTH=05,ATTRB=ASKIP, *00206
INITIAL='DLV1:' 00207
SPACE 00208
F131707 DFHMDF POS=(17,07),LENGTH=40,ATTRB=ASKIP 00209
SPACE 00210
DFHMDF POS=(17,48),LENGTH=01,ATTRB=ASKIP 00211
SPACE 00212
DFHMDF POS=(17,56),LENGTH=07,ATTRB=ASKIP, *00213
INITIAL='CASS CD' 00214
SPACE 00215
DFHMDF POS=(18,01),LENGTH=05,ATTRB=ASKIP, *00216
INITIAL='DLV2:' 00217
SPACE 00218
F131807 DFHMDF POS=(18,07),LENGTH=40,ATTRB=ASKIP 00219
SPACE 00220
DFHMDF POS=(18,48),LENGTH=01,ATTRB=ASKIP 00221
SPACE 00222
F131854 DFHMDF POS=(18,54),LENGTH=25,ATTRB=ASKIP 00223
SPACE 00224
DFHMDF POS=(19,01),LENGTH=05,ATTRB=ASKIP, *00225
INITIAL='CITY:' 00226
SPACE 00227
F131907 DFHMDF POS=(19,07),LENGTH=25,ATTRB=ASKIP 00228
SPACE 00229
DFHMDF POS=(19,33),LENGTH=01,ATTRB=ASKIP, *00230
INITIAL=':' 00231
SPACE 00232
F131935 DFHMDF POS=(19,35),LENGTH=02,ATTRB=ASKIP 00233
SPACE 00234
DFHMDF POS=(19,38),LENGTH=01,ATTRB=ASKIP, *00235
INITIAL=':' 00236
SPACE 00237
F131940 DFHMDF POS=(19,40),LENGTH=10,ATTRB=ASKIP 00238
SPACE 00239
DFHMDF POS=(19,51),LENGTH=01,ATTRB=ASKIP 00240
SPACE 00241
DFHMDF POS=(20,01),LENGTH=05,ATTRB=ASKIP, *00242
INITIAL='TEL1:' 00243
SPACE 00244
F132007 DFHMDF POS=(20,07),LENGTH=03,ATTRB=ASKIP 00245
SPACE 00246
F132011 DFHMDF POS=(20,11),LENGTH=03,ATTRB=ASKIP 00247
SPACE 00248
F132015 DFHMDF POS=(20,15),LENGTH=04,ATTRB=ASKIP 00249
SPACE 00250
F132020 DFHMDF POS=(20,20),LENGTH=05,ATTRB=ASKIP 00251
SPACE 00252
DFHMDF POS=(20,26),LENGTH=01,ATTRB=ASKIP 00253
SPACE 00254
DFHMDF POS=(20,29),LENGTH=05,ATTRB=ASKIP, *00255
INITIAL='TEL2:' 00256
SPACE 00257
F132035 DFHMDF POS=(20,35),LENGTH=03,ATTRB=ASKIP 00258
SPACE 00259
F132039 DFHMDF POS=(20,39),LENGTH=03,ATTRB=ASKIP 00260
SPACE 00261
F132043 DFHMDF POS=(20,43),LENGTH=04,ATTRB=ASKIP 00262
SPACE 00263
F132048 DFHMDF POS=(20,48),LENGTH=05,ATTRB=ASKIP 00264
SPACE 00265
DFHMDF POS=(20,54),LENGTH=01,ATTRB=ASKIP 00266
SPACE 00267
DFHMDF POS=(20,57),LENGTH=04,ATTRB=ASKIP, *00268
INITIAL='FAX:' 00269
SPACE 00270
F132062 DFHMDF POS=(20,62),LENGTH=03,ATTRB=ASKIP 00271
SPACE 00272
F132066 DFHMDF POS=(20,66),LENGTH=03,ATTRB=ASKIP 00273
SPACE 00274
F132070 DFHMDF POS=(20,70),LENGTH=04,ATTRB=ASKIP 00275
SPACE 00276
F132075 DFHMDF POS=(20,75),LENGTH=05,ATTRB=ASKIP 00277
SPACE 00278
DFHMDF POS=(21,01),LENGTH=01,ATTRB=ASKIP 00279
SPACE 00280
DFHMDF POS=(21,03),LENGTH=06,ATTRB=ASKIP, *00281
INITIAL='EMAIL:' 00282
SPACE 00283
F132110 DFHMDF POS=(21,10),LENGTH=40,ATTRB=ASKIP 00284
SPACE 00285
DFHMDF POS=(21,51),LENGTH=01,ATTRB=ASKIP 00286
SPACE 00287
DFHMDF POS=(22,01),LENGTH=12,ATTRB=ASKIP, *00288
INITIAL=' DEBIT MEMO?' 00289
SPACE 00290
F132214 DFHMDF POS=(22,14),LENGTH=01,ATTRB=ASKIP 00291
SPACE 00292
DFHMDF POS=(22,16),LENGTH=01,ATTRB=ASKIP 00293
SPACE 00294
DFHMDF POS=(22,20),LENGTH=13,ATTRB=ASKIP, *00295
INITIAL='MISS RPT LTR?' 00296
SPACE 00297
F132233 DFHMDF POS=(22,34),LENGTH=01,ATTRB=ASKIP 00298
SPACE 00299
DFHMDF POS=(22,36),LENGTH=01,ATTRB=ASKIP 00300
SPACE 00301
DFHMDF POS=(22,40),LENGTH=14,ATTRB=ASKIP, *00302
INITIAL='PHYSICAL ADDR?' 00303
SPACE 00304
F132255 DFHMDF POS=(22,55),LENGTH=01,ATTRB=ASKIP 00305
SPACE 00306
DFHMDF POS=(22,57),LENGTH=01,ATTRB=ASKIP 00307
SPACE 00308
F132317 DFHMDF POS=(23,17),LENGTH=07,ATTRB=ASKIP 00309
SPACE 00310
F132401 DFHMDF POS=(24,01),LENGTH=08,ATTRB=ASKIP 00311
SPACE 00312
F132410 DFHMDF POS=(24,10),LENGTH=58,ATTRB=ASKIP 00313
SPACE 00314
DFHMDF POS=(24,69),LENGTH=06,ATTRB=ASKIP, *00315
INITIAL='GO TO:' 00316
SPACE 00317
F132476 DFHMDF POS=(24,76),LENGTH=02,ATTRB=ASKIP 00318
SPACE 00319
DFHMDF POS=(24,79),LENGTH=01,ATTRB=ASKIP 00320