DUTAS re-platformed to Raincode - Initial Source Code
This commit is contained in:
257
Maps/DTSM46.bms
Normal file
257
Maps/DTSM46.bms
Normal file
@ -0,0 +1,257 @@
|
||||
* DATA SET DTSM46 AT LEVEL 007 AS OF 08/06/99
|
||||
DTSM46 DFHMDI SIZE=(24,80), X00001**2
|
||||
LINE=01, X00002
|
||||
COLUMN=01 00003
|
||||
F460101 DFHMDF POS=(01,01), X00004
|
||||
ATTRB=(ASKIP,FSET), X00005
|
||||
LENGTH=002, X00006
|
||||
INITIAL='46' 00007
|
||||
DFHMDF POS=(01,22), X00008
|
||||
ATTRB=(ASKIP), X00009
|
||||
LENGTH=016, X00010
|
||||
INITIAL='DUE/CREDIT PRINT' 00011
|
||||
F460162 DFHMDF POS=(01,62), X00012
|
||||
ATTRB=(ASKIP), X00013
|
||||
LENGTH=008 00014
|
||||
F460172 DFHMDF POS=(01,72), X00015
|
||||
ATTRB=(ASKIP), X00016
|
||||
LENGTH=008 00017
|
||||
F460272 DFHMDF POS=(02,72), X00018
|
||||
ATTRB=(ASKIP), X00019
|
||||
LENGTH=008 00020
|
||||
DFHMDF POS=(03,01), X00021
|
||||
ATTRB=(ASKIP), X00022
|
||||
LENGTH=007, X00023
|
||||
INITIAL='EMP NO:' 00024
|
||||
F460309 DFHMDF POS=(03,09), X00025
|
||||
ATTRB=(ASKIP), X00026
|
||||
LENGTH=003 00027
|
||||
F460313 DFHMDF POS=(03,13), X00028
|
||||
ATTRB=(ASKIP), X00029
|
||||
LENGTH=003 00030
|
||||
DFHMDF POS=(03,17), X00031
|
||||
ATTRB=(ASKIP), X00032
|
||||
LENGTH=001 00033
|
||||
F460320 DFHMDF POS=(03,20), X00034
|
||||
ATTRB=(ASKIP), X00035
|
||||
LENGTH=040 00036
|
||||
F460372 DFHMDF POS=(03,72), X00037
|
||||
ATTRB=(ASKIP), X00038
|
||||
LENGTH=002 00039
|
||||
DFHMDF POS=(03,75), X00040
|
||||
ATTRB=(ASKIP), X00041
|
||||
LENGTH=002, X00042
|
||||
INITIAL='OF' 00043
|
||||
F460378 DFHMDF POS=(03,78), X00044
|
||||
ATTRB=(ASKIP), X00045
|
||||
LENGTH=002 00046
|
||||
DFHMDF POS=(05,10), X00047
|
||||
ATTRB=(ASKIP), X00048
|
||||
LENGTH=005, X00049
|
||||
INITIAL='YR/Q:' 00050
|
||||
F460516 DFHMDF POS=(05,16), X00051
|
||||
ATTRB=(ASKIP), X00052
|
||||
LENGTH=002 00053
|
||||
F460519 DFHMDF POS=(05,19), X00054
|
||||
ATTRB=(ASKIP), X00055
|
||||
LENGTH=001 00056
|
||||
DFHMDF POS=(05,21), X00057
|
||||
ATTRB=(ASKIP), X00058
|
||||
LENGTH=001, X00059
|
||||
INITIAL='-' 00060
|
||||
F460523 DFHMDF POS=(05,23), X00061
|
||||
ATTRB=(ASKIP), X00062
|
||||
LENGTH=002 00063
|
||||
F460526 DFHMDF POS=(05,26), X00064
|
||||
ATTRB=(ASKIP), X00065
|
||||
LENGTH=001 00066
|
||||
DFHMDF POS=(05,28), X00067
|
||||
ATTRB=(ASKIP), X00068
|
||||
LENGTH=001 00069
|
||||
DFHMDF POS=(05,44), X00070
|
||||
ATTRB=(ASKIP), X00071
|
||||
LENGTH=010, X00072
|
||||
INITIAL='TOTAL DUE:' 00073
|
||||
F460555 DFHMDF POS=(05,55), X00074
|
||||
ATTRB=(ASKIP), X00075
|
||||
LENGTH=013 00076
|
||||
DFHMDF POS=(06,05), X00077
|
||||
ATTRB=(ASKIP), X00078
|
||||
LENGTH=010, X00079
|
||||
INITIAL='COMP DATE:' 00080
|
||||
F460616 DFHMDF POS=(06,16), X00081
|
||||
ATTRB=(ASKIP), X00082
|
||||
LENGTH=002 00083
|
||||
F460619 DFHMDF POS=(06,19), X00084
|
||||
ATTRB=(ASKIP), X00085
|
||||
LENGTH=002 00086
|
||||
F460622 DFHMDF POS=(06,22), X00087
|
||||
ATTRB=(ASKIP), X00088
|
||||
LENGTH=002 00089
|
||||
DFHMDF POS=(06,25), X00090
|
||||
ATTRB=(ASKIP), X00091
|
||||
LENGTH=001 00092
|
||||
DFHMDF POS=(06,44), X00093
|
||||
ATTRB=(ASKIP), X00094
|
||||
LENGTH=010, X00095
|
||||
INITIAL='#RPTS DUE:' 00096
|
||||
F460664 DFHMDF POS=(06,64), X00097
|
||||
ATTRB=(ASKIP), X00098
|
||||
LENGTH=003 00099
|
||||
DFHMDF POS=(07,02), X00100
|
||||
ATTRB=(ASKIP), X00101
|
||||
LENGTH=013, X00102
|
||||
INITIAL='ADDRESS TYPE:' 00103
|
||||
F460716 DFHMDF POS=(07,16), X00104
|
||||
ATTRB=(ASKIP), X00105
|
||||
LENGTH=001 00106
|
||||
DFHMDF POS=(07,18), X00107
|
||||
ATTRB=(ASKIP), X00108
|
||||
LENGTH=001 00109
|
||||
DFHMDF POS=(07,22), X00110
|
||||
ATTRB=(ASKIP), X00111
|
||||
LENGTH=011, X00112
|
||||
INITIAL='ADDRESS ID:' 00113
|
||||
F460734 DFHMDF POS=(07,34), X00114
|
||||
ATTRB=(ASKIP), X00115
|
||||
LENGTH=003 00116
|
||||
DFHMDF POS=(07,38), X00117
|
||||
ATTRB=(ASKIP), X00118
|
||||
LENGTH=001 00119
|
||||
DFHMDF POS=(08,07), X00120
|
||||
ATTRB=(ASKIP), X00121
|
||||
LENGTH=008, X00122
|
||||
INITIAL='#COPIES:' 00123
|
||||
F460816 DFHMDF POS=(08,16), X00124
|
||||
ATTRB=(ASKIP), X00125
|
||||
LENGTH=001 00126
|
||||
DFHMDF POS=(08,18), X00127
|
||||
ATTRB=(ASKIP), X00128
|
||||
LENGTH=001 00129
|
||||
DFHMDF POS=(08,22), X00130
|
||||
ATTRB=(ASKIP), X00131
|
||||
LENGTH=011, X00132
|
||||
INITIAL='PRINTER ID:' 00133
|
||||
F460834 DFHMDF POS=(08,34), X00134
|
||||
ATTRB=(ASKIP), X00135
|
||||
LENGTH=004 00136
|
||||
DFHMDF POS=(08,39), X00137
|
||||
ATTRB=(ASKIP), X00138
|
||||
LENGTH=001 00139
|
||||
DFHMDF POS=(08,43), X00140
|
||||
ATTRB=(ASKIP), X00141
|
||||
LENGTH=011, X00142
|
||||
INITIAL='ORIGINATOR:' 00143
|
||||
F460855 DFHMDF POS=(08,55), X00144
|
||||
ATTRB=(ASKIP), X00145
|
||||
LENGTH=008 00146**3
|
||||
DFHMDF POS=(08,64), X00147**3
|
||||
ATTRB=(ASKIP), X00148
|
||||
LENGTH=001 00149
|
||||
F460864 DFHMDF POS=(08,66), X00150**3
|
||||
ATTRB=(ASKIP), X00151
|
||||
LENGTH=010 00152
|
||||
DFHMDF POS=(09,06), X00153
|
||||
ATTRB=(ASKIP), X00154
|
||||
LENGTH=040, X00155
|
||||
INITIAL='NOTATION TO BE PRINTED ON THE STATEMENT:' 00156
|
||||
DFHMDF POS=(10,02), X00157
|
||||
ATTRB=(ASKIP), X00158
|
||||
LENGTH=001, X00159
|
||||
INITIAL=':' 00160
|
||||
F461004 DFHMDF POS=(10,04), X00161
|
||||
ATTRB=(ASKIP), X00162
|
||||
LENGTH=072 00163
|
||||
DFHMDF POS=(10,77), X00164
|
||||
ATTRB=(ASKIP), X00165
|
||||
LENGTH=001 00166
|
||||
DFHMDF POS=(11,02), X00167
|
||||
ATTRB=(ASKIP), X00168
|
||||
LENGTH=001, X00169
|
||||
INITIAL=':' 00170
|
||||
F461104 DFHMDF POS=(11,04), X00171
|
||||
ATTRB=(ASKIP), X00172
|
||||
LENGTH=072 00173
|
||||
DFHMDF POS=(11,77), X00174
|
||||
ATTRB=(ASKIP), X00175
|
||||
LENGTH=001 00176
|
||||
DFHMDF POS=(12,02), X00177
|
||||
ATTRB=(ASKIP), X00178
|
||||
LENGTH=001, X00179
|
||||
INITIAL=':' 00180
|
||||
F461204 DFHMDF POS=(12,04), X00181
|
||||
ATTRB=(ASKIP), X00182
|
||||
LENGTH=072 00183
|
||||
DFHMDF POS=(12,77), X00184
|
||||
ATTRB=(ASKIP), X00185
|
||||
LENGTH=001 00186
|
||||
DFHMDF POS=(13,02), X00187
|
||||
ATTRB=(ASKIP), X00188
|
||||
LENGTH=001, X00189
|
||||
INITIAL=':' 00190
|
||||
F461304 DFHMDF POS=(13,04), X00191
|
||||
ATTRB=(ASKIP), X00192
|
||||
LENGTH=072 00193
|
||||
DFHMDF POS=(13,77), X00194
|
||||
ATTRB=(ASKIP), X00195
|
||||
LENGTH=001 00196
|
||||
DFHMDF POS=(14,01), X00197**7
|
||||
ATTRB=(ASKIP), X00198**7
|
||||
LENGTH=079, X00199**7
|
||||
INITIAL='-----------------------------------------------X00200**7
|
||||
--------------------------------' 00201**7
|
||||
F461501 DFHMDF POS=(15,01), X00202**4
|
||||
ATTRB=(ASKIP), X00203**4
|
||||
LENGTH=079 00204**4
|
||||
F461601 DFHMDF POS=(16,01), X00205**4
|
||||
ATTRB=(ASKIP), X00206**4
|
||||
LENGTH=079 00207**4
|
||||
F461701 DFHMDF POS=(17,01), X00208**4
|
||||
ATTRB=(ASKIP), X00209**4
|
||||
LENGTH=079 00210**4
|
||||
F461801 DFHMDF POS=(18,01), X00211**4
|
||||
ATTRB=(ASKIP), X00212**4
|
||||
LENGTH=079 00213**4
|
||||
F461901 DFHMDF POS=(19,01), X00214**4
|
||||
ATTRB=(ASKIP), X00215**4
|
||||
LENGTH=079 00216**4
|
||||
F462001 DFHMDF POS=(20,01), X00217**4
|
||||
ATTRB=(ASKIP), X00218**4
|
||||
LENGTH=079 00219**4
|
||||
F462101 DFHMDF POS=(21,01), X00220**4
|
||||
ATTRB=(ASKIP), X00221**4
|
||||
LENGTH=079 00222**4
|
||||
F462201 DFHMDF POS=(22,01), X00223**4
|
||||
ATTRB=(ASKIP), X00224**4
|
||||
LENGTH=079 00225**4
|
||||
F462307 DFHMDF POS=(23,07), X00226
|
||||
ATTRB=(ASKIP), X00227
|
||||
LENGTH=008 00228
|
||||
F462317 DFHMDF POS=(23,17), X00229
|
||||
ATTRB=(ASKIP), X00230
|
||||
LENGTH=007 00231
|
||||
F462326 DFHMDF POS=(23,26), X00232
|
||||
ATTRB=(ASKIP), X00233
|
||||
LENGTH=007 00234
|
||||
F462335 DFHMDF POS=(23,35), X00235
|
||||
ATTRB=(ASKIP), X00236
|
||||
LENGTH=007 00237
|
||||
F462345 DFHMDF POS=(23,45), X00238
|
||||
ATTRB=(ASKIP), X00239
|
||||
LENGTH=008 00240
|
||||
F462401 DFHMDF POS=(24,01), X00241
|
||||
ATTRB=(ASKIP), X00242
|
||||
LENGTH=008 00243
|
||||
F462410 DFHMDF POS=(24,10), X00244
|
||||
ATTRB=(ASKIP), X00245
|
||||
LENGTH=058 00246
|
||||
DFHMDF POS=(24,69), X00247
|
||||
ATTRB=(ASKIP), X00248
|
||||
LENGTH=006, X00249
|
||||
INITIAL='GO TO:' 00250
|
||||
F462476 DFHMDF POS=(24,76), X00251
|
||||
ATTRB=(ASKIP), X00252
|
||||
LENGTH=002 00253
|
||||
DFHMDF POS=(24,79), X00254
|
||||
ATTRB=(ASKIP), X00255
|
||||
LENGTH=001 00256
|
||||
Reference in New Issue
Block a user