DUTAS re-platformed to Raincode - Initial Source Code
This commit is contained in:
149
Maps/DTSM36.bms
Normal file
149
Maps/DTSM36.bms
Normal file
@ -0,0 +1,149 @@
|
||||
* DATA SET DTSM36 AT LEVEL 003 AS OF 12/22/98
|
||||
DTSM36 DFHMDI SIZE=(24,80), X00001**2
|
||||
LINE=01, X00002
|
||||
COLUMN=01 00003
|
||||
F360101 DFHMDF POS=(01,01), X00004
|
||||
ATTRB=(ASKIP,FSET), X00005
|
||||
LENGTH=002, X00006
|
||||
INITIAL='36' 00007
|
||||
DFHMDF POS=(01,21), X00008
|
||||
ATTRB=(ASKIP), X00009
|
||||
LENGTH=015, X00010
|
||||
INITIAL='JOURNAL INQUIRY' 00011
|
||||
F360162 DFHMDF POS=(01,62), X00012
|
||||
ATTRB=(ASKIP), X00013
|
||||
LENGTH=008 00014
|
||||
F360172 DFHMDF POS=(01,72), X00015
|
||||
ATTRB=(ASKIP), X00016
|
||||
LENGTH=008 00017
|
||||
DFHMDF POS=(02,03), X00018
|
||||
ATTRB=(ASKIP), X00019
|
||||
LENGTH=007, X00020
|
||||
INITIAL='EMP NO:' 00021
|
||||
F360211 DFHMDF POS=(02,11), X00022
|
||||
ATTRB=(ASKIP), X00023
|
||||
LENGTH=003 00024
|
||||
F360215 DFHMDF POS=(02,15), X00025
|
||||
ATTRB=(ASKIP), X00026
|
||||
LENGTH=003 00027
|
||||
DFHMDF POS=(02,19), X00028
|
||||
ATTRB=(ASKIP), X00029
|
||||
LENGTH=001 00030
|
||||
F360223 DFHMDF POS=(02,23), X00031
|
||||
ATTRB=(ASKIP), X00032
|
||||
LENGTH=040 00033
|
||||
DFHMDF POS=(02,65), X00034
|
||||
ATTRB=(ASKIP), X00035
|
||||
LENGTH=001 00036
|
||||
F360272 DFHMDF POS=(02,72), X00037
|
||||
ATTRB=(ASKIP), X00038
|
||||
LENGTH=008 00039
|
||||
DFHMDF POS=(03,05), X00040
|
||||
ATTRB=(ASKIP), X00041
|
||||
LENGTH=005, X00042
|
||||
INITIAL='YR Q:' 00043
|
||||
F360311 DFHMDF POS=(03,11), X00044
|
||||
ATTRB=(ASKIP), X00045
|
||||
LENGTH=002 00046
|
||||
F360314 DFHMDF POS=(03,14), X00047
|
||||
ATTRB=(ASKIP), X00048
|
||||
LENGTH=001 00049
|
||||
DFHMDF POS=(03,16), X00050
|
||||
ATTRB=(ASKIP), X00051
|
||||
LENGTH=001 00052
|
||||
F360372 DFHMDF POS=(03,72), X00053
|
||||
ATTRB=(ASKIP), X00054
|
||||
LENGTH=002 00055
|
||||
DFHMDF POS=(03,75), X00056
|
||||
ATTRB=(ASKIP), X00057
|
||||
LENGTH=002, X00058
|
||||
INITIAL='OF' 00059
|
||||
F360378 DFHMDF POS=(03,78), X00060
|
||||
ATTRB=(ASKIP), X00061
|
||||
LENGTH=002 00062
|
||||
DFHMDF POS=(04,44), X00063
|
||||
ATTRB=(ASKIP), X00064
|
||||
LENGTH=020, X00065
|
||||
INITIAL='TRAN ACCOUNT' 00066
|
||||
DFHMDF POS=(05,02), X00067
|
||||
ATTRB=(ASKIP), X00068
|
||||
LENGTH=077, X00069
|
||||
INITIAL='DOCUMENT RECEIVED DEPOSIT PROCESS TYPE X00070**3
|
||||
YR/Q ROW COL AMOUNT' 00071
|
||||
F360601 DFHMDF POS=(06,01), X00072
|
||||
ATTRB=(ASKIP), X00073
|
||||
LENGTH=079 00074
|
||||
F360701 DFHMDF POS=(07,01), X00075
|
||||
ATTRB=(ASKIP), X00076
|
||||
LENGTH=079 00077
|
||||
F360801 DFHMDF POS=(08,01), X00078
|
||||
ATTRB=(ASKIP), X00079
|
||||
LENGTH=079 00080
|
||||
F360901 DFHMDF POS=(09,01), X00081
|
||||
ATTRB=(ASKIP), X00082
|
||||
LENGTH=079 00083
|
||||
F361001 DFHMDF POS=(10,01), X00084
|
||||
ATTRB=(ASKIP), X00085
|
||||
LENGTH=079 00086
|
||||
F361101 DFHMDF POS=(11,01), X00087
|
||||
ATTRB=(ASKIP), X00088
|
||||
LENGTH=079 00089
|
||||
F361201 DFHMDF POS=(12,01), X00090
|
||||
ATTRB=(ASKIP), X00091
|
||||
LENGTH=079 00092
|
||||
F361301 DFHMDF POS=(13,01), X00093
|
||||
ATTRB=(ASKIP), X00094
|
||||
LENGTH=079 00095
|
||||
F361401 DFHMDF POS=(14,01), X00096
|
||||
ATTRB=(ASKIP), X00097
|
||||
LENGTH=079 00098
|
||||
F361501 DFHMDF POS=(15,01), X00099
|
||||
ATTRB=(ASKIP), X00100
|
||||
LENGTH=079 00101
|
||||
F361601 DFHMDF POS=(16,01), X00102
|
||||
ATTRB=(ASKIP), X00103
|
||||
LENGTH=079 00104
|
||||
F361701 DFHMDF POS=(17,01), X00105
|
||||
ATTRB=(ASKIP), X00106
|
||||
LENGTH=079 00107
|
||||
F361801 DFHMDF POS=(18,01), X00108
|
||||
ATTRB=(ASKIP), X00109
|
||||
LENGTH=079 00110
|
||||
F361901 DFHMDF POS=(19,01), X00111
|
||||
ATTRB=(ASKIP), X00112
|
||||
LENGTH=079 00113
|
||||
F362001 DFHMDF POS=(20,01), X00114
|
||||
ATTRB=(ASKIP), X00115
|
||||
LENGTH=079 00116
|
||||
F362101 DFHMDF POS=(21,01), X00117
|
||||
ATTRB=(ASKIP), X00118
|
||||
LENGTH=079 00119
|
||||
* 00120
|
||||
F362305 DFHMDF POS=(23,05), X00121
|
||||
ATTRB=(ASKIP), X00122
|
||||
LENGTH=008 00123
|
||||
F362315 DFHMDF POS=(23,15), X00124
|
||||
ATTRB=(ASKIP), X00125
|
||||
LENGTH=007 00126
|
||||
F362324 DFHMDF POS=(23,24), X00127
|
||||
ATTRB=(ASKIP), X00128
|
||||
LENGTH=007 00129
|
||||
F362333 DFHMDF POS=(23,33), X00130
|
||||
ATTRB=(ASKIP), X00131
|
||||
LENGTH=007 00132
|
||||
F362401 DFHMDF POS=(24,01), X00133
|
||||
ATTRB=(ASKIP), X00134
|
||||
LENGTH=008 00135
|
||||
F362410 DFHMDF POS=(24,10), X00136
|
||||
ATTRB=(ASKIP), X00137
|
||||
LENGTH=058 00138
|
||||
DFHMDF POS=(24,69), X00139
|
||||
ATTRB=(ASKIP), X00140
|
||||
LENGTH=006, X00141
|
||||
INITIAL='GO TO:' 00142
|
||||
F362476 DFHMDF POS=(24,76), X00143
|
||||
ATTRB=(ASKIP), X00144
|
||||
LENGTH=002 00145
|
||||
DFHMDF POS=(24,79), X00146
|
||||
ATTRB=(ASKIP), X00147
|
||||
LENGTH=001 00148
|
||||
Reference in New Issue
Block a user