* DATA SET DTSM7B AT LEVEL 012 AS OF 10/20/98 * DATA SET MACM72 AT LEVEL 012 AS OF 01/23/95 00001 ***** 00002 * 00003 * 7B MODIFICATION LOG INQUIRY 00004**3 * 00005 ***** 00006 SPACE 00007 DTSM7B DFHMDI SIZE=(24,80),LINE=1,COLUMN=1 00008**3 SPACE 00009 F7B0101 DFHMDF POS=(1,1),LENGTH=02,ATTRB=(FSET,ASKIP), *00010**3 INITIAL='7B' 00011**3 SPACE 00012 DFHMDF POS=(1,28),LENGTH=23,ATTRB=(ASKIP), *00013**3 INITIAL='MODFICATION LOG INQUIRY' 00014**3 SPACE 00015 F7B0162 DFHMDF POS=(1,62),LENGTH=08,ATTRB=(ASKIP) 00016**3 SPACE 00017 F7B0172 DFHMDF POS=(1,72),LENGTH=08,ATTRB=(ASKIP) 00018**3 SPACE 00019 DFHMDF POS=(02,04),LENGTH=07,ATTRB=(ASKIP), *00020 INITIAL='EMP NO:' 00021 SPACE 00022**5 F7B0212 DFHMDF POS=(02,12),LENGTH=03,ATTRB=(ASKIP) 00023**5 SPACE 00024**5 F7B0216 DFHMDF POS=(02,16),LENGTH=03,ATTRB=(ASKIP) 00025**5 SPACE 00026**5 DFHMDF POS=(02,20),LENGTH=01,ATTRB=(ASKIP) 00027**5 SPACE 00028**5 F7B0223 DFHMDF POS=(02,23),LENGTH=40,ATTRB=(ASKIP) 00029**5 SPACE 00030**5 F7B0272 DFHMDF POS=(02,72),LENGTH=08,ATTRB=(ASKIP) 00031**5 SPACE 00032**4 DFHMDF POS=(03,01),LENGTH=33,ATTRB=(ASKIP), *00033**4 INITIAL='RECORD TYPE OR DATA ELEMENT NAME:' 00034**4 SPACE 00035**4 F7B0335 DFHMDF POS=(03,35),LENGTH=30,ATTRB=(ASKIP) 00036**4 SPACE 00037**4 DFHMDF POS=(03,66),LENGTH=01,ATTRB=(ASKIP) 00038**4 SPACE 00039**4 DFHMDF POS=(04,05),LENGTH=29,ATTRB=(ASKIP), *00040**4 INITIAL='RECORD OCCURRENCE IDENTIFIER:' 00041**4 SPACE 00042**4 F7B0435 DFHMDF POS=(04,35),LENGTH=20,ATTRB=(ASKIP) 00043**4 SPACE 00044**4 DFHMDF POS=(04,56),LENGTH=01,ATTRB=(ASKIP) 00045*10 SPACE 00046**4 DFHMDF POS=(05,10),LENGTH=24,ATTRB=(ASKIP), *00047**4 INITIAL='MODIFICATIONS OCCURRING:' 00048**4 SPACE 00049**4 F7B0535 DFHMDF POS=(05,35),LENGTH=02,ATTRB=(ASKIP) 00050**4 SPACE 00051**4 F7B0538 DFHMDF POS=(05,38),LENGTH=02,ATTRB=(ASKIP) 00052**8 SPACE 00053**4 F7B0541 DFHMDF POS=(05,41),LENGTH=02,ATTRB=(ASKIP) 00054**8 SPACE 00055**4 DFHMDF POS=(05,44),LENGTH=04,ATTRB=(ASKIP), *00056*10 INITIAL='THRU' 00057**4 SPACE 00058**4 F7B0549 DFHMDF POS=(05,49),LENGTH=02,ATTRB=(ASKIP) 00059**4 SPACE 00060**4 F7B0552 DFHMDF POS=(05,52),LENGTH=02,ATTRB=(ASKIP) 00061**4 SPACE 00062**4 F7B0555 DFHMDF POS=(05,55),LENGTH=02,ATTRB=(ASKIP) 00063**4 SPACE 00064**4 DFHMDF POS=(05,58),LENGTH=01,ATTRB=(ASKIP) 00065*10 SPACE 00066**4 DFHMDF POS=(06,22),LENGTH=12,ATTRB=(ASKIP), *00067**4 INITIAL='MODIFIED BY:' 00068**4 SPACE 00069**4 F7B0635 DFHMDF POS=(06,35),LENGTH=08,ATTRB=(ASKIP) 00070**4 SPACE 00071**4 DFHMDF POS=(06,44),LENGTH=01,ATTRB=(ASKIP) 00072*10 SPACE 00073**4 F7B0646 DFHMDF POS=(06,46),LENGTH=32,ATTRB=(ASKIP) 00074**4 SPACE 00075**4 DFHMDF POS=(07,01),LENGTH=68,ATTRB=(ASKIP), *00076**4 INITIAL='-----------------------------------------------*00077**4 --------------- PAGE:' 00078*11 SPACE 00079**4 F7B0770 DFHMDF POS=(07,70),LENGTH=03,ATTRB=(ASKIP) 00080*11 SPACE 00081 DFHMDF POS=(07,74),LENGTH=02,ATTRB=(ASKIP), *00082*11 INITIAL='OF' 00083**4 SPACE 00084**4 F7B0777 DFHMDF POS=(07,77),LENGTH=03,ATTRB=(ASKIP) 00085*11 SPACE 00086 DFHMDF POS=(08,01),LENGTH=11,ATTRB=(ASKIP), *00087**5 INITIAL='REC OCC ID:' 00088**5 SPACE 00089**5 F7B0813 DFHMDF POS=(08,13),LENGTH=20,ATTRB=(ASKIP) 00090**5 SPACE 00091**5 DFHMDF POS=(08,41),LENGTH=08,ATTRB=(ASKIP), *00092**5 INITIAL='DE NAME:' 00093**5 SPACE 00094**5 F7B0850 DFHMDF POS=(08,50),LENGTH=30,ATTRB=(ASKIP) 00095*10 SPACE 00096**5 DFHMDF POS=(09,03),LENGTH=09,ATTRB=(ASKIP), *00097**5 INITIAL='MODIFIED:' 00098**5 SPACE 00099**5 F7B0913 DFHMDF POS=(09,13),LENGTH=18,ATTRB=(ASKIP) 00100**5 SPACE 00101**6 DFHMDF POS=(09,34),LENGTH=05,ATTRB=(ASKIP), *00102**6 INITIAL='FROM:' 00103**6 SPACE 00104**6 F7B0940 DFHMDF POS=(09,40),LENGTH=40,ATTRB=(ASKIP) 00105**6 SPACE 00106**6 DFHMDF POS=(10,09),LENGTH=03,ATTRB=(ASKIP), *00107**6 INITIAL='BY:' 00108**6 SPACE 00109**6 F7B1013 DFHMDF POS=(10,13),LENGTH=08,ATTRB=(ASKIP) 00110**6 SPACE 00111**6 F7B1022 DFHMDF POS=(10,22),LENGTH=11,ATTRB=(ASKIP) 00112*10 SPACE 00113**6 DFHMDF POS=(10,36),LENGTH=03,ATTRB=(ASKIP), *00114**6 INITIAL='TO:' 00115**6 SPACE 00116**7 F7B1040 DFHMDF POS=(10,40),LENGTH=40,ATTRB=(ASKIP) 00117**7 SPACE 00118**7 DFHMDF POS=(12,01),LENGTH=11,ATTRB=(ASKIP), *00119**7 INITIAL='REC OCC ID:' 00120**7 SPACE 00121**7 F7B1213 DFHMDF POS=(12,13),LENGTH=20,ATTRB=(ASKIP) 00122**7 SPACE 00123**7 DFHMDF POS=(12,41),LENGTH=08,ATTRB=(ASKIP), *00124**7 INITIAL='DE NAME:' 00125**7 SPACE 00126**7 F7B1250 DFHMDF POS=(12,50),LENGTH=30,ATTRB=(ASKIP) 00127*10 SPACE 00128**7 DFHMDF POS=(13,03),LENGTH=09,ATTRB=(ASKIP), *00129**7 INITIAL='MODIFIED:' 00130**7 SPACE 00131**7 F7B1313 DFHMDF POS=(13,13),LENGTH=18,ATTRB=(ASKIP) 00132**7 SPACE 00133**7 DFHMDF POS=(13,34),LENGTH=05,ATTRB=(ASKIP), *00134**7 INITIAL='FROM:' 00135**7 SPACE 00136**7 F7B1340 DFHMDF POS=(13,40),LENGTH=40,ATTRB=(ASKIP) 00137**7 SPACE 00138**7 DFHMDF POS=(14,09),LENGTH=03,ATTRB=(ASKIP), *00139**7 INITIAL='BY:' 00140**7 SPACE 00141**7 F7B1413 DFHMDF POS=(14,13),LENGTH=08,ATTRB=(ASKIP) 00142**7 SPACE 00143**7 F7B1422 DFHMDF POS=(14,22),LENGTH=11,ATTRB=(ASKIP) 00144*10 SPACE 00145**7 DFHMDF POS=(14,36),LENGTH=03,ATTRB=(ASKIP), *00146**7 INITIAL='TO:' 00147**7 SPACE 00148**7 F7B1440 DFHMDF POS=(14,40),LENGTH=40,ATTRB=(ASKIP) 00149**7 SPACE 00150**7 DFHMDF POS=(16,01),LENGTH=11,ATTRB=(ASKIP), *00151**7 INITIAL='REC OCC ID:' 00152**7 SPACE 00153**7 F7B1613 DFHMDF POS=(16,13),LENGTH=20,ATTRB=(ASKIP) 00154**7 SPACE 00155**7 DFHMDF POS=(16,41),LENGTH=08,ATTRB=(ASKIP), *00156**7 INITIAL='DE NAME:' 00157**7 SPACE 00158**7 F7B1650 DFHMDF POS=(16,50),LENGTH=30,ATTRB=(ASKIP) 00159*10 SPACE 00160**7 DFHMDF POS=(17,03),LENGTH=09,ATTRB=(ASKIP), *00161**7 INITIAL='MODIFIED:' 00162**7 SPACE 00163**7 F7B1713 DFHMDF POS=(17,13),LENGTH=18,ATTRB=(ASKIP) 00164**7 SPACE 00165**7 DFHMDF POS=(17,34),LENGTH=05,ATTRB=(ASKIP), *00166**7 INITIAL='FROM:' 00167**7 SPACE 00168**7 F7B1740 DFHMDF POS=(17,40),LENGTH=40,ATTRB=(ASKIP) 00169**7 SPACE 00170**7 DFHMDF POS=(18,09),LENGTH=03,ATTRB=(ASKIP), *00171**7 INITIAL='BY:' 00172**7 SPACE 00173**7 F7B1813 DFHMDF POS=(18,13),LENGTH=08,ATTRB=(ASKIP) 00174**7 SPACE 00175**7 F7B1822 DFHMDF POS=(18,22),LENGTH=11,ATTRB=(ASKIP) 00176*10 SPACE 00177**7 DFHMDF POS=(18,36),LENGTH=03,ATTRB=(ASKIP), *00178**7 INITIAL='TO:' 00179**7 SPACE 00180**7 F7B1840 DFHMDF POS=(18,40),LENGTH=40,ATTRB=(ASKIP) 00181**7 SPACE 00182**7 DFHMDF POS=(20,01),LENGTH=11,ATTRB=(ASKIP), *00183**7 INITIAL='REC OCC ID:' 00184**7 SPACE 00185**7 F7B2013 DFHMDF POS=(20,13),LENGTH=20,ATTRB=(ASKIP) 00186**7 SPACE 00187**7 DFHMDF POS=(20,41),LENGTH=08,ATTRB=(ASKIP), *00188**7 INITIAL='DE NAME:' 00189**7 SPACE 00190**7 F7B2050 DFHMDF POS=(20,50),LENGTH=30,ATTRB=(ASKIP) 00191*10 SPACE 00192**7 DFHMDF POS=(21,03),LENGTH=09,ATTRB=(ASKIP), *00193**7 INITIAL='MODIFIED:' 00194**7 SPACE 00195**7 F7B2113 DFHMDF POS=(21,13),LENGTH=18,ATTRB=(ASKIP) 00196**7 SPACE 00197**7 DFHMDF POS=(21,34),LENGTH=05,ATTRB=(ASKIP), *00198**7 INITIAL='FROM:' 00199**7 SPACE 00200**7 F7B2140 DFHMDF POS=(21,40),LENGTH=40,ATTRB=(ASKIP) 00201**7 SPACE 00202**7 DFHMDF POS=(22,09),LENGTH=03,ATTRB=(ASKIP), *00203**7 INITIAL='BY:' 00204**7 SPACE 00205**7 F7B2213 DFHMDF POS=(22,13),LENGTH=08,ATTRB=(ASKIP) 00206**7 SPACE 00207**7 F7B2222 DFHMDF POS=(22,22),LENGTH=11,ATTRB=(ASKIP) 00208*10 SPACE 00209**7 DFHMDF POS=(22,36),LENGTH=03,ATTRB=(ASKIP), *00210**7 INITIAL='TO:' 00211**7 SPACE 00212**7 F7B2240 DFHMDF POS=(22,40),LENGTH=40,ATTRB=(ASKIP) 00213**7 SPACE 00214 F7B2310 DFHMDF POS=(23,10),LENGTH=08,ATTRB=(ASKIP) 00215*12 SPACE 00216 F7B2319 DFHMDF POS=(23,19),LENGTH=07,ATTRB=(ASKIP) 00217**3 SPACE 00218 F7B2328 DFHMDF POS=(23,28),LENGTH=07,ATTRB=(ASKIP) 00219**3 SPACE 00220 F7B2337 DFHMDF POS=(23,37),LENGTH=07,ATTRB=(ASKIP) 00221**3 SPACE 00222 F7B2401 DFHMDF POS=(24,01),LENGTH=08,ATTRB=(ASKIP) 00223**3 SPACE 00224 F7B2410 DFHMDF POS=(24,10),LENGTH=58,ATTRB=(ASKIP) 00225**3 SPACE 00226 DFHMDF POS=(24,69),LENGTH=06,ATTRB=(ASKIP), *00227 INITIAL='GO TO:' 00228 SPACE 00229 F7B2476 DFHMDF POS=(24,76),LENGTH=02,ATTRB=(ASKIP) 00230**3 SPACE 00231 DFHMDF POS=(24,79),LENGTH=01,ATTRB=(ASKIP) 00232