* 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