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