* DATA SET OJRM003 AT LEVEL 001 AS OF 05/08/02 * DATA SET OJRM003 AT LEVEL 009 AS OF 04/03/02 00001 * DATA SET OJRM003 AT LEVEL 004 AS OF 12/11/98 00002 OJRM003 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 * QUARTER TYPE LITERAL 00016 DFHMDF POS=(02,03), X00017 ATTRB=(ASKIP), X00018 LENGTH=014, X00019 INITIAL='ENTER USER ID:' 00020 * FILLER 00021 DFHMDF POS=(02,18), X00022 ATTRB=(ASKIP), X00023 LENGTH=010, 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 * USER ID LITERAL 00051 DFHMDF POS=(04,03), X00052 ATTRB=(ASKIP), X00053 LENGTH=007, X00054 INITIAL='ECNT ' 00055 * FILLER 00056 DFHMDF POS=(04,11), X00057 ATTRB=(ASKIP), X00058 LENGTH=017, 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 * USER ID VAR 00071 F0030503 DFHMDF POS=(05,03), X00072 ATTRB=(FSET,IC), X00073 LENGTH=008 00074 DFHMDF POS=(05,12), X00075 ATTRB=(ASKIP), X00076 LENGTH=001 00077 * FILLER 00078 DFHMDF POS=(05,16), X00079 ATTRB=(ASKIP), X00080 LENGTH=012, X00081 INITIAL=' ' 00082 * RIGHT BORDER 00083 DFHMDF POS=(05,29), X00084 ATTRB=(ASKIP), X00085 LENGTH=001, X00086 INITIAL='*' 00087 * LEFT BORDER 00088 DFHMDF POS=(06,01), X00089 ATTRB=(ASKIP), X00090 LENGTH=001, X00091 INITIAL='*' 00092 * BLANK LINE 00093 DFHMDF POS=(06,03), X00094 ATTRB=(ASKIP), X00095 LENGTH=025, X00096 INITIAL=' ' 00097 * RIGHT BORDER 00098 DFHMDF POS=(06,29), X00099 ATTRB=(ASKIP), X00100 LENGTH=001, X00101 INITIAL='*' 00102 * LEFT BORDER 00103 DFHMDF POS=(07,01), X00104 ATTRB=(ASKIP), X00105 LENGTH=001, X00106 INITIAL='*' 00107 * BLANK LINE 00108 DFHMDF POS=(07,03), X00109 ATTRB=(ASKIP), X00110 LENGTH=025, X00111 INITIAL=' ' 00112 * RIGHT BORDER 00113 DFHMDF POS=(07,29), X00114 ATTRB=(ASKIP), X00115 LENGTH=001, X00116 INITIAL='*' 00117 * LEFT BORDER 00118 DFHMDF POS=(08,01), X00119 ATTRB=(ASKIP), X00120 LENGTH=001, X00121 INITIAL='*' 00122 * MSG STUFF 00123 F0030803 DFHMDF POS=(08,03), X00124 ATTRB=(ASKIP), X00125 LENGTH=016 00126 F0030827 DFHMDF POS=(08,27), X00127 ATTRB=(ASKIP), X00128 LENGTH=001 00129 * RIGHT BORDER 00130 DFHMDF POS=(08,29), X00131 ATTRB=(ASKIP), X00132 LENGTH=001, X00133 INITIAL='*' 00134 * LEFT BORDER 00135 DFHMDF POS=(09,01), X00136 ATTRB=(ASKIP), X00137 LENGTH=001, X00138 INITIAL='*' 00139 * BLANK LINE 00140 DFHMDF POS=(09,03), X00141 ATTRB=(ASKIP), X00142 LENGTH=025, X00143 INITIAL=' ' 00144 * RIGHT BORDER 00145 DFHMDF POS=(09,29), X00146 ATTRB=(ASKIP), X00147 LENGTH=001, X00148 INITIAL='*' 00149 * BOTTOM BORDER 00150 DFHMDF POS=(10,01), X00151 ATTRB=(ASKIP), X00152 LENGTH=029, X00153 INITIAL='*****************************' 00154