* DATA SET DTSM1B AT LEVEL 002 AS OF 08/10/98 * DATA SET MACM1B AT LEVEL 024 AS OF 03/31/95 00001 ***** 00002 * 00003 * 1B CYCLE B INQUIRY/UPDATE 00004 * 00005 ***** 00006 SPACE 00007 DTSM1B DFHMDI SIZE=(24,80),LINE=1,COLUMN=1 00008**2 SPACE 00009 F1B0101 DFHMDF POS=(1,1),LENGTH=02,ATTRB=(FSET,ASKIP), *00010 INITIAL='1B' 00011 SPACE 00012 DFHMDF POS=(1,25),LENGTH=22,ATTRB=(ASKIP), *00013 INITIAL='CYCLE B INQUIRY/UPDATE' 00014 SPACE 00015 F1B0162 DFHMDF POS=(1,62),LENGTH=08,ATTRB=(ASKIP) 00016 SPACE 00017 F1B0172 DFHMDF POS=(1,72),LENGTH=08,ATTRB=(ASKIP) 00018 SPACE 00019 DFHMDF POS=(02,04),LENGTH=07,ATTRB=(ASKIP), *00020 INITIAL='EMP NO:' 00021 SPACE 00022 F1B0212 DFHMDF POS=(02,12),LENGTH=03,ATTRB=(ASKIP) 00023 SPACE 00024 F1B0216 DFHMDF POS=(02,16),LENGTH=03,ATTRB=(ASKIP) 00025 SPACE 00026 DFHMDF POS=(02,20),LENGTH=01,ATTRB=(ASKIP) 00027 SPACE 00028 F1B0223 DFHMDF POS=(02,23),LENGTH=40,ATTRB=(ASKIP) 00029 SPACE 00030 F1B0272 DFHMDF POS=(2,72),LENGTH=08,ATTRB=(ASKIP) 00031 SPACE 00032 DFHMDF POS=(04,14),LENGTH=07,ATTRB=(ASKIP), *00033 INITIAL='SOURCE:' 00034 SPACE 00035 F1B0422 DFHMDF POS=(04,22),LENGTH=02,ATTRB=(ASKIP) 00036 SPACE 00037 DFHMDF POS=(04,25),LENGTH=01,ATTRB=(ASKIP) 00038 SPACE 00039 F1B0427 DFHMDF POS=(04,27),LENGTH=10,ATTRB=(ASKIP) 00040 SPACE 00041 DFHMDF POS=(05,09),LENGTH=12,ATTRB=(ASKIP), *00042 INITIAL='RELATED EMP:' 00043 SPACE 00044 F1B0522 DFHMDF POS=(05,22),LENGTH=03,ATTRB=(ASKIP) 00045 SPACE 00046 F1B0526 DFHMDF POS=(05,26),LENGTH=03,ATTRB=(ASKIP) 00047 SPACE 00048 DFHMDF POS=(05,30),LENGTH=01,ATTRB=(ASKIP) 00049 SPACE 00050 F1B0532 DFHMDF POS=(05,32),LENGTH=40,ATTRB=(ASKIP) 00051 SPACE 00052 DFHMDF POS=(06,04),LENGTH=17,ATTRB=(ASKIP), *00053 INITIAL='OPID RESPONSIBLE:' 00054 SPACE 00055 F1B0622 DFHMDF POS=(06,22),LENGTH=06,ATTRB=(ASKIP) 00056 SPACE 00057 DFHMDF POS=(06,29),LENGTH=01,ATTRB=(ASKIP) 00058 SPACE 00059 F1B0632 DFHMDF POS=(06,32),LENGTH=10,ATTRB=(ASKIP) 00060 SPACE 00061 DFHMDF POS=(06,45),LENGTH=10,ATTRB=(ASKIP), *00062 INITIAL='FIELD REP:' 00063 SPACE 00064 F1B0656 DFHMDF POS=(06,56),LENGTH=02,ATTRB=(ASKIP) 00065 SPACE 00066 DFHMDF POS=(06,59),LENGTH=01,ATTRB=(ASKIP) 00067 SPACE 00068 F1B0661 DFHMDF POS=(06,61),LENGTH=10,ATTRB=(ASKIP) 00069 SPACE 00070 DFHMDF POS=(08,07),LENGTH=05,ATTRB=(ASKIP), *00071 INITIAL='NOTE:' 00072 SPACE 00073 F1B0813 DFHMDF POS=(08,13),LENGTH=60,ATTRB=(ASKIP) 00074 SPACE 00075 DFHMDF POS=(08,74),LENGTH=01,ATTRB=(ASKIP) 00076 SPACE 00077 DFHMDF POS=(10,02),LENGTH=13,ATTRB=(ASKIP), *00078 INITIAL='CYC B STATUS:' 00079 SPACE 00080 F1B1016 DFHMDF POS=(10,16),LENGTH=02,ATTRB=(ASKIP) 00081 SPACE 00082 DFHMDF POS=(10,19),LENGTH=01,ATTRB=(ASKIP) 00083 SPACE 00084 F1B1021 DFHMDF POS=(10,21),LENGTH=10,ATTRB=(ASKIP) 00085 SPACE 00086 DFHMDF POS=(10,53),LENGTH=14,ATTRB=(ASKIP), *00087 INITIAL='LTR 1 MAIL DT:' 00088 SPACE 00089 F1B1068 DFHMDF POS=(10,68),LENGTH=02,ATTRB=(ASKIP) 00090 SPACE 00091 F1B1071 DFHMDF POS=(10,71),LENGTH=02,ATTRB=(ASKIP) 00092 SPACE 00093 F1B1074 DFHMDF POS=(10,74),LENGTH=02,ATTRB=(ASKIP) 00094 SPACE 00095 DFHMDF POS=(10,77),LENGTH=01,ATTRB=(ASKIP) 00096 SPACE 00097 DFHMDF POS=(11,05),LENGTH=10,ATTRB=(ASKIP), *00098 INITIAL='LETTER CD:' 00099 SPACE 00100 F1B1116 DFHMDF POS=(11,16),LENGTH=02,ATTRB=(ASKIP) 00101 SPACE 00102 DFHMDF POS=(11,19),LENGTH=01,ATTRB=(ASKIP) 00103 SPACE 00104 F1B1121 DFHMDF POS=(11,21),LENGTH=10,ATTRB=(ASKIP) 00105 SPACE 00106 DFHMDF POS=(11,53),LENGTH=14,ATTRB=(ASKIP), *00107 INITIAL='LTR 2 MAIL DT:' 00108 SPACE 00109 F1B1168 DFHMDF POS=(11,68),LENGTH=02,ATTRB=(ASKIP) 00110 SPACE 00111 F1B1171 DFHMDF POS=(11,71),LENGTH=02,ATTRB=(ASKIP) 00112 SPACE 00113 F1B1174 DFHMDF POS=(11,74),LENGTH=02,ATTRB=(ASKIP) 00114 SPACE 00115 DFHMDF POS=(11,77),LENGTH=01,ATTRB=(ASKIP) 00116 SPACE 00117 DFHMDF POS=(12,01),LENGTH=14,ATTRB=(ASKIP), *00118 INITIAL='1ST SENTNC CD:' 00119 SPACE 00120 F1B1216 DFHMDF POS=(12,16),LENGTH=01,ATTRB=(ASKIP) 00121 SPACE 00122 DFHMDF POS=(12,18),LENGTH=01,ATTRB=(ASKIP) 00123 SPACE 00124 F1B1221 DFHMDF POS=(12,21),LENGTH=10,ATTRB=(ASKIP) 00125 SPACE 00126 DFHMDF POS=(13,07),LENGTH=08,ATTRB=(ASKIP), *00127 INITIAL='FUTA YR:' 00128 SPACE 00129 F1B1316 DFHMDF POS=(13,16),LENGTH=02,ATTRB=(ASKIP) 00130 SPACE 00131 DFHMDF POS=(13,19),LENGTH=01,ATTRB=(ASKIP) 00132 SPACE 00133 DFHMDF POS=(14,07),LENGTH=08,ATTRB=(ASKIP), *00134 INITIAL='#LABELS:' 00135 SPACE 00136 F1B1416 DFHMDF POS=(14,16),LENGTH=01,ATTRB=(ASKIP) 00137 SPACE 00138 DFHMDF POS=(14,18),LENGTH=01,ATTRB=(ASKIP) 00139 SPACE 00140 DFHMDF POS=(16,01),LENGTH=17,ATTRB=(ASKIP), *00141 INITIAL='UI-1 RECEIVED DT:' 00142 SPACE 00143 F1B1619 DFHMDF POS=(16,19),LENGTH=02,ATTRB=(ASKIP) 00144 SPACE 00145 F1B1622 DFHMDF POS=(16,22),LENGTH=02,ATTRB=(ASKIP) 00146 SPACE 00147 F1B1625 DFHMDF POS=(16,25),LENGTH=02,ATTRB=(ASKIP) 00148 SPACE 00149 DFHMDF POS=(16,28),LENGTH=01,ATTRB=(ASKIP) 00150 SPACE 00151 DFHMDF POS=(17,01),LENGTH=17,ATTRB=(ASKIP), *00152 INITIAL='DETR NOT SUBJ DT:' 00153 SPACE 00154 F1B1719 DFHMDF POS=(17,19),LENGTH=02,ATTRB=(ASKIP) 00155 SPACE 00156 F1B1722 DFHMDF POS=(17,22),LENGTH=02,ATTRB=(ASKIP) 00157 SPACE 00158 F1B1725 DFHMDF POS=(17,25),LENGTH=02,ATTRB=(ASKIP) 00159 SPACE 00160 DFHMDF POS=(17,28),LENGTH=01,ATTRB=(ASKIP) 00161 SPACE 00162 DFHMDF POS=(19,02),LENGTH=05,ATTRB=(ASKIP), *00163 INITIAL='ATTN:' 00164 SPACE 00165 F1B1908 DFHMDF POS=(19,08),LENGTH=40,ATTRB=(ASKIP) 00166 SPACE 00167 DFHMDF POS=(19,52),LENGTH=09,ATTRB=(ASKIP), *00168 INITIAL='ATTN IND:' 00169 SPACE 00170 F1B1962 DFHMDF POS=(19,62),LENGTH=01,ATTRB=(ASKIP) 00171 SPACE 00172 DFHMDF POS=(19,65),LENGTH=12,ATTRB=(ASKIP), *00173 INITIAL='DELIVERABLE?' 00174 SPACE 00175 F1B1978 DFHMDF POS=(19,78),LENGTH=01,ATTRB=(ASKIP) 00176 SPACE 00177 DFHMDF POS=(20,03),LENGTH=04,ATTRB=(ASKIP), *00178 INITIAL='DLV:' 00179 SPACE 00180 F1B2008 DFHMDF POS=(20,08),LENGTH=40,ATTRB=(ASKIP) 00181 SPACE 00182 DFHMDF POS=(21,03),LENGTH=04,ATTRB=(ASKIP), *00183 INITIAL='CTY:' 00184 SPACE 00185 F1B2108 DFHMDF POS=(21,08),LENGTH=25,ATTRB=(ASKIP) 00186 SPACE 00187 DFHMDF POS=(21,34),LENGTH=01,ATTRB=(ASKIP), *00188 INITIAL=':' 00189 SPACE 00190 F1B2136 DFHMDF POS=(21,36),LENGTH=02,ATTRB=(ASKIP) 00191 SPACE 00192 DFHMDF POS=(21,39),LENGTH=01,ATTRB=(ASKIP), *00193 INITIAL=':' 00194 SPACE 00195 F1B2141 DFHMDF POS=(21,41),LENGTH=10,ATTRB=(ASKIP) 00196 SPACE 00197 DFHMDF POS=(22,03),LENGTH=04,ATTRB=(ASKIP), *00198 INITIAL='TEL:' 00199 SPACE 00200 F1B2208 DFHMDF POS=(22,08),LENGTH=03,ATTRB=(ASKIP) 00201 SPACE 00202 F1B2212 DFHMDF POS=(22,12),LENGTH=03,ATTRB=(ASKIP) 00203 SPACE 00204 F1B2216 DFHMDF POS=(22,16),LENGTH=04,ATTRB=(ASKIP) 00205 SPACE 00206 DFHMDF POS=(22,21),LENGTH=01,ATTRB=(ASKIP) 00207 SPACE 00208 DFHMDF POS=(22,30),LENGTH=05,ATTRB=(ASKIP), *00209 INITIAL='TEL2:' 00210 SPACE 00211 F1B2236 DFHMDF POS=(22,36),LENGTH=03,ATTRB=(ASKIP) 00212 SPACE 00213 F1B2240 DFHMDF POS=(22,40),LENGTH=03,ATTRB=(ASKIP) 00214 SPACE 00215 F1B2244 DFHMDF POS=(22,44),LENGTH=04,ATTRB=(ASKIP) 00216 SPACE 00217 DFHMDF POS=(22,49),LENGTH=01,ATTRB=(ASKIP) 00218 SPACE 00219 DFHMDF POS=(22,57),LENGTH=04,ATTRB=(ASKIP), *00220 INITIAL='FAX:' 00221 SPACE 00222 F1B2262 DFHMDF POS=(22,62),LENGTH=03,ATTRB=(ASKIP) 00223 SPACE 00224 F1B2266 DFHMDF POS=(22,66),LENGTH=03,ATTRB=(ASKIP) 00225 SPACE 00226 F1B2270 DFHMDF POS=(22,70),LENGTH=04,ATTRB=(ASKIP) 00227 SPACE 00228 DFHMDF POS=(22,75),LENGTH=01,ATTRB=(ASKIP) 00229 SPACE 00230 F1B2319 DFHMDF POS=(23,19),LENGTH=07,ATTRB=(ASKIP) 00231 SPACE 00232 F1B2328 DFHMDF POS=(23,28),LENGTH=07,ATTRB=(ASKIP) 00233 SPACE 00234 F1B2337 DFHMDF POS=(23,37),LENGTH=07,ATTRB=(ASKIP) 00235 SPACE 00236 F1B2346 DFHMDF POS=(23,46),LENGTH=11,ATTRB=(ASKIP) 00237 SPACE 00238 F1B2359 DFHMDF POS=(23,59),LENGTH=10,ATTRB=(ASKIP) 00239 SPACE 00240 F1B2401 DFHMDF POS=(24,01),LENGTH=08,ATTRB=(ASKIP) 00241 SPACE 00242 F1B2410 DFHMDF POS=(24,10),LENGTH=58,ATTRB=(ASKIP) 00243 SPACE 00244 DFHMDF POS=(24,69),LENGTH=06,ATTRB=(ASKIP), *00245 INITIAL='GO TO:' 00246 SPACE 00247 F1B2476 DFHMDF POS=(24,76),LENGTH=02,ATTRB=(ASKIP) 00248 SPACE 00249 DFHMDF POS=(24,79),LENGTH=01,ATTRB=(ASKIP) 00250