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

151 lines
11 KiB
Plaintext

* DATA SET OJRM004 AT LEVEL 001 AS OF 05/08/02
* DATA SET OJRM004 AT LEVEL 012 AS OF 04/03/02 00001
* DATA SET OJRM004 AT LEVEL 004 AS OF 12/11/98 00002
OJRM004 DFHMDI SIZE=(10,40), X00003
LINE=05, X00004
COLUMN=35 00005
* TOP BORDER 00006
DFHMDF POS=(01,01), X00007
ATTRB=(ASKIP), X00008
LENGTH=039, X00009
INITIAL='***************************************' 00010
* LEFT BORDER 00011
DFHMDF POS=(02,01), X00012
ATTRB=(ASKIP), X00013
LENGTH=001, X00014
INITIAL='*' 00015
* TEXT LITERAL 00016
DFHMDF POS=(02,03), X00017
ATTRB=(ASKIP), X00018
LENGTH=011, X00019
INITIAL='ENTER DATA:' 00020
* FILLER 00021
DFHMDF POS=(02,15), X00022
ATTRB=(ASKIP), X00023
LENGTH=023, X00024
INITIAL=' ' 00025
* RIGHT BORDER 00026
DFHMDF POS=(02,39), 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=035, X00039
INITIAL=' ' 00040
* RIGHT BORDER 00041
DFHMDF POS=(03,39), 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
* BLANK LINE 00051
DFHMDF POS=(04,03), X00052
ATTRB=(ASKIP), X00053
LENGTH=035, X00054
INITIAL=' ' 00055
* RIGHT BORDER 00056
DFHMDF POS=(04,39), X00057
ATTRB=(ASKIP), X00058
LENGTH=001, X00059
INITIAL='*' 00060
* LEFT BORDER 00061
DFHMDF POS=(05,01), X00062
ATTRB=(ASKIP), X00063
LENGTH=001, X00064
INITIAL='*' 00065
* TEXT VAR 00066
F0040503 DFHMDF POS=(05,03), X00067
ATTRB=(FSET,IC), X00068
LENGTH=032 00069
DFHMDF POS=(05,36), X00070
ATTRB=(ASKIP), X00071
LENGTH=001 00072
* FILLER 00073
DFHMDF POS=(05,15), X00074
ATTRB=(ASKIP), X00075
LENGTH=023, X00076
INITIAL=' ' 00077
* RIGHT BORDER 00078
DFHMDF POS=(05,39), X00079
ATTRB=(ASKIP), X00080
LENGTH=001, X00081
INITIAL='*' 00082
* LEFT BORDER 00083
DFHMDF POS=(06,01), X00084
ATTRB=(ASKIP), X00085
LENGTH=001, X00086
INITIAL='*' 00087
* BLANK LINE 00088
DFHMDF POS=(06,03), X00089
ATTRB=(ASKIP), X00090
LENGTH=035, X00091
INITIAL=' ' 00092
* RIGHT BORDER 00093
DFHMDF POS=(06,39), X00094
ATTRB=(ASKIP), X00095
LENGTH=001, X00096
INITIAL='*' 00097
* LEFT BORDER 00098
DFHMDF POS=(07,01), X00099
ATTRB=(ASKIP), X00100
LENGTH=001, X00101
INITIAL='*' 00102
* BLANK LINE 00103
DFHMDF POS=(07,03), X00104
ATTRB=(ASKIP), X00105
LENGTH=035, X00106
INITIAL=' ' 00107
* RIGHT BORDER 00108
DFHMDF POS=(07,39), X00109
ATTRB=(ASKIP), X00110
LENGTH=001, X00111
INITIAL='*' 00112
* LEFT BORDER 00113
DFHMDF POS=(08,01), X00114
ATTRB=(ASKIP), X00115
LENGTH=001, X00116
INITIAL='*' 00117
* MSG STUFF 00118
F0040803 DFHMDF POS=(08,03), X00119
ATTRB=(ASKIP), X00120
LENGTH=016 00121
F0040827 DFHMDF POS=(08,27), X00122
ATTRB=(ASKIP), X00123
LENGTH=001 00124
* RIGHT BORDER 00125
DFHMDF POS=(08,39), X00126
ATTRB=(ASKIP), X00127
LENGTH=001, X00128
INITIAL='*' 00129
* LEFT BORDER 00130
DFHMDF POS=(09,01), X00131
ATTRB=(ASKIP), X00132
LENGTH=001, X00133
INITIAL='*' 00134
* BLANK LINE 00135
DFHMDF POS=(09,03), X00136
ATTRB=(ASKIP), X00137
LENGTH=035, X00138
INITIAL=' ' 00139
* RIGHT BORDER 00140
DFHMDF POS=(09,39), X00141
ATTRB=(ASKIP), X00142
LENGTH=001, X00143
INITIAL='*' 00144
* BOTTOM BORDER 00145
DFHMDF POS=(10,01), X00146
ATTRB=(ASKIP), X00147
LENGTH=039, X00148
INITIAL='***************************************' 00149