commiting everything bcz i am moving all stuff to another machine 10.57.100.120

This commit is contained in:
faizana
2025-08-29 14:07:12 -04:00
parent ef98c08de5
commit 47c88673c2
42 changed files with 127557 additions and 290 deletions

View File

@ -1,176 +1,166 @@
* DATA SET DTSM82 AT LEVEL 014 AS OF 04/01/13
* DATA SET DTSM82 AT LEVEL 002 AS OF 02/21/13 00001
* DATA SET DTSM82 AT LEVEL 012 AS OF 02/19/10 00002
* DATA SET DTSM82 AT LEVEL 006 AS OF 02/18/10 00003
* DATA SET DTSM82 AT LEVEL 010 AS OF 05/07/02 00004
* DATA SET DTSM82 AT LEVEL 003 AS OF 04/24/02 00005
* DATA SET DTSM82 AT LEVEL 008 AS OF 09/22/98 00006
* DATA SET MACM82 AT LEVEL 004 AS OF 01/23/95 00007
***** 00008
* 00009
* 82 QUARTER INQUIRY/UPDATE. 00010
* 00011
***** 00012
SPACE 00013
DTSM82 DFHMDI SIZE=(24,80),LINE=1,COLUMN=1 00014
SPACE 00015
F820101 DFHMDF POS=(01,01),LENGTH=02,ATTRB=(FSET,ASKIP), *00016
INITIAL='82' 00017
SPACE 00018
DFHMDF POS=(01,15),LENGTH=31,ATTRB=(ASKIP), *00019
INITIAL='CALENDAR QUARTER INQUIRY/UPDATE' 00020
SPACE 00021
F820162 DFHMDF POS=(01,62),LENGTH=08,ATTRB=ASKIP 00022
SPACE 00023
F820172 DFHMDF POS=(01,72),LENGTH=08,ATTRB=ASKIP 00024
SPACE 00025
F820272 DFHMDF POS=(02,72),LENGTH=08,ATTRB=ASKIP 00026
SPACE 00027
DFHMDF POS=(03,19),LENGTH=08,ATTRB=ASKIP, *00028
INITIAL='QUARTER:' 00029
SPACE 00030
F820328 DFHMDF POS=(03,28),LENGTH=02,ATTRB=ASKIP 00031
SPACE 00032
F820331 DFHMDF POS=(03,31),LENGTH=01,ATTRB=ASKIP 00033
SPACE 00034
DFHMDF POS=(03,33),LENGTH=01,ATTRB=ASKIP 00035
SPACE 00036
DFHMDF POS=(05,08),LENGTH=19,ATTRB=ASKIP, *00037
INITIAL='UC-30 MASS MAILING:' 00038
SPACE 00039
F820528 DFHMDF POS=(05,28),LENGTH=02,ATTRB=ASKIP 00040
SPACE 00041
F820531 DFHMDF POS=(05,31),LENGTH=02,ATTRB=ASKIP 00042
SPACE 00043
F820534 DFHMDF POS=(05,34),LENGTH=02,ATTRB=ASKIP 00044
SPACE 00045
DFHMDF POS=(05,37),LENGTH=01,ATTRB=ASKIP 00046
SPACE 00047
DFHMDF POS=(05,40),LENGTH=26,ATTRB=ASKIP, *00048
INITIAL=' SELF INSURED CHARGES RUN:' 00049
SPACE 00050
F820567 DFHMDF POS=(05,67),LENGTH=02,ATTRB=ASKIP 00051
SPACE 00052
F820570 DFHMDF POS=(05,70),LENGTH=02,ATTRB=ASKIP 00053
SPACE 00054
F820571 DFHMDF POS=(05,73),LENGTH=02,ATTRB=ASKIP 00055
SPACE 00056
DFHMDF POS=(05,76),LENGTH=01,ATTRB=ASKIP 00057
SPACE 00058
DFHMDF POS=(07,05),LENGTH=22,ATTRB=ASKIP, *00059
INITIAL='LATE PENALTY ASSESSED:' 00060
SPACE 00061
F820728 DFHMDF POS=(07,28),LENGTH=02,ATTRB=ASKIP 00062
SPACE 00063
F820731 DFHMDF POS=(07,31),LENGTH=02,ATTRB=ASKIP 00064
SPACE 00065
F820734 DFHMDF POS=(07,34),LENGTH=02,ATTRB=ASKIP 00066
SPACE 00067
DFHMDF POS=(07,37),LENGTH=01,ATTRB=ASKIP 00068
SPACE 00069
DFHMDF POS=(07,44),LENGTH=22,ATTRB=ASKIP, *00070
INITIAL=' SELF INSURED TAX DUE:' 00071
SPACE 00072
F820767 DFHMDF POS=(07,67),LENGTH=02,ATTRB=ASKIP 00073
SPACE 00074
F820770 DFHMDF POS=(07,70),LENGTH=02,ATTRB=ASKIP 00075
SPACE 00076
F820773 DFHMDF POS=(07,73),LENGTH=02,ATTRB=ASKIP 00077
SPACE 00078
DFHMDF POS=(07,76),LENGTH=01,ATTRB=ASKIP 00079
SPACE 00080
DFHMDF POS=(09,04),LENGTH=23,ATTRB=ASKIP, *00081
INITIAL='UC-30 FIRST DELINQUENT:' 00082
SPACE 00083
F820928 DFHMDF POS=(09,28),LENGTH=02,ATTRB=ASKIP 00084
SPACE 00085
F820931 DFHMDF POS=(09,31),LENGTH=02,ATTRB=ASKIP 00086
SPACE 00087
F820934 DFHMDF POS=(09,34),LENGTH=02,ATTRB=ASKIP 00088
SPACE 00089
DFHMDF POS=(09,37),LENGTH=01,ATTRB=ASKIP 00090
SPACE 00091
DFHMDF POS=(09,40),LENGTH=26,ATTRB=ASKIP, *00092
INITIAL=' SELF INSURED 2ND LETTER:' 00093
SPACE 00094
F820967 DFHMDF POS=(09,67),LENGTH=02,ATTRB=ASKIP 00095
SPACE 00096
F820970 DFHMDF POS=(09,70),LENGTH=02,ATTRB=ASKIP 00097
SPACE 00098
F820973 DFHMDF POS=(09,73),LENGTH=02,ATTRB=ASKIP 00099
SPACE 00100
DFHMDF POS=(09,76),LENGTH=01,ATTRB=ASKIP 00101
SPACE 00102
DFHMDF POS=(11,04),LENGTH=23,ATTRB=ASKIP, *00103
INITIAL=' UC-30 2ND DELINQUENT:' 00104
SPACE 00105
F821128 DFHMDF POS=(11,28),LENGTH=02,ATTRB=ASKIP 00106
SPACE 00107
F821131 DFHMDF POS=(11,31),LENGTH=02,ATTRB=ASKIP 00108
SPACE 00109
F821134 DFHMDF POS=(11,34),LENGTH=02,ATTRB=ASKIP 00110
SPACE 00111
DFHMDF POS=(11,37),LENGTH=01,ATTRB=ASKIP 00112
SPACE 00113
DFHMDF POS=(11,40),LENGTH=26,ATTRB=ASKIP, *00114
INITIAL='SELF INS LATE PENALTY RUN:' 00115
SPACE 00116
F821167 DFHMDF POS=(11,67),LENGTH=02,ATTRB=ASKIP 00117
SPACE 00118
F821170 DFHMDF POS=(11,70),LENGTH=02,ATTRB=ASKIP 00119
SPACE 00120
F821171 DFHMDF POS=(11,73),LENGTH=02,ATTRB=ASKIP 00121
SPACE 00122
DFHMDF POS=(11,76),LENGTH=01,ATTRB=ASKIP 00123
SPACE 00124
DFHMDF POS=(13,04),LENGTH=23,ATTRB=ASKIP, *00125
INITIAL='UC30 FINAL ACTION DATE:' 00126
SPACE 00127
F821328 DFHMDF POS=(13,28),LENGTH=02,ATTRB=ASKIP 00128
SPACE 00129
F821331 DFHMDF POS=(13,31),LENGTH=02,ATTRB=ASKIP 00130
SPACE 00131
F821334 DFHMDF POS=(13,34),LENGTH=02,ATTRB=ASKIP 00132
SPACE 00133
DFHMDF POS=(13,37),LENGTH=01,ATTRB=ASKIP 00134
SPACE 00135
DFHMDF POS=(15,03),LENGTH=24,ATTRB=ASKIP, *00136
INITIAL=' ESTIMATED NOTICE DATE:' 00137
SPACE 00138
F821728 DFHMDF POS=(15,28),LENGTH=02,ATTRB=ASKIP 00139
SPACE 00140
F821731 DFHMDF POS=(15,31),LENGTH=02,ATTRB=ASKIP 00141
SPACE 00142
F821734 DFHMDF POS=(15,34),LENGTH=02,ATTRB=ASKIP 00143
SPACE 00144
DFHMDF POS=(15,37),LENGTH=01,ATTRB=ASKIP 00145
SPACE 00146
DFHMDF POS=(20,10),LENGTH=10,ATTRB=ASKIP, *00147
INITIAL='ESTB DATE:' 00148
* DATA SET DTSM82 AT LEVEL 006 AS OF 08/14/25
* DATA SET DTSM82 AT LEVEL 014 AS OF 04/01/13 00001
* DATA SET DTSM82 AT LEVEL 002 AS OF 02/21/13 00002
* DATA SET DTSM82 AT LEVEL 012 AS OF 02/19/10 00003
* DATA SET DTSM82 AT LEVEL 006 AS OF 02/18/10 00004
* DATA SET DTSM82 AT LEVEL 010 AS OF 05/07/02 00005
* DATA SET DTSM82 AT LEVEL 003 AS OF 04/24/02 00006
* DATA SET DTSM82 AT LEVEL 008 AS OF 09/22/98 00007
* DATA SET MACM82 AT LEVEL 004 AS OF 01/23/95 00008
***** 00009
* 00010
* 82 QUARTER INQUIRY/UPDATE. 00011
* 00012
***** 00013
SPACE 00014
DTSM82 DFHMDI SIZE=(24,80),LINE=1,COLUMN=1 00015
SPACE 00016
F820101 DFHMDF POS=(01,01),LENGTH=02,ATTRB=(FSET,ASKIP), *00017
INITIAL='82' 00018
SPACE 00019
DFHMDF POS=(01,15),LENGTH=31,ATTRB=(ASKIP), *00020
INITIAL='CALENDAR QUARTER INQUIRY/UPDATE' 00021
SPACE 00022
F820162 DFHMDF POS=(01,62),LENGTH=08,ATTRB=ASKIP 00023
SPACE 00024
F820172 DFHMDF POS=(01,72),LENGTH=08,ATTRB=ASKIP 00025
SPACE 00026
F820272 DFHMDF POS=(02,72),LENGTH=08,ATTRB=ASKIP 00027
SPACE 00028
DFHMDF POS=(03,19),LENGTH=08,ATTRB=ASKIP, *00029
INITIAL='QUARTER:' 00030
SPACE 00031
F820328 DFHMDF POS=(03,28),LENGTH=02,ATTRB=ASKIP 00032
SPACE 00033
F820331 DFHMDF POS=(03,31),LENGTH=01,ATTRB=ASKIP 00034
SPACE 00035
DFHMDF POS=(03,33),LENGTH=01,ATTRB=ASKIP 00036
SPACE 00037
DFHMDF POS=(05,08),LENGTH=19,ATTRB=ASKIP, *00038
INITIAL='QUARTER START DATE:' 00039**4
SPACE 00040
F820528 DFHMDF POS=(05,28),LENGTH=02,ATTRB=ASKIP 00041
SPACE 00042
F820531 DFHMDF POS=(05,31),LENGTH=02,ATTRB=ASKIP 00043
SPACE 00044
F820534 DFHMDF POS=(05,34),LENGTH=02,ATTRB=ASKIP 00045
SPACE 00046
DFHMDF POS=(05,37),LENGTH=01,ATTRB=ASKIP 00047
SPACE 00048
DFHMDF POS=(05,40),LENGTH=26,ATTRB=ASKIP, *00049
INITIAL=' SELF INSURED CHARGES RUN:' 00050
SPACE 00051
F820567 DFHMDF POS=(05,67),LENGTH=02,ATTRB=ASKIP 00052
SPACE 00053
F820570 DFHMDF POS=(05,70),LENGTH=02,ATTRB=ASKIP 00054
SPACE 00055
F820571 DFHMDF POS=(05,73),LENGTH=02,ATTRB=ASKIP 00056
SPACE 00057
DFHMDF POS=(05,76),LENGTH=01,ATTRB=ASKIP 00058
SPACE 00059
DFHMDF POS=(07,05),LENGTH=22,ATTRB=ASKIP, *00060
INITIAL='LATE PENALTY ASSESSED:' 00061
SPACE 00062
F820728 DFHMDF POS=(07,28),LENGTH=02,ATTRB=ASKIP 00063
SPACE 00064
F820731 DFHMDF POS=(07,31),LENGTH=02,ATTRB=ASKIP 00065
SPACE 00066
F820734 DFHMDF POS=(07,34),LENGTH=02,ATTRB=ASKIP 00067
SPACE 00068
DFHMDF POS=(07,37),LENGTH=01,ATTRB=ASKIP 00069
SPACE 00070
DFHMDF POS=(07,44),LENGTH=22,ATTRB=ASKIP, *00071
INITIAL=' SELF INSURED TAX DUE:' 00072
SPACE 00073
F820767 DFHMDF POS=(07,67),LENGTH=02,ATTRB=ASKIP 00074
SPACE 00075
F820770 DFHMDF POS=(07,70),LENGTH=02,ATTRB=ASKIP 00076
SPACE 00077
F820773 DFHMDF POS=(07,73),LENGTH=02,ATTRB=ASKIP 00078
SPACE 00079
DFHMDF POS=(07,76),LENGTH=01,ATTRB=ASKIP 00080
SPACE 00081
DFHMDF POS=(09,04),LENGTH=23,ATTRB=ASKIP, *00082
INITIAL='UC-30 FIRST DELINQUENT:' 00083
SPACE 00084
F820928 DFHMDF POS=(09,28),LENGTH=02,ATTRB=ASKIP 00085
SPACE 00086
F820931 DFHMDF POS=(09,31),LENGTH=02,ATTRB=ASKIP 00087
SPACE 00088
F820934 DFHMDF POS=(09,34),LENGTH=02,ATTRB=ASKIP 00089
SPACE 00090
DFHMDF POS=(09,37),LENGTH=01,ATTRB=ASKIP 00091
SPACE 00092
DFHMDF POS=(09,40),LENGTH=26,ATTRB=ASKIP, *00093
INITIAL='LAST MONTHLY SOA RUN DATE:' 00094**4
SPACE 00095
F820967 DFHMDF POS=(09,67),LENGTH=02,ATTRB=ASKIP 00096
SPACE 00097
F820970 DFHMDF POS=(09,70),LENGTH=02,ATTRB=ASKIP 00098
SPACE 00099
F820973 DFHMDF POS=(09,73),LENGTH=02,ATTRB=ASKIP 00100
SPACE 00101
DFHMDF POS=(09,76),LENGTH=01,ATTRB=ASKIP 00102
SPACE 00103
DFHMDF POS=(11,04),LENGTH=23,ATTRB=ASKIP, *00104
INITIAL=' UC-30 2ND DELINQUENT:' 00105
SPACE 00106
F821128 DFHMDF POS=(11,28),LENGTH=02,ATTRB=ASKIP 00107
SPACE 00108
F821131 DFHMDF POS=(11,31),LENGTH=02,ATTRB=ASKIP 00109
SPACE 00110
F821134 DFHMDF POS=(11,34),LENGTH=02,ATTRB=ASKIP 00111
SPACE 00112
DFHMDF POS=(11,37),LENGTH=01,ATTRB=ASKIP 00113
SPACE 00114
DFHMDF POS=(13,04),LENGTH=23,ATTRB=ASKIP, *00115
INITIAL='UC30 FINAL ACTION DATE:' 00116
SPACE 00117
F821328 DFHMDF POS=(13,28),LENGTH=02,ATTRB=ASKIP 00118
SPACE 00119
F821331 DFHMDF POS=(13,31),LENGTH=02,ATTRB=ASKIP 00120
SPACE 00121
F821334 DFHMDF POS=(13,34),LENGTH=02,ATTRB=ASKIP 00122
SPACE 00123
DFHMDF POS=(13,37),LENGTH=01,ATTRB=ASKIP 00124
SPACE 00125
DFHMDF POS=(15,03),LENGTH=24,ATTRB=ASKIP, *00126
INITIAL=' ESTIMATED NOTICE DATE:' 00127
SPACE 00128
F821728 DFHMDF POS=(15,28),LENGTH=02,ATTRB=ASKIP 00129
SPACE 00130
F821731 DFHMDF POS=(15,31),LENGTH=02,ATTRB=ASKIP 00131
SPACE 00132
F821734 DFHMDF POS=(15,34),LENGTH=02,ATTRB=ASKIP 00133
SPACE 00134
DFHMDF POS=(15,37),LENGTH=01,ATTRB=ASKIP 00135
SPACE 00136
DFHMDF POS=(20,10),LENGTH=10,ATTRB=ASKIP, *00137
INITIAL='ESTB DATE:' 00138
SPACE 00139
F822021 DFHMDF POS=(20,21),LENGTH=08,ATTRB=ASKIP 00140
DFHMDF POS=(20,40),LENGTH=10,ATTRB=ASKIP, *00141
INITIAL='CHNG DATE:' 00142
SPACE 00143
F822051 DFHMDF POS=(20,51),LENGTH=08,ATTRB=ASKIP 00144
SPACE 00145
F822318 DFHMDF POS=(23,18),LENGTH=07,ATTRB=ASKIP 00146
SPACE 00147
F822327 DFHMDF POS=(23,27),LENGTH=07,ATTRB=ASKIP 00148
SPACE 00149
F822021 DFHMDF POS=(20,21),LENGTH=08,ATTRB=ASKIP 00150
DFHMDF POS=(20,40),LENGTH=10,ATTRB=ASKIP, *00151
INITIAL='CHNG DATE:' 00152
F822338 DFHMDF POS=(23,38),LENGTH=07,ATTRB=ASKIP 00150
SPACE 00151
F822346 DFHMDF POS=(23,46),LENGTH=07,ATTRB=ASKIP 00152
SPACE 00153
F822051 DFHMDF POS=(20,51),LENGTH=08,ATTRB=ASKIP 00154
F822355 DFHMDF POS=(23,55),LENGTH=07,ATTRB=ASKIP 00154
SPACE 00155
F822318 DFHMDF POS=(23,18),LENGTH=07,ATTRB=ASKIP 00156
F822401 DFHMDF POS=(24,01),LENGTH=08,ATTRB=ASKIP 00156
SPACE 00157
F822327 DFHMDF POS=(23,27),LENGTH=07,ATTRB=ASKIP 00158
F822410 DFHMDF POS=(24,10),LENGTH=58,ATTRB=ASKIP 00158
SPACE 00159
F822338 DFHMDF POS=(23,38),LENGTH=07,ATTRB=ASKIP 00160
SPACE 00161
F822346 DFHMDF POS=(23,46),LENGTH=07,ATTRB=ASKIP 00162
SPACE 00163
F822355 DFHMDF POS=(23,55),LENGTH=07,ATTRB=ASKIP 00164
SPACE 00165
F822401 DFHMDF POS=(24,01),LENGTH=08,ATTRB=ASKIP 00166
SPACE 00167
F822410 DFHMDF POS=(24,10),LENGTH=58,ATTRB=ASKIP 00168
SPACE 00169
DFHMDF POS=(24,69),LENGTH=06,ATTRB=ASKIP, *00170
INITIAL='GO TO:' 00171
SPACE 00172
F822476 DFHMDF POS=(24,76),LENGTH=02,ATTRB=ASKIP 00173
SPACE 00174
DFHMDF POS=(24,79),LENGTH=01,ATTRB=ASKIP 00175
DFHMDF POS=(24,69),LENGTH=06,ATTRB=ASKIP, *00160
INITIAL='GO TO:' 00161
SPACE 00162
F822476 DFHMDF POS=(24,76),LENGTH=02,ATTRB=ASKIP 00163
SPACE 00164
DFHMDF POS=(24,79),LENGTH=01,ATTRB=ASKIP 00165

32645
Maps/DTSMSET.cpy Normal file

File diff suppressed because it is too large Load Diff

93573
Maps/DTSMSET.xml Normal file

File diff suppressed because it is too large Load Diff