DUTAS re-platformed to Raincode - Initial Source Code
This commit is contained in:
Neeraj Kumar
171
Maps/OJRM001.bms
Normal file
171
Maps/OJRM001.bms
Normal file
@ -0,0 +1,171 @@
|
||||
* DATA SET OJRM001 AT LEVEL 001 AS OF 05/08/02
|
||||
* DATA SET OJRM001 AT LEVEL 046 AS OF 04/03/02 00001
|
||||
* DATA SET OJRM001 AT LEVEL 004 AS OF 11/18/98 00002
|
||||
OJRM001 DFHMDI SIZE=(10,30), X00003
|
||||
LINE=05, X00004
|
||||
COLUMN=40 00005
|
||||
* TOP BORDER 00006
|
||||
DFHMDF POS=(01,01), X00007
|
||||
ATTRB=(ASKIP), X00008
|
||||
LENGTH=029, X00009
|
||||
INITIAL='*****************************' 00010
|
||||
* LEFT BORDER 00011
|
||||
DFHMDF POS=(02,01), X00012
|
||||
ATTRB=(ASKIP), X00013
|
||||
LENGTH=001, X00014
|
||||
INITIAL='*' 00015
|
||||
* DATA TYPE LITERAL 00016
|
||||
DFHMDF POS=(02,03), X00017
|
||||
ATTRB=(ASKIP), X00018
|
||||
LENGTH=011, X00019
|
||||
INITIAL='ENTER DATE:' 00020
|
||||
* FILLER 00021
|
||||
DFHMDF POS=(02,15), X00022
|
||||
ATTRB=(ASKIP), X00023
|
||||
LENGTH=013, X00024
|
||||
INITIAL=' ' 00025
|
||||
* RIGHT BORDER 00026
|
||||
DFHMDF POS=(02,29), X00027
|
||||
ATTRB=(ASKIP), X00028
|
||||
LENGTH=001, X00029
|
||||
INITIAL='*' 00030
|
||||
* LEFT BORDER 00031
|
||||
DFHMDF POS=(03,01), X00032
|
||||
ATTRB=(ASKIP), X00033
|
||||
LENGTH=001, X00034
|
||||
INITIAL='*' 00035
|
||||
* BLANK LINE 00036
|
||||
DFHMDF POS=(03,03), X00037
|
||||
ATTRB=(ASKIP), X00038
|
||||
LENGTH=025, X00039
|
||||
INITIAL=' ' 00040
|
||||
* RIGHT BORDER 00041
|
||||
DFHMDF POS=(03,29), X00042
|
||||
ATTRB=(ASKIP), X00043
|
||||
LENGTH=001, X00044
|
||||
INITIAL='*' 00045
|
||||
* LEFT BORDER 00046
|
||||
DFHMDF POS=(04,01), X00047
|
||||
ATTRB=(ASKIP), X00048
|
||||
LENGTH=001, X00049
|
||||
INITIAL='*' 00050
|
||||
* DATE LITERAL 00051
|
||||
DFHMDF POS=(04,03), X00052
|
||||
ATTRB=(ASKIP), X00053
|
||||
LENGTH=012, X00054
|
||||
INITIAL='MM DD YY' 00055
|
||||
* FILLER 00056
|
||||
DFHMDF POS=(04,16), X00057
|
||||
ATTRB=(ASKIP), X00058
|
||||
LENGTH=012, X00059
|
||||
INITIAL=' ' 00060
|
||||
* RIGHT BORDER 00061
|
||||
DFHMDF POS=(04,29), X00062
|
||||
ATTRB=(ASKIP), X00063
|
||||
LENGTH=001, X00064
|
||||
INITIAL='*' 00065
|
||||
* LEFT BORDER 00066
|
||||
DFHMDF POS=(05,01), X00067
|
||||
ATTRB=(ASKIP), X00068
|
||||
LENGTH=001, X00069
|
||||
INITIAL='*' 00070
|
||||
* MONTH VAR 00071
|
||||
F0010503 DFHMDF POS=(05,03), X00072
|
||||
ATTRB=(NUM,FSET,IC), X00073
|
||||
LENGTH=002 00074
|
||||
DFHMDF POS=(05,06), X00075
|
||||
ATTRB=(ASKIP), X00076
|
||||
LENGTH=001, X00077
|
||||
INITIAL='/' 00078
|
||||
* DAY VAR 00079
|
||||
F0010508 DFHMDF POS=(05,08), X00080
|
||||
ATTRB=(NUM,FSET), X00081
|
||||
LENGTH=002 00082
|
||||
DFHMDF POS=(05,11), X00083
|
||||
ATTRB=(ASKIP), X00084
|
||||
LENGTH=001, X00085
|
||||
INITIAL='/' 00086
|
||||
* YEAR VAR 00087
|
||||
F0010513 DFHMDF POS=(05,13), X00088
|
||||
ATTRB=(NUM,FSET), X00089
|
||||
LENGTH=002 00090
|
||||
DFHMDF POS=(05,16), X00091
|
||||
ATTRB=(ASKIP), X00092
|
||||
LENGTH=001 00093
|
||||
* FILLER 00094
|
||||
DFHMDF POS=(05,18), X00095
|
||||
ATTRB=(ASKIP), X00096
|
||||
LENGTH=010, X00097
|
||||
INITIAL=' ' 00098
|
||||
* RIGHT BORDER 00099
|
||||
DFHMDF POS=(05,29), X00100
|
||||
ATTRB=(ASKIP), X00101
|
||||
LENGTH=001, X00102
|
||||
INITIAL='*' 00103
|
||||
* LEFT BORDER 00104
|
||||
DFHMDF POS=(06,01), X00105
|
||||
ATTRB=(ASKIP), X00106
|
||||
LENGTH=001, X00107
|
||||
INITIAL='*' 00108
|
||||
* BLANK LINE 00109
|
||||
DFHMDF POS=(06,03), X00110
|
||||
ATTRB=(ASKIP), X00111
|
||||
LENGTH=025, X00112
|
||||
INITIAL=' ' 00113
|
||||
* RIGHT BORDER 00114
|
||||
DFHMDF POS=(06,29), X00115
|
||||
ATTRB=(ASKIP), X00116
|
||||
LENGTH=001, X00117
|
||||
INITIAL='*' 00118
|
||||
* LEFT BORDER 00119
|
||||
DFHMDF POS=(07,01), X00120
|
||||
ATTRB=(ASKIP), X00121
|
||||
LENGTH=001, X00122
|
||||
INITIAL='*' 00123
|
||||
* BLANK LINE 00124
|
||||
DFHMDF POS=(07,03), X00125
|
||||
ATTRB=(ASKIP), X00126
|
||||
LENGTH=025, X00127
|
||||
INITIAL=' ' 00128
|
||||
* RIGHT BORDER 00129
|
||||
DFHMDF POS=(07,29), X00130
|
||||
ATTRB=(ASKIP), X00131
|
||||
LENGTH=001, X00132
|
||||
INITIAL='*' 00133
|
||||
* LEFT BORDER 00134
|
||||
DFHMDF POS=(08,01), X00135
|
||||
ATTRB=(ASKIP), X00136
|
||||
LENGTH=001, X00137
|
||||
INITIAL='*' 00138
|
||||
* MSG STUFF 00139
|
||||
F0010803 DFHMDF POS=(08,03), X00140
|
||||
ATTRB=(ASKIP), X00141
|
||||
LENGTH=016 00142
|
||||
F0010827 DFHMDF POS=(08,27), X00143
|
||||
ATTRB=(ASKIP), X00144
|
||||
LENGTH=001 00145
|
||||
* RIGHT BORDER 00146
|
||||
DFHMDF POS=(08,29), X00147
|
||||
ATTRB=(ASKIP), X00148
|
||||
LENGTH=001, X00149
|
||||
INITIAL='*' 00150
|
||||
* LEFT BORDER 00151
|
||||
DFHMDF POS=(09,01), X00152
|
||||
ATTRB=(ASKIP), X00153
|
||||
LENGTH=001, X00154
|
||||
INITIAL='*' 00155
|
||||
* BLANK LINE 00156
|
||||
DFHMDF POS=(09,03), X00157
|
||||
ATTRB=(ASKIP), X00158
|
||||
LENGTH=025, X00159
|
||||
INITIAL=' ' 00160
|
||||
* RIGHT BORDER 00161
|
||||
DFHMDF POS=(09,29), X00162
|
||||
ATTRB=(ASKIP), X00163
|
||||
LENGTH=001, X00164
|
||||
INITIAL='*' 00165
|
||||
* BOTTOM BORDER 00166
|
||||
DFHMDF POS=(10,01), X00167
|
||||
ATTRB=(ASKIP), X00168
|
||||
LENGTH=029, X00169
|
||||
INITIAL='*****************************' 00170
|
||||
Reference in New Issue
Block a user