Files
DUTAS/Maps/OJRM001.bms
2025-07-21 11:20:11 -04:00

172 lines
13 KiB
Plaintext

* 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