191 lines
14 KiB
Plaintext
191 lines
14 KiB
Plaintext
* 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
|