DUTAS re-platformed to Raincode - Initial Source Code
This commit is contained in:
Neeraj Kumar
127
Maps/DTSM8C.bms
Normal file
127
Maps/DTSM8C.bms
Normal file
@ -0,0 +1,127 @@
|
||||
* DATA SET DTSM8C AT LEVEL 001 AS OF 01/29/02
|
||||
* DATA SET DTSM8C AT LEVEL 004 AS OF 11/28/01 00001
|
||||
***** 00002
|
||||
* 00003
|
||||
* 8C ANNUAL FILER INQUIRY/UPDATE. 00004
|
||||
* 00005
|
||||
* 11/26/2001 ADDED FOR HOUSEHOLD. ZL1. 00006
|
||||
* 00007
|
||||
***** 00008
|
||||
SPACE 00009
|
||||
DTSM8C DFHMDI SIZE=(24,80),LINE=1,COLUMN=1 00010
|
||||
SPACE 00011
|
||||
F8C0101 DFHMDF POS=(01,01),LENGTH=02,ATTRB=(FSET,ASKIP), *00012
|
||||
INITIAL='8C' 00013
|
||||
SPACE 00014
|
||||
DFHMDF POS=(01,21),LENGTH=28,ATTRB=(ASKIP), *00015
|
||||
INITIAL='ANNUAL FILER INQUIRY/UPDATE ' 00016
|
||||
SPACE 00017
|
||||
F8C0162 DFHMDF POS=(01,62),LENGTH=08,ATTRB=ASKIP 00018
|
||||
SPACE 00019
|
||||
F8C0172 DFHMDF POS=(01,72),LENGTH=08,ATTRB=ASKIP 00020
|
||||
SPACE 00021
|
||||
F8C0272 DFHMDF POS=(02,72),LENGTH=08,ATTRB=ASKIP 00022
|
||||
SPACE 00023
|
||||
DFHMDF POS=(03,20),LENGTH=27,ATTRB=ASKIP, *00024
|
||||
INITIAL=' CALENDAR YEAR:' 00025
|
||||
SPACE 00026
|
||||
F8C0339 DFHMDF POS=(03,48),LENGTH=02,ATTRB=ASKIP 00027
|
||||
SPACE 00028
|
||||
DFHMDF POS=(03,51),LENGTH=01,ATTRB=ASKIP 00029
|
||||
SPACE 00030
|
||||
DFHMDF POS=(05,20),LENGTH=27,ATTRB=ASKIP, *00031
|
||||
INITIAL=' UC30H MASS MAILING DATE:' 00032
|
||||
SPACE 00033
|
||||
F8C0548 DFHMDF POS=(05,48),LENGTH=02,ATTRB=ASKIP 00034
|
||||
SPACE 00035
|
||||
F8C0551 DFHMDF POS=(05,51),LENGTH=02,ATTRB=ASKIP 00036
|
||||
SPACE 00037
|
||||
F8C0554 DFHMDF POS=(05,54),LENGTH=02,ATTRB=ASKIP 00038
|
||||
SPACE 00039
|
||||
DFHMDF POS=(05,57),LENGTH=01,ATTRB=ASKIP 00040
|
||||
SPACE 00041
|
||||
DFHMDF POS=(07,20),LENGTH=27,ATTRB=ASKIP, *00042
|
||||
INITIAL=' UC30H REPORT DUE DATE:' 00043
|
||||
SPACE 00044
|
||||
F8C0748 DFHMDF POS=(07,48),LENGTH=02,ATTRB=ASKIP 00045
|
||||
SPACE 00046
|
||||
F8C0751 DFHMDF POS=(07,51),LENGTH=02,ATTRB=ASKIP 00047
|
||||
SPACE 00048
|
||||
F8C0754 DFHMDF POS=(07,54),LENGTH=02,ATTRB=ASKIP 00049
|
||||
SPACE 00050
|
||||
DFHMDF POS=(07,57),LENGTH=01,ATTRB=ASKIP 00051
|
||||
SPACE 00052
|
||||
DFHMDF POS=(09,20),LENGTH=27,ATTRB=ASKIP, *00053
|
||||
INITIAL='LATE PENALTY ASSESSED DATE:' 00054
|
||||
SPACE 00055
|
||||
F8C0948 DFHMDF POS=(09,48),LENGTH=02,ATTRB=ASKIP 00056
|
||||
SPACE 00057
|
||||
F8C0951 DFHMDF POS=(09,51),LENGTH=02,ATTRB=ASKIP 00058
|
||||
SPACE 00059
|
||||
F8C0954 DFHMDF POS=(09,54),LENGTH=02,ATTRB=ASKIP 00060
|
||||
SPACE 00061
|
||||
DFHMDF POS=(09,57),LENGTH=01,ATTRB=ASKIP 00062
|
||||
SPACE 00063
|
||||
DFHMDF POS=(11,20),LENGTH=27,ATTRB=ASKIP, *00064
|
||||
INITIAL=' UC30H FIRST DELETE DATE:' 00065
|
||||
SPACE 00066
|
||||
F8C1148 DFHMDF POS=(11,48),LENGTH=02,ATTRB=ASKIP 00067
|
||||
SPACE 00068
|
||||
F8C1151 DFHMDF POS=(11,51),LENGTH=02,ATTRB=ASKIP 00069
|
||||
SPACE 00070
|
||||
F8C1154 DFHMDF POS=(11,54),LENGTH=02,ATTRB=ASKIP 00071
|
||||
SPACE 00072
|
||||
DFHMDF POS=(11,57),LENGTH=01,ATTRB=ASKIP 00073
|
||||
SPACE 00074
|
||||
DFHMDF POS=(13,20),LENGTH=27,ATTRB=ASKIP, *00075
|
||||
INITIAL=' UC30H FINAL DELETE DATE:' 00076
|
||||
SPACE 00077
|
||||
F8C1348 DFHMDF POS=(13,48),LENGTH=02,ATTRB=ASKIP 00078
|
||||
SPACE 00079
|
||||
F8C1351 DFHMDF POS=(13,51),LENGTH=02,ATTRB=ASKIP 00080
|
||||
SPACE 00081
|
||||
F8C1354 DFHMDF POS=(13,54),LENGTH=02,ATTRB=ASKIP 00082
|
||||
SPACE 00083
|
||||
DFHMDF POS=(13,57),LENGTH=01,ATTRB=ASKIP 00084
|
||||
SPACE 00085
|
||||
DFHMDF POS=(15,20),LENGTH=27,ATTRB=ASKIP, *00086
|
||||
INITIAL=' UC30H FINAL ACTION DATE:' 00087
|
||||
SPACE 00088
|
||||
F8C1548 DFHMDF POS=(15,48),LENGTH=02,ATTRB=ASKIP 00089
|
||||
SPACE 00090
|
||||
F8C1551 DFHMDF POS=(15,51),LENGTH=02,ATTRB=ASKIP 00091
|
||||
SPACE 00092
|
||||
F8C1554 DFHMDF POS=(15,54),LENGTH=02,ATTRB=ASKIP 00093
|
||||
SPACE 00094
|
||||
DFHMDF POS=(15,57),LENGTH=01,ATTRB=ASKIP 00095
|
||||
SPACE 00096
|
||||
DFHMDF POS=(20,59),LENGTH=10,ATTRB=ASKIP, *00097
|
||||
INITIAL='ESTB DATE:' 00098
|
||||
SPACE 00099
|
||||
F8C2070 DFHMDF POS=(20,70),LENGTH=08,ATTRB=ASKIP 00100
|
||||
SPACE 00101
|
||||
DFHMDF POS=(21,59),LENGTH=10,ATTRB=ASKIP, *00102
|
||||
INITIAL='CHNG DATE:' 00103
|
||||
SPACE 00104
|
||||
F8C2170 DFHMDF POS=(21,70),LENGTH=08,ATTRB=ASKIP 00105
|
||||
SPACE 00106
|
||||
F8C2318 DFHMDF POS=(23,18),LENGTH=07,ATTRB=ASKIP 00107
|
||||
SPACE 00108
|
||||
F8C2327 DFHMDF POS=(23,27),LENGTH=07,ATTRB=ASKIP 00109
|
||||
SPACE 00110
|
||||
F8C2338 DFHMDF POS=(23,38),LENGTH=07,ATTRB=ASKIP 00111
|
||||
SPACE 00112
|
||||
F8C2346 DFHMDF POS=(23,46),LENGTH=07,ATTRB=ASKIP 00113
|
||||
SPACE 00114
|
||||
F8C2355 DFHMDF POS=(23,55),LENGTH=07,ATTRB=ASKIP 00115
|
||||
SPACE 00116
|
||||
F8C2401 DFHMDF POS=(24,01),LENGTH=08,ATTRB=ASKIP 00117
|
||||
SPACE 00118
|
||||
F8C2410 DFHMDF POS=(24,10),LENGTH=58,ATTRB=ASKIP 00119
|
||||
SPACE 00120
|
||||
DFHMDF POS=(24,69),LENGTH=06,ATTRB=ASKIP, *00121
|
||||
INITIAL='GO TO:' 00122
|
||||
SPACE 00123
|
||||
F8C2476 DFHMDF POS=(24,76),LENGTH=02,ATTRB=ASKIP 00124
|
||||
SPACE 00125
|
||||
DFHMDF POS=(24,79),LENGTH=01,ATTRB=ASKIP 00126
|
||||
Reference in New Issue
Block a user