* DATA SET DTSM85 AT LEVEL 005 AS OF 09/07/98 * DATA SET MACM85 AT LEVEL 006 AS OF 04/24/95 00001 ***** 00002 * 00003 * 85 FIELD REPRESENTATIVE TERRITORY INQUIRY/UPDATE. 00004 * 00005 ***** 00006 SPACE 00007 DTSM85 DFHMDI SIZE=(24,80),LINE=1,COLUMN=1 00008**2 SPACE 00009 F850101 DFHMDF POS=(01,01),LENGTH=02,ATTRB=(FSET,ASKIP), *00010 INITIAL='85' 00011 SPACE 00012 DFHMDF POS=(01,14),LENGTH=45,ATTRB=(ASKIP), *00013 INITIAL='FIELD REPRESENTATIVE TERRITORY INQUIRY/UPDATE' 00014 SPACE 00015**5 F850162 DFHMDF POS=(01,62),LENGTH=08,ATTRB=ASKIP 00016**5 SPACE 00017 F850172 DFHMDF POS=(01,72),LENGTH=08,ATTRB=ASKIP 00018 SPACE 00019 F850272 DFHMDF POS=(02,72),LENGTH=08,ATTRB=ASKIP 00020 SPACE 00021 DFHMDF POS=(03,04),LENGTH=16,ATTRB=ASKIP, *00022**3 INITIAL='FIELD TERRITORY:' 00023**3 SPACE 00024 F850320 DFHMDF POS=(03,21),LENGTH=05,ATTRB=ASKIP 00025**3 SPACE 00026 DFHMDF POS=(03,27),LENGTH=01,ATTRB=ASKIP 00027**3 SPACE 00028 F850330 DFHMDF POS=(03,30),LENGTH=15,ATTRB=ASKIP 00029 SPACE 00030 DFHMDF POS=(05,02),LENGTH=17,ATTRB=ASKIP, *00031 INITIAL='FIELD REP ID - 1:' 00032 SPACE 00033 F850520 DFHMDF POS=(05,20),LENGTH=02,ATTRB=ASKIP 00034 SPACE 00035 DFHMDF POS=(05,23),LENGTH=01,ATTRB=ASKIP 00036 SPACE 00037 F850525 DFHMDF POS=(05,25),LENGTH=32,ATTRB=ASKIP 00038 SPACE 00039 DFHMDF POS=(05,58),LENGTH=01,ATTRB=ASKIP 00040 SPACE 00041 DFHMDF POS=(06,17),LENGTH=02,ATTRB=ASKIP, *00042 INITIAL='2:' 00043 SPACE 00044 F850620 DFHMDF POS=(06,20),LENGTH=02,ATTRB=ASKIP 00045 SPACE 00046 DFHMDF POS=(06,23),LENGTH=01,ATTRB=ASKIP 00047 SPACE 00048 F850625 DFHMDF POS=(06,25),LENGTH=32,ATTRB=ASKIP 00049 SPACE 00050 DFHMDF POS=(06,58),LENGTH=01,ATTRB=ASKIP 00051 SPACE 00052 DFHMDF POS=(07,17),LENGTH=02,ATTRB=ASKIP, *00053 INITIAL='3:' 00054 SPACE 00055 F850720 DFHMDF POS=(07,20),LENGTH=02,ATTRB=ASKIP 00056 SPACE 00057 DFHMDF POS=(07,23),LENGTH=01,ATTRB=ASKIP 00058 SPACE 00059 F850725 DFHMDF POS=(07,25),LENGTH=32,ATTRB=ASKIP 00060 SPACE 00061 DFHMDF POS=(07,58),LENGTH=01,ATTRB=ASKIP 00062 SPACE 00063 DFHMDF POS=(08,17),LENGTH=02,ATTRB=ASKIP, *00064 INITIAL='4:' 00065 SPACE 00066 F850820 DFHMDF POS=(08,20),LENGTH=02,ATTRB=ASKIP 00067 SPACE 00068 DFHMDF POS=(08,23),LENGTH=01,ATTRB=ASKIP 00069 SPACE 00070 F850825 DFHMDF POS=(08,25),LENGTH=32,ATTRB=ASKIP 00071 SPACE 00072 DFHMDF POS=(08,58),LENGTH=01,ATTRB=ASKIP 00073 SPACE 00074 DFHMDF POS=(09,17),LENGTH=02,ATTRB=ASKIP, *00075 INITIAL='5:' 00076 SPACE 00077 F850920 DFHMDF POS=(09,20),LENGTH=02,ATTRB=ASKIP 00078 SPACE 00079 DFHMDF POS=(09,23),LENGTH=01,ATTRB=ASKIP 00080 SPACE 00081 F850925 DFHMDF POS=(09,25),LENGTH=32,ATTRB=ASKIP 00082 SPACE 00083 DFHMDF POS=(09,58),LENGTH=01,ATTRB=ASKIP 00084 SPACE 00085 DFHMDF POS=(10,17),LENGTH=02,ATTRB=ASKIP, *00086 INITIAL='6:' 00087 SPACE 00088 F851020 DFHMDF POS=(10,20),LENGTH=02,ATTRB=ASKIP 00089 SPACE 00090 DFHMDF POS=(10,23),LENGTH=01,ATTRB=ASKIP 00091 SPACE 00092 F851025 DFHMDF POS=(10,25),LENGTH=32,ATTRB=ASKIP 00093 SPACE 00094 DFHMDF POS=(10,58),LENGTH=01,ATTRB=ASKIP 00095 SPACE 00096 DFHMDF POS=(11,17),LENGTH=02,ATTRB=ASKIP, *00097 INITIAL='7:' 00098 SPACE 00099 F851120 DFHMDF POS=(11,20),LENGTH=02,ATTRB=ASKIP 00100 SPACE 00101 DFHMDF POS=(11,23),LENGTH=01,ATTRB=ASKIP 00102 SPACE 00103 F851125 DFHMDF POS=(11,25),LENGTH=32,ATTRB=ASKIP 00104 SPACE 00105 DFHMDF POS=(11,58),LENGTH=01,ATTRB=ASKIP 00106 SPACE 00107 DFHMDF POS=(12,17),LENGTH=02,ATTRB=ASKIP, *00108 INITIAL='8:' 00109 SPACE 00110 F851220 DFHMDF POS=(12,20),LENGTH=02,ATTRB=ASKIP 00111 SPACE 00112 DFHMDF POS=(12,23),LENGTH=01,ATTRB=ASKIP 00113 SPACE 00114 F851225 DFHMDF POS=(12,25),LENGTH=32,ATTRB=ASKIP 00115 SPACE 00116 DFHMDF POS=(12,58),LENGTH=01,ATTRB=ASKIP 00117 SPACE 00118 DFHMDF POS=(13,17),LENGTH=02,ATTRB=ASKIP, *00119 INITIAL='9:' 00120 SPACE 00121 F851320 DFHMDF POS=(13,20),LENGTH=02,ATTRB=ASKIP 00122 SPACE 00123 DFHMDF POS=(13,23),LENGTH=01,ATTRB=ASKIP 00124 SPACE 00125 F851325 DFHMDF POS=(13,25),LENGTH=32,ATTRB=ASKIP 00126 SPACE 00127 DFHMDF POS=(13,58),LENGTH=01,ATTRB=ASKIP 00128 SPACE 00129 DFHMDF POS=(14,17),LENGTH=02,ATTRB=ASKIP, *00130 INITIAL='0:' 00131 SPACE 00132 F851420 DFHMDF POS=(14,20),LENGTH=02,ATTRB=ASKIP 00133 SPACE 00134 DFHMDF POS=(14,23),LENGTH=01,ATTRB=ASKIP 00135 SPACE 00136 F851425 DFHMDF POS=(14,25),LENGTH=32,ATTRB=ASKIP 00137 SPACE 00138 DFHMDF POS=(14,58),LENGTH=01,ATTRB=ASKIP 00139 SPACE 00140 DFHMDF POS=(17,02),LENGTH=75,ATTRB=ASKIP, *00141 INITIAL='IF THE FIELD REPRESENTATIVE COVERS ALL EMPLOYER*00142 NUMBERS, ENTER ONLY SLOT #1' 00143 SPACE 00144 DFHMDF POS=(20,59),LENGTH=10,ATTRB=ASKIP, *00145 INITIAL='ESTB DATE:' 00146 SPACE 00147 F852070 DFHMDF POS=(20,70),LENGTH=08,ATTRB=ASKIP 00148 SPACE 00149 DFHMDF POS=(21,59),LENGTH=10,ATTRB=ASKIP, *00150 INITIAL='CHNG DATE:' 00151 SPACE 00152 F852170 DFHMDF POS=(21,70),LENGTH=08,ATTRB=ASKIP 00153 SPACE 00154 F852318 DFHMDF POS=(23,18),LENGTH=07,ATTRB=ASKIP 00155 SPACE 00156 F852327 DFHMDF POS=(23,27),LENGTH=07,ATTRB=ASKIP 00157 SPACE 00158 F852338 DFHMDF POS=(23,38),LENGTH=07,ATTRB=ASKIP 00159 SPACE 00160 F852346 DFHMDF POS=(23,46),LENGTH=07,ATTRB=ASKIP 00161 SPACE 00162 F852355 DFHMDF POS=(23,55),LENGTH=07,ATTRB=ASKIP 00163 SPACE 00164 F852401 DFHMDF POS=(24,01),LENGTH=08,ATTRB=ASKIP 00165 SPACE 00166 F852410 DFHMDF POS=(24,10),LENGTH=58,ATTRB=ASKIP 00167 SPACE 00168 DFHMDF POS=(24,69),LENGTH=06,ATTRB=ASKIP, *00169 INITIAL='GO TO:' 00170 SPACE 00171 F852476 DFHMDF POS=(24,76),LENGTH=02,ATTRB=ASKIP 00172 SPACE 00173 DFHMDF POS=(24,79),LENGTH=01,ATTRB=ASKIP 00174