* DATA SET DTSM17 AT LEVEL 003 AS OF 10/22/98 * DATA SET MACM17 AT LEVEL 036 AS OF 11/18/95 00001 ***** 00002 * 00003 * 17 SPAN OF LIABILITY INQUIRY/UPDATE 00004 * 00005 ***** 00006 SPACE 00007 DTSM17 DFHMDI SIZE=(24,80),LINE=1,COLUMN=1 00008**2 SPACE 00009 F170101 DFHMDF POS=(1,1),LENGTH=02,ATTRB=(FSET,ASKIP), *00010 INITIAL='17' 00011 SPACE 00012 DFHMDF POS=(1,21),LENGTH=32,ATTRB=(ASKIP), *00013 INITIAL='SPAN OF LIABILITY INQUIRY/UPDATE' 00014 SPACE 00015 F170162 DFHMDF POS=(1,62),LENGTH=08,ATTRB=(ASKIP) 00016 SPACE 00017 F170172 DFHMDF POS=(1,72),LENGTH=08,ATTRB=(ASKIP) 00018 SPACE 00019 F170272 DFHMDF POS=(02,72),LENGTH=08,ATTRB=(ASKIP) 00020 SPACE 00021 DFHMDF POS=(03,02),LENGTH=07,ATTRB=(ASKIP), *00022 INITIAL='EMP NO:' 00023 SPACE 00024 F170310 DFHMDF POS=(03,10),LENGTH=03,ATTRB=(ASKIP) 00025 SPACE 00026 F170314 DFHMDF POS=(03,14),LENGTH=03,ATTRB=(ASKIP) 00027 SPACE 00028 DFHMDF POS=(03,18),LENGTH=01,ATTRB=(ASKIP) 00029 SPACE 00030 F170320 DFHMDF POS=(03,20),LENGTH=40,ATTRB=(ASKIP) 00031 SPACE 00032 F170372 DFHMDF POS=(03,72),LENGTH=02,ATTRB=(ASKIP) 00033 SPACE 00034 DFHMDF POS=(03,75),LENGTH=02,ATTRB=(ASKIP), *00035 INITIAL='OF' 00036 SPACE 00037 F170378 DFHMDF POS=(03,78),LENGTH=02,ATTRB=(ASKIP) 00038 SPACE 00039 DFHMDF POS=(05,12),LENGTH=10,ATTRB=(ASKIP), *00040 INITIAL='LIAB DATE:' 00041 SPACE 00042 F170523 DFHMDF POS=(05,23),LENGTH=02,ATTRB=(ASKIP) 00043 SPACE 00044 F170526 DFHMDF POS=(05,26),LENGTH=02,ATTRB=(ASKIP) 00045 SPACE 00046 F170529 DFHMDF POS=(05,29),LENGTH=02,ATTRB=(ASKIP) 00047 SPACE 00048 DFHMDF POS=(05,32),LENGTH=01,ATTRB=(ASKIP) 00049 SPACE 00050 DFHMDF POS=(05,36),LENGTH=15,ATTRB=(ASKIP), *00051 INITIAL='FIRST LIAB QTR:' 00052 SPACE 00053 F170552 DFHMDF POS=(05,52),LENGTH=04,ATTRB=(ASKIP) 00054 SPACE 00055 DFHMDF POS=(05,63),LENGTH=06,ATTRB=(ASKIP), *00056 INITIAL='CLASS:' 00057 SPACE 00058 F170570 DFHMDF POS=(05,70),LENGTH=10,ATTRB=(ASKIP) 00059 SPACE 00060 DFHMDF POS=(06,06),LENGTH=16,ATTRB=(ASKIP), *00061 INITIAL='LIAB ESTAB DATE:' 00062 SPACE 00063 F170623 DFHMDF POS=(06,23),LENGTH=02,ATTRB=(ASKIP) 00064 SPACE 00065 F170626 DFHMDF POS=(06,26),LENGTH=02,ATTRB=(ASKIP) 00066 SPACE 00067 F170629 DFHMDF POS=(06,29),LENGTH=02,ATTRB=(ASKIP) 00068 SPACE 00069 DFHMDF POS=(06,32),LENGTH=01,ATTRB=(ASKIP) 00070 SPACE 00071 DFHMDF POS=(08,12),LENGTH=10,ATTRB=(ASKIP), *00072 INITIAL='LIAB CODE:' 00073 SPACE 00074 F170823 DFHMDF POS=(08,23),LENGTH=02,ATTRB=(ASKIP) 00075 SPACE 00076 DFHMDF POS=(08,26),LENGTH=01,ATTRB=(ASKIP) 00077 SPACE 00078 F170828 DFHMDF POS=(08,28),LENGTH=10,ATTRB=(ASKIP) 00079 SPACE 00080 DFHMDF POS=(10,11),LENGTH=11,ATTRB=(ASKIP), *00081 INITIAL='INACT DATE:' 00082 SPACE 00083 F171023 DFHMDF POS=(10,23),LENGTH=02,ATTRB=(ASKIP) 00084 SPACE 00085 F171026 DFHMDF POS=(10,26),LENGTH=02,ATTRB=(ASKIP) 00086 SPACE 00087 F171029 DFHMDF POS=(10,29),LENGTH=02,ATTRB=(ASKIP) 00088 SPACE 00089 DFHMDF POS=(10,32),LENGTH=01,ATTRB=(ASKIP) 00090 SPACE 00091 DFHMDF POS=(10,37),LENGTH=14,ATTRB=(ASKIP), *00092 INITIAL='LAST LIAB QTR:' 00093 SPACE 00094 F171052 DFHMDF POS=(10,52),LENGTH=04,ATTRB=(ASKIP) 00095 SPACE 00096 DFHMDF POS=(12,11),LENGTH=11,ATTRB=(ASKIP), *00097 INITIAL='INACT CODE:' 00098 SPACE 00099 F171223 DFHMDF POS=(12,23),LENGTH=02,ATTRB=(ASKIP) 00100 SPACE 00101 DFHMDF POS=(12,26),LENGTH=01,ATTRB=(ASKIP) 00102 SPACE 00103 F171228 DFHMDF POS=(12,28),LENGTH=10,ATTRB=(ASKIP) 00104 SPACE 00105 DFHMDF POS=(12,42),LENGTH=18,ATTRB=(ASKIP), *00106 INITIAL='INACT LETTER TYPE:' 00107 SPACE 00108 F171261 DFHMDF POS=(12,61),LENGTH=01,ATTRB=(ASKIP) 00109 SPACE 00110 DFHMDF POS=(12,63),LENGTH=01,ATTRB=(ASKIP) 00111 SPACE 00112 DFHMDF POS=(14,13),LENGTH=09,ATTRB=(ASKIP), *00113 INITIAL='TRANSFER?' 00114 SPACE 00115 F171423 DFHMDF POS=(14,23),LENGTH=01,ATTRB=(ASKIP) 00116 SPACE 00117 DFHMDF POS=(14,25),LENGTH=01,ATTRB=(ASKIP) 00118 SPACE 00119 DFHMDF POS=(14,29),LENGTH=12,ATTRB=(ASKIP), *00120 INITIAL='TRANSFER TO:' 00121 SPACE 00122 F171442 DFHMDF POS=(14,42),LENGTH=03,ATTRB=(ASKIP) 00123 SPACE 00124 F171446 DFHMDF POS=(14,46),LENGTH=03,ATTRB=(ASKIP) 00125 SPACE 00126 DFHMDF POS=(14,50),LENGTH=01,ATTRB=(ASKIP) 00127 SPACE 00128 DFHMDF POS=(14,54),LENGTH=15,ATTRB=(ASKIP), *00129 INITIAL='OVERRIDE EDITS?' 00130 SPACE 00131 F171470 DFHMDF POS=(14,70),LENGTH=01,ATTRB=(ASKIP) 00132 SPACE 00133 DFHMDF POS=(14,72),LENGTH=01,ATTRB=(ASKIP) 00134 SPACE 00135 DFHMDF POS=(16,05),LENGTH=17,ATTRB=(ASKIP), *00136 INITIAL='OPID RESPONSIBLE:' 00137 SPACE 00138 F171623 DFHMDF POS=(16,23),LENGTH=08,ATTRB=(ASKIP) 00139**3 SPACE 00140 DFHMDF POS=(16,32),LENGTH=01,ATTRB=(ASKIP) 00141**3 SPACE 00142 F171634 DFHMDF POS=(16,34),LENGTH=10,ATTRB=(ASKIP) 00143**3 SPACE 00144 DFHMDF POS=(16,53),LENGTH=16,ATTRB=(ASKIP), *00145 INITIAL='581/TPS NEW EMP?' 00146**3 SPACE 00147 F171670 DFHMDF POS=(16,70),LENGTH=01,ATTRB=(ASKIP) 00148 SPACE 00149 DFHMDF POS=(17,06),LENGTH=16,ATTRB=(ASKIP), *00150 INITIAL='LIAB ENTER DATE:' 00151 SPACE 00152 F171723 DFHMDF POS=(17,23),LENGTH=08,ATTRB=(ASKIP) 00153 SPACE 00154 DFHMDF POS=(17,40),LENGTH=15,ATTRB=(ASKIP), *00155 INITIAL='LIAB MAIL DATE:' 00156 SPACE 00157 F171756 DFHMDF POS=(17,56),LENGTH=08,ATTRB=(ASKIP) 00158 SPACE 00159 DFHMDF POS=(18,05),LENGTH=17,ATTRB=(ASKIP), *00160 INITIAL='INACT ENTER DATE:' 00161 SPACE 00162 F171823 DFHMDF POS=(18,23),LENGTH=08,ATTRB=(ASKIP) 00163 SPACE 00164 DFHMDF POS=(18,36),LENGTH=19,ATTRB=(ASKIP), *00165 INITIAL='INACT REVERSE DATE:' 00166 SPACE 00167 F171856 DFHMDF POS=(18,56),LENGTH=08,ATTRB=(ASKIP) 00168 SPACE 00169 F172310 DFHMDF POS=(23,10),LENGTH=08,ATTRB=(ASKIP) 00170 SPACE 00171 F172320 DFHMDF POS=(23,20),LENGTH=07,ATTRB=(ASKIP) 00172 SPACE 00173 F172329 DFHMDF POS=(23,29),LENGTH=07,ATTRB=(ASKIP) 00174 SPACE 00175 F172338 DFHMDF POS=(23,38),LENGTH=07,ATTRB=(ASKIP) 00176 SPACE 00177 F172351 DFHMDF POS=(23,51),LENGTH=07,ATTRB=(ASKIP) 00178 SPACE 00179 F172401 DFHMDF POS=(24,01),LENGTH=08,ATTRB=(ASKIP) 00180 SPACE 00181 F172410 DFHMDF POS=(24,10),LENGTH=58,ATTRB=(ASKIP) 00182 SPACE 00183 DFHMDF POS=(24,69),LENGTH=06,ATTRB=(ASKIP), *00184 INITIAL='GO TO:' 00185 SPACE 00186 F172476 DFHMDF POS=(24,76),LENGTH=02,ATTRB=(ASKIP) 00187 SPACE 00188 DFHMDF POS=(24,79),LENGTH=01,ATTRB=(ASKIP) 00189