* 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