DUTAS re-platformed to Raincode - Initial Source Code
This commit is contained in:
232
Maps/DTSM51.bms
Normal file
232
Maps/DTSM51.bms
Normal file
@ -0,0 +1,232 @@
|
||||
* DATA SET DTSM51 AT LEVEL 007 AS OF 06/19/13
|
||||
* DATA SET DTSM51 AT LEVEL 005 AS OF 04/29/13 00001
|
||||
* DATA SET DTSM51 AT LEVEL 005 AS OF 11/11/02 00002
|
||||
* DATA SET DTSM51 AT LEVEL 007 AS OF 07/15/02 00003
|
||||
* DATA SET DTSM51 AT LEVEL 003 AS OF 11/23/98 00004
|
||||
DTSM51 DFHMDI SIZE=(24,80), X00005
|
||||
LINE=1, X00006
|
||||
COLUMN=1 00007
|
||||
SPACE 00008
|
||||
F510101 DFHMDF POS=(1,1),LENGTH=02,ATTRB=(FSET,ASKIP), *00009
|
||||
INITIAL='51' 00010
|
||||
SPACE 00011
|
||||
DFHMDF POS=(1,21), X00012
|
||||
ATTRB=(ASKIP), X00013
|
||||
LENGTH=19, X00014
|
||||
INITIAL='RATE INQUIRY/UPDATE' 00015
|
||||
SPACE 00016
|
||||
F510162 DFHMDF POS=(1,62),LENGTH=08,ATTRB=(ASKIP) 00017
|
||||
SPACE 00018
|
||||
F510172 DFHMDF POS=(1,72),LENGTH=08,ATTRB=(ASKIP) 00019
|
||||
SPACE 00020
|
||||
F510272 DFHMDF POS=(02,72),LENGTH=08,ATTRB=(ASKIP) 00021
|
||||
SPACE 00022
|
||||
DFHMDF POS=(3,1), X00023
|
||||
ATTRB=(ASKIP), X00024
|
||||
LENGTH=7, X00025
|
||||
INITIAL='EMP NO:' 00026
|
||||
SPACE 00027
|
||||
F510309 DFHMDF POS=(3,9), X00028
|
||||
ATTRB=(ASKIP), X00029
|
||||
LENGTH=3 00030
|
||||
SPACE 00031
|
||||
F510313 DFHMDF POS=(3,13), X00032
|
||||
ATTRB=(ASKIP), X00033
|
||||
LENGTH=3 00034
|
||||
SPACE 00035
|
||||
DFHMDF POS=(3,17),ATTRB=ASKIP,LENGTH=1 00036
|
||||
SPACE 00037
|
||||
F510321 DFHMDF POS=(3,21), X00038
|
||||
ATTRB=(ASKIP), X00039
|
||||
LENGTH=40 00040
|
||||
SPACE 00041
|
||||
DFHMDF POS=(3,62),ATTRB=ASKIP,LENGTH=1 00042
|
||||
SPACE 00043
|
||||
F510372 DFHMDF POS=(3,72), X00044
|
||||
ATTRB=(ASKIP), X00045
|
||||
LENGTH=2 00046
|
||||
SPACE 00047
|
||||
DFHMDF POS=(3,75), X00048
|
||||
ATTRB=(ASKIP), X00049
|
||||
LENGTH=2, X00050
|
||||
INITIAL='OF' 00051
|
||||
SPACE 00052
|
||||
F510378 DFHMDF POS=(3,78), X00053
|
||||
ATTRB=(ASKIP), X00054
|
||||
LENGTH=2 00055
|
||||
SPACE 00056
|
||||
DFHMDF POS=(5,8), X00057
|
||||
ATTRB=(ASKIP), X00058
|
||||
LENGTH=18, X00059
|
||||
INITIAL='EFFECTIVE QUARTER:' 00060
|
||||
SPACE 00061
|
||||
F510527 DFHMDF POS=(5,27), X00062
|
||||
ATTRB=(ASKIP), X00063
|
||||
LENGTH=2 00064
|
||||
SPACE 00065
|
||||
F510530 DFHMDF POS=(5,30), X00066
|
||||
ATTRB=(ASKIP), X00067
|
||||
LENGTH=1 00068
|
||||
SPACE 00069
|
||||
DFHMDF POS=(5,32),ATTRB=ASKIP,LENGTH=1 00070
|
||||
SPACE 00071
|
||||
F510541 DFHMDF POS=(5,41), X00072
|
||||
ATTRB=(ASKIP), X00073
|
||||
LENGTH=8 00074
|
||||
SPACE 00075
|
||||
DFHMDF POS=(5,50), X00076
|
||||
ATTRB=(ASKIP), X00077
|
||||
LENGTH=1, X00078
|
||||
INITIAL='-' 00079
|
||||
SPACE 00080
|
||||
F510552 DFHMDF POS=(5,52), X00081
|
||||
ATTRB=(ASKIP), X00082
|
||||
LENGTH=8 00083
|
||||
SPACE 00084
|
||||
DFHMDF POS=(5,61),ATTRB=ASKIP,LENGTH=1 00085
|
||||
SPACE 00086
|
||||
DFHMDF POS=(07,18), X00087
|
||||
ATTRB=(ASKIP), X00088
|
||||
LENGTH=8, X00089
|
||||
INITIAL='UI RATE:' 00090
|
||||
SPACE 00091
|
||||
F510727 DFHMDF POS=(07,27), X00092
|
||||
ATTRB=(ASKIP), X00093
|
||||
LENGTH=4 00094
|
||||
SPACE 00095
|
||||
DFHMDF POS=(07,32),ATTRB=ASKIP,LENGTH=1 00096
|
||||
SPACE 00097
|
||||
DFHMDF POS=(09,8), X00098
|
||||
ATTRB=(ASKIP), X00099
|
||||
LENGTH=18, X00100
|
||||
INITIAL='PRINT RATE NOTICE?' 00101
|
||||
SPACE 00102
|
||||
F510927 DFHMDF POS=(09,27), X00103
|
||||
ATTRB=(ASKIP), X00104
|
||||
LENGTH=1 00105
|
||||
SPACE 00106
|
||||
DFHMDF POS=(09,29),ATTRB=ASKIP,LENGTH=1 00107
|
||||
SPACE 00108
|
||||
DFHMDF POS=(11,9), X00109
|
||||
ATTRB=(ASKIP), X00110
|
||||
LENGTH=17, X00111
|
||||
INITIAL='RATE NOTICE DATE:' 00112
|
||||
SPACE 00113
|
||||
F511127 DFHMDF POS=(11,27), X00114
|
||||
ATTRB=(ASKIP), X00115
|
||||
LENGTH=2 00116
|
||||
SPACE 00117
|
||||
F511130 DFHMDF POS=(11,30), X00118
|
||||
ATTRB=(ASKIP), X00119
|
||||
LENGTH=2 00120
|
||||
SPACE 00121
|
||||
F511133 DFHMDF POS=(11,33), X00122
|
||||
ATTRB=(ASKIP), X00123
|
||||
LENGTH=2 00124
|
||||
SPACE 00125
|
||||
DFHMDF POS=(11,36),ATTRB=ASKIP,LENGTH=1 00126
|
||||
SPACE 00127
|
||||
DFHMDF POS=(13,16), X00128
|
||||
ATTRB=(ASKIP), X00129
|
||||
LENGTH=10, X00130
|
||||
INITIAL='RATE TYPE:' 00131
|
||||
SPACE 00132
|
||||
F511327 DFHMDF POS=(13,27), X00133
|
||||
ATTRB=(ASKIP), X00134
|
||||
LENGTH=1 00135
|
||||
SPACE 00136
|
||||
F511329 DFHMDF POS=(13,29), X00137
|
||||
ATTRB=(ASKIP), X00138
|
||||
LENGTH=15 00139
|
||||
SPACE 00140
|
||||
F511519 DFHMDF POS=(15,19), X00141
|
||||
ATTRB=(ASKIP), X00142
|
||||
LENGTH=07 00143
|
||||
SPACE 00144
|
||||
F511527 DFHMDF POS=(15,27), X00145
|
||||
ATTRB=(ASKIP), X00146
|
||||
LENGTH=1 00147
|
||||
SPACE 00148
|
||||
DFHMDF POS=(15,29),ATTRB=ASKIP,LENGTH=1 00149
|
||||
SPACE 00150
|
||||
DFHMDF POS=(17,01), X00151
|
||||
ATTRB=(ASKIP), X00152
|
||||
LENGTH=30, X00153
|
||||
INITIAL='SUTA DUMPING - SCREEN 19 XREF:' 00154
|
||||
SPACE 00155
|
||||
DFHMDF POS=(18,14), X00156
|
||||
ATTRB=(ASKIP), X00157
|
||||
LENGTH=12, X00158
|
||||
INITIAL='PREDECESSOR:' 00159
|
||||
SPACE 00160
|
||||
F511827 DFHMDF POS=(18,27), X00161
|
||||
ATTRB=(ASKIP), X00162
|
||||
LENGTH=3 00163
|
||||
SPACE 00164
|
||||
F511831 DFHMDF POS=(18,31), X00165
|
||||
ATTRB=(ASKIP), X00166
|
||||
LENGTH=3 00167
|
||||
SPACE 00168
|
||||
DFHMDF POS=(18,35), X00169
|
||||
ATTRB=(ASKIP), X00170
|
||||
LENGTH=1 00171
|
||||
SPACE 00172
|
||||
DFHMDF POS=(19,17), X00173
|
||||
ATTRB=(ASKIP), X00174
|
||||
LENGTH=09, X00175
|
||||
INITIAL='EFF DATE:' 00176
|
||||
SPACE 00177
|
||||
F511927 DFHMDF POS=(19,27), X00178
|
||||
ATTRB=(ASKIP), X00179
|
||||
LENGTH=2 00180
|
||||
SPACE 00181
|
||||
F511930 DFHMDF POS=(19,30), X00182
|
||||
ATTRB=(ASKIP), X00183
|
||||
LENGTH=2 00184
|
||||
SPACE 00185
|
||||
F511933 DFHMDF POS=(19,33), X00186
|
||||
ATTRB=(ASKIP), X00187
|
||||
LENGTH=2 00188
|
||||
SPACE 00189
|
||||
DFHMDF POS=(19,36), X00190
|
||||
ATTRB=(ASKIP), X00191
|
||||
LENGTH=1 00192
|
||||
SPACE 00193
|
||||
F512305 DFHMDF POS=(23,5), X00194
|
||||
ATTRB=(ASKIP), X00195
|
||||
LENGTH=8 00196
|
||||
SPACE 00197
|
||||
F512315 DFHMDF POS=(23,15), X00198
|
||||
ATTRB=(ASKIP), X00199
|
||||
LENGTH=7 00200
|
||||
SPACE 00201
|
||||
F512324 DFHMDF POS=(23,24), X00202
|
||||
ATTRB=(ASKIP), X00203
|
||||
LENGTH=7 00204
|
||||
SPACE 00205
|
||||
F512333 DFHMDF POS=(23,33), X00206
|
||||
ATTRB=(ASKIP), X00207
|
||||
LENGTH=7 00208
|
||||
SPACE 00209
|
||||
F512342 DFHMDF POS=(23,42), X00210
|
||||
ATTRB=(ASKIP), X00211
|
||||
LENGTH=6 00212
|
||||
SPACE 00213
|
||||
F512350 DFHMDF POS=(23,50), X00214
|
||||
ATTRB=(ASKIP), X00215
|
||||
LENGTH=7 00216
|
||||
SPACE 00217
|
||||
F512359 DFHMDF POS=(23,59), X00218
|
||||
ATTRB=(ASKIP), X00219
|
||||
LENGTH=7 00220
|
||||
SPACE 00221
|
||||
F512401 DFHMDF POS=(24,01),LENGTH=08,ATTRB=ASKIP 00222
|
||||
SPACE 00223
|
||||
F512410 DFHMDF POS=(24,10),LENGTH=58,ATTRB=ASKIP 00224
|
||||
SPACE 00225
|
||||
DFHMDF POS=(24,69),LENGTH=06,ATTRB=ASKIP, X00226
|
||||
INITIAL='GO TO:' 00227
|
||||
SPACE 00228
|
||||
F512476 DFHMDF POS=(24,76),LENGTH=02,ATTRB=ASKIP 00229
|
||||
SPACE 00230
|
||||
DFHMDF POS=(24,79),LENGTH=01,ATTRB=ASKIP 00231
|
||||
Reference in New Issue
Block a user