DUTAS re-platformed to Raincode - Initial Source Code
This commit is contained in:
Neeraj Kumar
421
Maps/DTSM31.bms
Normal file
421
Maps/DTSM31.bms
Normal file
@ -0,0 +1,421 @@
|
||||
* DATA SET DTSM31 AT LEVEL 010 AS OF 12/09/04
|
||||
* DATA SET DTSM31 AT LEVEL 001 AS OF 11/30/04 00001
|
||||
* DATA SET DTSM31 AT LEVEL 002 AS OF 04/29/04 00002
|
||||
* DATA SET DTSM31 AT LEVEL 008 AS OF 06/29/02 00003
|
||||
* DATA SET DTSM31 AT LEVEL 002 AS OF 02/14/02 00004
|
||||
* DATA SET DTSM31 AT LEVEL 006 AS OF 05/17/99 00005
|
||||
***** 00006
|
||||
* 00007
|
||||
* 05/17/1999 ADDED "PKUP DUE". 00008
|
||||
* REFERENCE: PICKUP DIR PROGRAMMER: EHH 00009
|
||||
* 00010
|
||||
***** 00011
|
||||
* 00012
|
||||
DTSM31 DFHMDI SIZE=(24,80), X00013
|
||||
LINE=01, X00014
|
||||
COLUMN=01 00015
|
||||
F310101 DFHMDF POS=(01,01), X00016
|
||||
ATTRB=(ASKIP,FSET), X00017
|
||||
LENGTH=002, X00018
|
||||
INITIAL='31' 00019
|
||||
F310120 DFHMDF POS=(01,20), X00020
|
||||
ATTRB=(ASKIP), X00021
|
||||
LENGTH=030, X00022
|
||||
INITIAL='QUARTER INQUIRY ' 00023
|
||||
F310162 DFHMDF POS=(01,62), X00024
|
||||
ATTRB=(ASKIP), X00025
|
||||
LENGTH=008 00026
|
||||
F310172 DFHMDF POS=(01,72), X00027
|
||||
ATTRB=(ASKIP), X00028
|
||||
LENGTH=008 00029
|
||||
DFHMDF POS=(02,02), X00030
|
||||
ATTRB=(ASKIP), X00031
|
||||
LENGTH=007, X00032
|
||||
INITIAL='EMP NO:' 00033
|
||||
F310210 DFHMDF POS=(02,10), X00034
|
||||
ATTRB=(ASKIP), X00035
|
||||
LENGTH=003 00036
|
||||
F310214 DFHMDF POS=(02,14), X00037
|
||||
ATTRB=(ASKIP), X00038
|
||||
LENGTH=003 00039
|
||||
DFHMDF POS=(02,18), X00040
|
||||
ATTRB=(ASKIP), X00041
|
||||
LENGTH=001 00042
|
||||
F310223 DFHMDF POS=(02,23), X00043
|
||||
ATTRB=(ASKIP), X00044
|
||||
LENGTH=040 00045
|
||||
F310272 DFHMDF POS=(02,72), X00046
|
||||
ATTRB=(ASKIP), X00047
|
||||
LENGTH=008 00048
|
||||
DFHMDF POS=(03,04), X00049
|
||||
ATTRB=(ASKIP), X00050
|
||||
LENGTH=005, X00051
|
||||
INITIAL='YR Q:' 00052
|
||||
F310310 DFHMDF POS=(03,10), X00053
|
||||
ATTRB=(ASKIP), X00054
|
||||
LENGTH=002 00055
|
||||
F310313 DFHMDF POS=(03,13), X00056
|
||||
ATTRB=(ASKIP), X00057
|
||||
LENGTH=001 00058
|
||||
DFHMDF POS=(03,15), X00059
|
||||
ATTRB=(ASKIP), X00060
|
||||
LENGTH=001, X00061
|
||||
INITIAL='-' 00062
|
||||
F310317 DFHMDF POS=(03,17), X00063
|
||||
ATTRB=(ASKIP), X00064
|
||||
LENGTH=002 00065
|
||||
F310320 DFHMDF POS=(03,20), X00066
|
||||
ATTRB=(ASKIP), X00067
|
||||
LENGTH=001 00068
|
||||
DFHMDF POS=(03,22), X00069
|
||||
ATTRB=(ASKIP), X00070
|
||||
LENGTH=007, X00071
|
||||
INITIAL=' CLASS:' 00072
|
||||
F310330 DFHMDF POS=(03,30), X00073
|
||||
ATTRB=(ASKIP), X00074
|
||||
LENGTH=010 00075
|
||||
DFHMDF POS=(03,42), X00076
|
||||
ATTRB=(ASKIP), X00077
|
||||
LENGTH=005, X00078
|
||||
INITIAL='OBNK?' 00079
|
||||
F310348 DFHMDF POS=(03,48), X00080
|
||||
ATTRB=(ASKIP), X00081
|
||||
LENGTH=001 00082
|
||||
DFHMDF POS=(03,52), X00083
|
||||
ATTRB=(ASKIP), X00084
|
||||
LENGTH=009, X00085
|
||||
INITIAL='PKUP DUE?' 00086
|
||||
F310362 DFHMDF POS=(03,62), X00087
|
||||
ATTRB=(ASKIP), X00088
|
||||
LENGTH=001 00089
|
||||
F310372 DFHMDF POS=(03,72), X00090
|
||||
ATTRB=(ASKIP), X00091
|
||||
LENGTH=002 00092
|
||||
DFHMDF POS=(03,75), X00093
|
||||
ATTRB=(ASKIP), X00094
|
||||
LENGTH=002, X00095
|
||||
INITIAL='OF' 00096
|
||||
F310378 DFHMDF POS=(03,78), X00097
|
||||
ATTRB=(ASKIP), X00098
|
||||
LENGTH=002 00099
|
||||
DFHMDF POS=(04,01), X00100
|
||||
ATTRB=(ASKIP), X00101
|
||||
LENGTH=008, X00102
|
||||
INITIAL='COMP DT:' 00103
|
||||
F310410 DFHMDF POS=(04,10), X00104
|
||||
ATTRB=(ASKIP), X00105
|
||||
LENGTH=002 00106
|
||||
F310413 DFHMDF POS=(04,13), X00107
|
||||
ATTRB=(ASKIP), X00108
|
||||
LENGTH=002 00109
|
||||
F310416 DFHMDF POS=(04,16), X00110
|
||||
ATTRB=(ASKIP), X00111
|
||||
LENGTH=002 00112
|
||||
DFHMDF POS=(04,20), X00113
|
||||
ATTRB=(ASKIP), X00114
|
||||
LENGTH=001 00115
|
||||
DFHMDF POS=(04,22), X00116
|
||||
ATTRB=(ASKIP), X00117
|
||||
LENGTH=007, X00118
|
||||
INITIAL='STATUS:' 00119
|
||||
F310430 DFHMDF POS=(04,30), X00120
|
||||
ATTRB=(ASKIP), X00121
|
||||
LENGTH=010 00122
|
||||
DFHMDF POS=(04,41), X00123
|
||||
ATTRB=(ASKIP), X00124
|
||||
LENGTH=006, X00125
|
||||
INITIAL='W/OFF:' 00126
|
||||
F310448 DFHMDF POS=(04,48), X00127
|
||||
ATTRB=(ASKIP), X00128
|
||||
LENGTH=008 00129
|
||||
DFHMDF POS=(04,57), X00130
|
||||
ATTRB=(ASKIP), X00131
|
||||
LENGTH=008, X00132
|
||||
INITIAL='TOT DUE:' 00133
|
||||
F310466 DFHMDF POS=(04,66), X00134
|
||||
ATTRB=(ASKIP), X00135
|
||||
LENGTH=014 00136
|
||||
F310501 DFHMDF POS=(05,01), X00137
|
||||
ATTRB=(ASKIP), X00138
|
||||
LENGTH=016 00139
|
||||
DFHMDF POS=(05,22), X00140
|
||||
ATTRB=(ASKIP), X00141
|
||||
LENGTH=007, X00142
|
||||
INITIAL='RECENT:' 00143
|
||||
F310530 DFHMDF POS=(05,30), X00144
|
||||
ATTRB=(ASKIP), X00145
|
||||
LENGTH=009 00146
|
||||
DFHMDF POS=(05,41), X00147
|
||||
ATTRB=(ASKIP), X00148
|
||||
LENGTH=006, X00149
|
||||
INITIAL='A/L/D:' 00150
|
||||
F310548 DFHMDF POS=(05,48), X00151
|
||||
ATTRB=(ASKIP), X00152
|
||||
LENGTH=005 00153
|
||||
DFHMDF POS=(05,57), X00154
|
||||
ATTRB=(ASKIP), X00155
|
||||
LENGTH=008, X00156
|
||||
INITIAL='INT/MON:' 00157
|
||||
F310570 DFHMDF POS=(05,70), X00158
|
||||
ATTRB=(ASKIP), X00159
|
||||
LENGTH=009 00160
|
||||
DFHMDF POS=(06,01), X00161
|
||||
ATTRB=(ASKIP), X00162
|
||||
LENGTH=008, X00163
|
||||
INITIAL='FLD REP:' 00164
|
||||
F310610 DFHMDF POS=(06,10), X00165
|
||||
ATTRB=(ASKIP), X00166
|
||||
LENGTH=002 00167
|
||||
DFHMDF POS=(06,22), X00168
|
||||
ATTRB=(ASKIP), X00169
|
||||
LENGTH=007, X00170
|
||||
INITIAL='#SPANS:' 00171
|
||||
F310630 DFHMDF POS=(06,30), X00172
|
||||
ATTRB=(ASKIP), X00173
|
||||
LENGTH=002 00174
|
||||
DFHMDF POS=(06,38), X00175
|
||||
ATTRB=(ASKIP), X00176
|
||||
LENGTH=009, X00177
|
||||
INITIAL='SUBPOENA:' 00178
|
||||
F310648 DFHMDF POS=(06,48), X00179
|
||||
ATTRB=(ASKIP), X00180
|
||||
LENGTH=001 00181
|
||||
F310651 DFHMDF POS=(06,51), X00182
|
||||
ATTRB=(ASKIP), X00183
|
||||
LENGTH=008 00184
|
||||
DFHMDF POS=(06,65), X00185
|
||||
ATTRB=(ASKIP), X00186
|
||||
LENGTH=010, X00187
|
||||
INITIAL='#RPTS DUE:' 00188
|
||||
F310676 DFHMDF POS=(06,76), X00189
|
||||
ATTRB=(ASKIP), X00190
|
||||
LENGTH=003 00191
|
||||
DFHMDF POS=(07,13), X00192
|
||||
ATTRB=(ASKIP), X00193
|
||||
LENGTH=037, X00194
|
||||
INITIAL='CHARGED PAID WAIVED' 00195
|
||||
F310752 DFHMDF POS=(07,52), X00196
|
||||
ATTRB=(ASKIP), X00197
|
||||
LENGTH=013 00198
|
||||
DFHMDF POS=(07,73), X00199
|
||||
ATTRB=(ASKIP), X00200
|
||||
LENGTH=007, X00201
|
||||
INITIAL='BALANCE' 00202
|
||||
F310801 DFHMDF POS=(08,01), X00203
|
||||
ATTRB=(ASKIP), X00204
|
||||
LENGTH=003 00205
|
||||
F310805 DFHMDF POS=(08,05), X00206
|
||||
ATTRB=(ASKIP), X00207
|
||||
LENGTH=075 00208
|
||||
* 00209
|
||||
F310901 DFHMDF POS=(09,01), X00210
|
||||
ATTRB=(ASKIP), X00211
|
||||
LENGTH=003 00212
|
||||
F310905 DFHMDF POS=(09,05), X00213
|
||||
ATTRB=(ASKIP), X00214
|
||||
LENGTH=075 00215
|
||||
* 00216
|
||||
F311001 DFHMDF POS=(10,01), X00217
|
||||
ATTRB=(ASKIP), X00218
|
||||
LENGTH=003 00219
|
||||
F311005 DFHMDF POS=(10,05), X00220
|
||||
ATTRB=(ASKIP), X00221
|
||||
LENGTH=075 00222
|
||||
* 00223
|
||||
F311101 DFHMDF POS=(11,01), X00224
|
||||
ATTRB=(ASKIP), X00225
|
||||
LENGTH=003 00226
|
||||
F311105 DFHMDF POS=(11,05), X00227
|
||||
ATTRB=(ASKIP), X00228
|
||||
LENGTH=075 00229
|
||||
* 00230
|
||||
F311201 DFHMDF POS=(12,01), X00231
|
||||
ATTRB=(ASKIP), X00232
|
||||
LENGTH=003 00233
|
||||
F311205 DFHMDF POS=(12,05), X00234
|
||||
ATTRB=(ASKIP), X00235
|
||||
LENGTH=075 00236
|
||||
* 00237
|
||||
F311301 DFHMDF POS=(13,01), X00238
|
||||
ATTRB=(ASKIP), X00239
|
||||
LENGTH=003 00240
|
||||
F311305 DFHMDF POS=(13,05), X00241
|
||||
ATTRB=(ASKIP), X00242
|
||||
LENGTH=075 00243
|
||||
* 00244
|
||||
F311401 DFHMDF POS=(14,01), X00245
|
||||
ATTRB=(ASKIP), X00246
|
||||
LENGTH=003 00247
|
||||
F311405 DFHMDF POS=(14,05), X00248
|
||||
ATTRB=(ASKIP), X00249
|
||||
LENGTH=075 00250
|
||||
* 00251
|
||||
F311501 DFHMDF POS=(15,01), X00252
|
||||
ATTRB=(ASKIP), X00253
|
||||
LENGTH=003 00254
|
||||
F311505 DFHMDF POS=(15,05), X00255
|
||||
ATTRB=(ASKIP), X00256
|
||||
LENGTH=075 00257
|
||||
* 00258
|
||||
F311601 DFHMDF POS=(16,01), X00259
|
||||
ATTRB=(ASKIP), X00260
|
||||
LENGTH=003 00261
|
||||
F311605 DFHMDF POS=(16,05), X00262
|
||||
ATTRB=(ASKIP), X00263
|
||||
LENGTH=075 00264
|
||||
* 00265
|
||||
DFHMDF POS=(18,02), X00266
|
||||
ATTRB=(ASKIP), X00267
|
||||
LENGTH=011, X00268
|
||||
INITIAL='RPT DUE DT:' 00269
|
||||
F311814 DFHMDF POS=(18,14), X00270
|
||||
ATTRB=(ASKIP), X00271
|
||||
LENGTH=008 00272
|
||||
DFHMDF POS=(18,26), X00273
|
||||
ATTRB=(ASKIP), X00274
|
||||
LENGTH=006, X00275
|
||||
INITIAL='TOTWG:' 00276
|
||||
F311833 DFHMDF POS=(18,33), X00277
|
||||
ATTRB=(ASKIP), X00278
|
||||
LENGTH=015 00279
|
||||
DFHMDF POS=(18,59), X00280
|
||||
ATTRB=(ASKIP), X00281
|
||||
LENGTH=021, X00282
|
||||
INITIAL='START END RATE' 00283
|
||||
DFHMDF POS=(19,02), X00284
|
||||
ATTRB=(ASKIP), X00285
|
||||
LENGTH=011, X00286
|
||||
INITIAL='TAX DUE DT:' 00287
|
||||
F311914 DFHMDF POS=(19,14), X00288
|
||||
ATTRB=(ASKIP), X00289
|
||||
LENGTH=008 00290
|
||||
DFHMDF POS=(19,26), X00291
|
||||
ATTRB=(ASKIP), X00292
|
||||
LENGTH=006, X00293
|
||||
INITIAL='EXCWG:' 00294
|
||||
F311933 DFHMDF POS=(19,33), X00295
|
||||
ATTRB=(ASKIP), X00296
|
||||
LENGTH=015 00297
|
||||
DFHMDF POS=(19,50), X00298
|
||||
ATTRB=(ASKIP), X00299
|
||||
LENGTH=006, X00300
|
||||
INITIAL='P WAV:' 00301
|
||||
F311957 DFHMDF POS=(19,57), X00302
|
||||
ATTRB=(ASKIP), X00303
|
||||
LENGTH=008 00304
|
||||
F311966 DFHMDF POS=(19,66), X00305
|
||||
ATTRB=(ASKIP), X00306
|
||||
LENGTH=008 00307
|
||||
DFHMDF POS=(20,04), X00308
|
||||
ATTRB=(ASKIP), X00309
|
||||
LENGTH=009, X00310
|
||||
INITIAL='RPT TYPE:' 00311
|
||||
F312014 DFHMDF POS=(20,14), X00312
|
||||
ATTRB=(ASKIP), X00313
|
||||
LENGTH=010 00314
|
||||
DFHMDF POS=(20,26), X00315
|
||||
ATTRB=(ASKIP), X00316
|
||||
LENGTH=006, X00317
|
||||
INITIAL='TAXWG:' 00318
|
||||
F312033 DFHMDF POS=(20,33), X00319
|
||||
ATTRB=(ASKIP), X00320
|
||||
LENGTH=015 00321
|
||||
DFHMDF POS=(20,50), X00322
|
||||
ATTRB=(ASKIP), X00323
|
||||
LENGTH=006, X00324
|
||||
INITIAL='I WAV:' 00325
|
||||
F312057 DFHMDF POS=(20,57), X00326
|
||||
ATTRB=(ASKIP), X00327
|
||||
LENGTH=008 00328
|
||||
F312066 DFHMDF POS=(20,66), X00329
|
||||
ATTRB=(ASKIP), X00330
|
||||
LENGTH=008 00331
|
||||
DFHMDF POS=(21,02), X00332
|
||||
ATTRB=(ASKIP), X00333
|
||||
LENGTH=011, X00334
|
||||
INITIAL='RPT CUTOFF:' 00335
|
||||
F312114 DFHMDF POS=(21,14), X00336
|
||||
ATTRB=(ASKIP), X00337
|
||||
LENGTH=010 00338
|
||||
DFHMDF POS=(21,26), X00339
|
||||
ATTRB=(ASKIP), X00340
|
||||
LENGTH=006, X00341
|
||||
INITIAL=' RATE:' 00342
|
||||
F312135 DFHMDF POS=(21,35), X00343
|
||||
ATTRB=(ASKIP), X00344
|
||||
LENGTH=005 00345
|
||||
DFHMDF POS=(21,50), X00346
|
||||
ATTRB=(ASKIP), X00347
|
||||
LENGTH=006, X00348
|
||||
INITIAL='INT 1:' 00349
|
||||
F312157 DFHMDF POS=(21,57), X00350
|
||||
ATTRB=(ASKIP), X00351
|
||||
LENGTH=008 00352
|
||||
F312166 DFHMDF POS=(21,66), X00353
|
||||
ATTRB=(ASKIP), X00354
|
||||
LENGTH=008 00355
|
||||
F312175 DFHMDF POS=(21,75), X00356
|
||||
ATTRB=(ASKIP), X00357
|
||||
LENGTH=005 00358
|
||||
DFHMDF POS=(22,01), X00359
|
||||
ATTRB=(ASKIP), X00360
|
||||
LENGTH=012, X00361
|
||||
INITIAL='INT/PEN IND:' 00362
|
||||
F312214 DFHMDF POS=(22,14), X00363
|
||||
ATTRB=(ASKIP), X00364
|
||||
LENGTH=003 00365
|
||||
DFHMDF POS=(22,26), X00366
|
||||
ATTRB=(ASKIP), X00367
|
||||
LENGTH=006, X00368
|
||||
INITIAL='A/L/D:' 00369
|
||||
F312243 DFHMDF POS=(22,33), X00370
|
||||
ATTRB=(ASKIP), X00371
|
||||
LENGTH=005 00372
|
||||
DFHMDF POS=(22,40), X00373
|
||||
ATTRB=(ASKIP), X00374
|
||||
LENGTH=007, X00375
|
||||
INITIAL='WGRPT: ' 00376
|
||||
F312248 DFHMDF POS=(22,48), X00377
|
||||
ATTRB=(ASKIP), X00378
|
||||
LENGTH=001 00379
|
||||
DFHMDF POS=(22,50), X00380
|
||||
ATTRB=(ASKIP), X00381
|
||||
LENGTH=006, X00382
|
||||
INITIAL='INT 2:' 00383
|
||||
F312257 DFHMDF POS=(22,57), X00384
|
||||
ATTRB=(ASKIP), X00385
|
||||
LENGTH=008 00386
|
||||
F312266 DFHMDF POS=(22,66), X00387
|
||||
ATTRB=(ASKIP), X00388
|
||||
LENGTH=008 00389
|
||||
F312275 DFHMDF POS=(22,75), X00390
|
||||
ATTRB=(ASKIP), X00391
|
||||
LENGTH=005 00392
|
||||
F312301 DFHMDF POS=(23,01), X00393
|
||||
ATTRB=(ASKIP), X00394
|
||||
LENGTH=007 00395
|
||||
F312309 DFHMDF POS=(23,09), X00396
|
||||
ATTRB=(ASKIP), X00397
|
||||
LENGTH=007 00398
|
||||
F312317 DFHMDF POS=(23,17), X00399
|
||||
ATTRB=(ASKIP), X00400
|
||||
LENGTH=007 00401
|
||||
F312325 DFHMDF POS=(23,25), X00402
|
||||
ATTRB=(ASKIP), X00403
|
||||
LENGTH=007 00404
|
||||
F312401 DFHMDF POS=(24,01), X00405
|
||||
ATTRB=(ASKIP), X00406
|
||||
LENGTH=008 00407
|
||||
F312410 DFHMDF POS=(24,10), X00408
|
||||
ATTRB=(ASKIP), X00409
|
||||
LENGTH=058 00410
|
||||
DFHMDF POS=(24,69), X00411
|
||||
ATTRB=(ASKIP), X00412
|
||||
LENGTH=006, X00413
|
||||
INITIAL='GO TO:' 00414
|
||||
F312476 DFHMDF POS=(24,76), X00415
|
||||
ATTRB=(ASKIP), X00416
|
||||
LENGTH=002 00417
|
||||
DFHMDF POS=(24,79), X00418
|
||||
ATTRB=(ASKIP), X00419
|
||||
LENGTH=001 00420
|
||||
Reference in New Issue
Block a user