246 lines
19 KiB
Plaintext
246 lines
19 KiB
Plaintext
* DATA SET DTSM84 AT LEVEL 011 AS OF 09/21/98
|
|
* DATA SET MACM84 AT LEVEL 009 AS OF 03/31/95 00001
|
|
***** 00002
|
|
* 00003
|
|
* 84 FIELD REP INQUIRY/UPDATE. 00004
|
|
* 00005
|
|
***** 00006
|
|
SPACE 00007
|
|
DTSM84 DFHMDI SIZE=(24,80),LINE=1,COLUMN=1 00008**2
|
|
SPACE 00009
|
|
F840101 DFHMDF POS=(01,01),LENGTH=02,ATTRB=(FSET,ASKIP), *00010
|
|
INITIAL='84' 00011
|
|
SPACE 00012
|
|
DFHMDF POS=(01,19),LENGTH=35,ATTRB=(ASKIP), *00013
|
|
INITIAL='FIELD REPRESENTATIVE INQUIRY/UPDATE' 00014
|
|
SPACE 00015**8
|
|
F840162 DFHMDF POS=(01,62),LENGTH=08,ATTRB=ASKIP 00016**8
|
|
SPACE 00017
|
|
F840172 DFHMDF POS=(01,72),LENGTH=08,ATTRB=ASKIP 00018
|
|
SPACE 00019
|
|
F840272 DFHMDF POS=(02,72),LENGTH=08,ATTRB=ASKIP 00020
|
|
SPACE 00021
|
|
DFHMDF POS=(03,06),LENGTH=13,ATTRB=ASKIP, *00022
|
|
INITIAL='FIELD REP ID:' 00023
|
|
SPACE 00024
|
|
F840320 DFHMDF POS=(03,20),LENGTH=02,ATTRB=ASKIP 00025
|
|
SPACE 00026
|
|
DFHMDF POS=(03,23),LENGTH=01,ATTRB=ASKIP 00027
|
|
SPACE 00028
|
|
DFHMDF POS=(03,28),LENGTH=16,ATTRB=ASKIP, *00029
|
|
INITIAL='FIELD REP OP ID:' 00030
|
|
SPACE 00031
|
|
F840345 DFHMDF POS=(03,45),LENGTH=08,ATTRB=ASKIP 00032**3
|
|
SPACE 00033
|
|
DFHMDF POS=(03,54),LENGTH=01,ATTRB=ASKIP 00034*10
|
|
SPACE 00035
|
|
DFHMDF POS=(03,57),LENGTH=10,ATTRB=ASKIP, *00036
|
|
INITIAL='ACCT TECH:' 00037**3
|
|
SPACE 00038
|
|
F840368 DFHMDF POS=(03,68),LENGTH=03,ATTRB=ASKIP 00039**3
|
|
SPACE 00040
|
|
DFHMDF POS=(03,72),LENGTH=01,ATTRB=ASKIP 00041**3
|
|
SPACE 00042
|
|
DFHMDF POS=(05,04),LENGTH=15,ATTRB=ASKIP, *00043
|
|
INITIAL='FIELD REP NAME:' 00044
|
|
SPACE 00045
|
|
F840520 DFHMDF POS=(05,20),LENGTH=32,ATTRB=ASKIP 00046
|
|
SPACE 00047
|
|
DFHMDF POS=(05,53),LENGTH=01,ATTRB=ASKIP 00048
|
|
SPACE 00049
|
|
DFHMDF POS=(05,55),LENGTH=12,ATTRB=ASKIP, *00050
|
|
INITIAL='CASUAL NAME:' 00051
|
|
SPACE 00052
|
|
F840568 DFHMDF POS=(05,68),LENGTH=12,ATTRB=ASKIP 00053
|
|
SPACE 00054
|
|
DFHMDF POS=(06,01),LENGTH=01,ATTRB=ASKIP 00055
|
|
SPACE 00056
|
|
DFHMDF POS=(07,04),LENGTH=16,ATTRB=ASKIP, *00057
|
|
INITIAL='MAILING ADDRESS:' 00058
|
|
SPACE 00059
|
|
DFHMDF POS=(08,02),LENGTH=05,ATTRB=ASKIP, *00060
|
|
INITIAL='ATTN:' 00061
|
|
SPACE 00062
|
|
F840808 DFHMDF POS=(08,08),LENGTH=40,ATTRB=ASKIP 00063
|
|
SPACE 00064
|
|
DFHMDF POS=(08,49),LENGTH=01,ATTRB=ASKIP 00065
|
|
SPACE 00066
|
|
DFHMDF POS=(08,52),LENGTH=09,ATTRB=ASKIP, *00067
|
|
INITIAL=' CASS?' 00068**3
|
|
SPACE 00069
|
|
F840862 DFHMDF POS=(08,62),LENGTH=01,ATTRB=ASKIP 00070
|
|
SPACE 00071
|
|
DFHMDF POS=(08,64),LENGTH=01,ATTRB=ASKIP 00072
|
|
SPACE 00073
|
|
DFHMDF POS=(09,03),LENGTH=05,ATTRB=ASKIP, *00074**3
|
|
INITIAL='DLV1:' 00075**3
|
|
SPACE 00076
|
|
F840909 DFHMDF POS=(09,09),LENGTH=40,ATTRB=ASKIP 00077**3
|
|
SPACE 00078
|
|
DFHMDF POS=(09,50),LENGTH=01,ATTRB=ASKIP 00079**3
|
|
SPACE 00080
|
|
DFHMDF POS=(09,56),LENGTH=08,ATTRB=ASKIP, *00081**3
|
|
INITIAL='CASS CD:' 00082**3
|
|
SPACE 00083
|
|
DFHMDF POS=(09,65),LENGTH=01,ATTRB=ASKIP 00084**6
|
|
SPACE 00085
|
|
DFHMDF POS=(10,03),LENGTH=05,ATTRB=ASKIP, *00086**4
|
|
INITIAL='DLV2:' 00087**4
|
|
SPACE 00088**4
|
|
F841009 DFHMDF POS=(10,09),LENGTH=40,ATTRB=ASKIP 00089**4
|
|
SPACE 00090**4
|
|
DFHMDF POS=(10,50),LENGTH=01,ATTRB=ASKIP 00091**4
|
|
SPACE 00092**4
|
|
F841054 DFHMDF POS=(10,54),LENGTH=25,ATTRB=ASKIP 00093**4
|
|
SPACE 00094**4
|
|
DFHMDF POS=(11,03),LENGTH=05,ATTRB=ASKIP, *00095**4
|
|
INITIAL='CITY:' 00096**4
|
|
SPACE 00097
|
|
F841109 DFHMDF POS=(11,09),LENGTH=25,ATTRB=ASKIP 00098**4
|
|
SPACE 00099
|
|
DFHMDF POS=(11,36),LENGTH=01,ATTRB=ASKIP, *00100**4
|
|
INITIAL=':' 00101
|
|
SPACE 00102
|
|
F841138 DFHMDF POS=(11,38),LENGTH=02,ATTRB=ASKIP 00103**9
|
|
SPACE 00104
|
|
DFHMDF POS=(11,41),LENGTH=01,ATTRB=ASKIP, *00105**9
|
|
INITIAL=':' 00106
|
|
SPACE 00107
|
|
F841143 DFHMDF POS=(11,43),LENGTH=10,ATTRB=ASKIP 00108**9
|
|
SPACE 00109
|
|
DFHMDF POS=(11,54),LENGTH=01,ATTRB=ASKIP 00110*11
|
|
SPACE 00111*11
|
|
DFHMDF POS=(12,01),LENGTH=01,ATTRB=ASKIP 00112**4
|
|
SPACE 00113
|
|
DFHMDF POS=(13,02),LENGTH=17,ATTRB=ASKIP, *00114**4
|
|
INITIAL='PHYSICAL ADDRESS:' 00115
|
|
SPACE 00116
|
|
DFHMDF POS=(14,02),LENGTH=05,ATTRB=ASKIP, *00117**4
|
|
INITIAL='ATTN:' 00118
|
|
SPACE 00119
|
|
F841408 DFHMDF POS=(14,08),LENGTH=40,ATTRB=ASKIP 00120**4
|
|
SPACE 00121
|
|
DFHMDF POS=(14,49),LENGTH=01,ATTRB=ASKIP 00122**4
|
|
SPACE 00123
|
|
DFHMDF POS=(14,52),LENGTH=09,ATTRB=ASKIP, *00124**4
|
|
INITIAL=' CASS?' 00125**4
|
|
SPACE 00126
|
|
F841462 DFHMDF POS=(14,62),LENGTH=01,ATTRB=ASKIP 00127**4
|
|
SPACE 00128
|
|
DFHMDF POS=(14,64),LENGTH=01,ATTRB=ASKIP 00129**4
|
|
SPACE 00130
|
|
DFHMDF POS=(15,03),LENGTH=05,ATTRB=ASKIP, *00131**4
|
|
INITIAL='DLV1:' 00132**4
|
|
SPACE 00133
|
|
F841509 DFHMDF POS=(15,09),LENGTH=40,ATTRB=ASKIP 00134**4
|
|
SPACE 00135
|
|
DFHMDF POS=(15,50),LENGTH=01,ATTRB=ASKIP 00136**4
|
|
SPACE 00137
|
|
DFHMDF POS=(15,56),LENGTH=08,ATTRB=ASKIP, *00138**4
|
|
INITIAL='CASS CD:' 00139**9
|
|
SPACE 00140
|
|
DFHMDF POS=(16,03),LENGTH=05,ATTRB=ASKIP, *00141**4
|
|
INITIAL='DLV2:' 00142**4
|
|
SPACE 00143**4
|
|
F841609 DFHMDF POS=(16,09),LENGTH=40,ATTRB=ASKIP 00144**4
|
|
SPACE 00145**4
|
|
DFHMDF POS=(16,50),LENGTH=01,ATTRB=ASKIP 00146**4
|
|
SPACE 00147**4
|
|
F841654 DFHMDF POS=(16,54),LENGTH=25,ATTRB=ASKIP 00148**4
|
|
SPACE 00149**4
|
|
DFHMDF POS=(17,03),LENGTH=05,ATTRB=ASKIP, *00150**4
|
|
INITIAL='CITY:' 00151**4
|
|
SPACE 00152
|
|
F841709 DFHMDF POS=(17,09),LENGTH=25,ATTRB=ASKIP 00153**4
|
|
SPACE 00154
|
|
DFHMDF POS=(17,35),LENGTH=01,ATTRB=ASKIP, *00155**4
|
|
INITIAL=':' 00156
|
|
SPACE 00157
|
|
F841737 DFHMDF POS=(17,37),LENGTH=02,ATTRB=ASKIP 00158**4
|
|
SPACE 00159
|
|
DFHMDF POS=(17,40),LENGTH=01,ATTRB=ASKIP, *00160**4
|
|
INITIAL=':' 00161
|
|
SPACE 00162
|
|
F841742 DFHMDF POS=(17,42),LENGTH=10,ATTRB=ASKIP 00163**4
|
|
SPACE 00164
|
|
DFHMDF POS=(17,53),LENGTH=01,ATTRB=ASKIP 00165*11
|
|
SPACE 00166*11
|
|
DFHMDF POS=(18,01),LENGTH=01,ATTRB=ASKIP 00167**4
|
|
SPACE 00168
|
|
DFHMDF POS=(19,02),LENGTH=05,ATTRB=ASKIP, *00169**4
|
|
INITIAL='TEL1:' 00170**4
|
|
SPACE 00171
|
|
F841908 DFHMDF POS=(19,08),LENGTH=03,ATTRB=ASKIP 00172**4
|
|
SPACE 00173
|
|
F841912 DFHMDF POS=(19,12),LENGTH=03,ATTRB=ASKIP 00174**4
|
|
SPACE 00175
|
|
F841916 DFHMDF POS=(19,16),LENGTH=04,ATTRB=ASKIP 00176**4
|
|
SPACE 00177
|
|
F841921 DFHMDF POS=(19,21),LENGTH=05,ATTRB=ASKIP 00178**4
|
|
SPACE 00179**5
|
|
DFHMDF POS=(19,27),LENGTH=01,ATTRB=ASKIP 00180**9
|
|
SPACE 00181**4
|
|
DFHMDF POS=(19,29),LENGTH=05,ATTRB=ASKIP, *00182**5
|
|
INITIAL='TEL2:' 00183
|
|
SPACE 00184
|
|
F841935 DFHMDF POS=(19,35),LENGTH=03,ATTRB=ASKIP 00185**5
|
|
SPACE 00186
|
|
F841939 DFHMDF POS=(19,39),LENGTH=03,ATTRB=ASKIP 00187**5
|
|
SPACE 00188
|
|
F841943 DFHMDF POS=(19,43),LENGTH=04,ATTRB=ASKIP 00189**5
|
|
SPACE 00190
|
|
F841948 DFHMDF POS=(19,48),LENGTH=05,ATTRB=ASKIP 00191**5
|
|
SPACE 00192**4
|
|
DFHMDF POS=(19,54),LENGTH=01,ATTRB=ASKIP 00193**5
|
|
SPACE 00194
|
|
DFHMDF POS=(19,56),LENGTH=04,ATTRB=ASKIP, *00195**5
|
|
INITIAL='FAX:' 00196
|
|
SPACE 00197
|
|
F841961 DFHMDF POS=(19,61),LENGTH=03,ATTRB=ASKIP 00198**5
|
|
SPACE 00199
|
|
F841965 DFHMDF POS=(19,65),LENGTH=03,ATTRB=ASKIP 00200**5
|
|
SPACE 00201
|
|
F841969 DFHMDF POS=(19,69),LENGTH=04,ATTRB=ASKIP 00202**5
|
|
SPACE 00203
|
|
F841974 DFHMDF POS=(19,74),LENGTH=05,ATTRB=ASKIP 00204**5
|
|
SPACE 00205**5
|
|
DFHMDF POS=(19,80),LENGTH=01,ATTRB=ASKIP 00206**9
|
|
SPACE 00207
|
|
DFHMDF POS=(21,02),LENGTH=06,ATTRB=ASKIP, *00208**5
|
|
INITIAL='EMAIL:' 00209**5
|
|
SPACE 00210**5
|
|
F842109 DFHMDF POS=(21,09),LENGTH=40,ATTRB=ASKIP 00211**5
|
|
SPACE 00212**5
|
|
DFHMDF POS=(21,50),LENGTH=01,ATTRB=ASKIP 00213**5
|
|
SPACE 00214**5
|
|
DFHMDF POS=(21,59),LENGTH=10,ATTRB=ASKIP, *00215**5
|
|
INITIAL='ESTB DATE:' 00216
|
|
SPACE 00217
|
|
F842170 DFHMDF POS=(21,70),LENGTH=08,ATTRB=ASKIP 00218**5
|
|
SPACE 00219
|
|
DFHMDF POS=(22,59),LENGTH=10,ATTRB=ASKIP, *00220**5
|
|
INITIAL='CHNG DATE:' 00221
|
|
SPACE 00222
|
|
F842270 DFHMDF POS=(22,70),LENGTH=08,ATTRB=ASKIP 00223**5
|
|
SPACE 00224
|
|
F842318 DFHMDF POS=(23,18),LENGTH=07,ATTRB=ASKIP 00225
|
|
SPACE 00226
|
|
F842327 DFHMDF POS=(23,27),LENGTH=07,ATTRB=ASKIP 00227
|
|
SPACE 00228
|
|
F842338 DFHMDF POS=(23,38),LENGTH=07,ATTRB=ASKIP 00229
|
|
SPACE 00230
|
|
F842346 DFHMDF POS=(23,46),LENGTH=07,ATTRB=ASKIP 00231
|
|
SPACE 00232
|
|
F842355 DFHMDF POS=(23,55),LENGTH=07,ATTRB=ASKIP 00233
|
|
SPACE 00234
|
|
F842401 DFHMDF POS=(24,01),LENGTH=08,ATTRB=ASKIP 00235
|
|
SPACE 00236
|
|
F842410 DFHMDF POS=(24,10),LENGTH=58,ATTRB=ASKIP 00237
|
|
SPACE 00238
|
|
DFHMDF POS=(24,69),LENGTH=06,ATTRB=ASKIP, *00239
|
|
INITIAL='GO TO:' 00240
|
|
SPACE 00241
|
|
F842476 DFHMDF POS=(24,76),LENGTH=02,ATTRB=ASKIP 00242
|
|
SPACE 00243
|
|
DFHMDF POS=(24,79),LENGTH=01,ATTRB=ASKIP 00244
|