137 lines
10 KiB
Plaintext
137 lines
10 KiB
Plaintext
* DATA SET DTSM30 AT LEVEL 004 AS OF 04/05/04
|
|
* DATA SET DTSM30 AT LEVEL 002 AS OF 09/11/03 00001
|
|
* DATA SET DTSM30 AT LEVEL 002 AS OF 08/10/98 00002
|
|
* DATA SET MACM30 AT LEVEL 008 AS OF 01/23/95 00003
|
|
***** 00004
|
|
* 00005
|
|
* 30 ACCOUNTING INQUIRY MENU 00006
|
|
* 00007
|
|
***** 00008
|
|
SPACE 00009
|
|
DTSM30 DFHMDI SIZE=(24,80), *00010
|
|
LINE=1, *00011
|
|
COLUMN=1 00012
|
|
SPACE 00013
|
|
F300101 DFHMDF POS=(1,1), *00014
|
|
ATTRB=(ASKIP,FSET), *00015
|
|
LENGTH=2, *00016
|
|
INITIAL='30' 00017
|
|
SPACE 00018
|
|
DFHMDF POS=(1,25), *00019
|
|
ATTRB=(ASKIP), *00020
|
|
LENGTH=23, *00021
|
|
INITIAL='ACCOUNTING INQUIRY MENU' 00022
|
|
SPACE 00023
|
|
F300162 DFHMDF POS=(1,62), *00024
|
|
ATTRB=(ASKIP), *00025
|
|
LENGTH=8 00026
|
|
SPACE 00027
|
|
F300172 DFHMDF POS=(1,72), *00028
|
|
ATTRB=(ASKIP), *00029
|
|
LENGTH=8 00030
|
|
SPACE 00031
|
|
F300272 DFHMDF POS=(2,72), *00032
|
|
ATTRB=(ASKIP), *00033
|
|
LENGTH=8 00034
|
|
SPACE 00035
|
|
DFHMDF POS=(03,13), *00036
|
|
ATTRB=(ASKIP), *00037
|
|
LENGTH=6, *00038
|
|
INITIAL='OPTION' 00039
|
|
SPACE 00040
|
|
DFHMDF POS=(03,26), *00041
|
|
ATTRB=(ASKIP), *00042
|
|
LENGTH=11, *00043
|
|
INITIAL='DESCRIPTION' 00044
|
|
SPACE 00045
|
|
DFHMDF POS=(05,16), *00046
|
|
ATTRB=(ASKIP,BRT), *00047
|
|
LENGTH=1, *00048
|
|
INITIAL='1' 00049
|
|
SPACE 00050
|
|
DFHMDF POS=(05,21), *00051
|
|
ATTRB=(ASKIP), *00052
|
|
LENGTH=15, *00053
|
|
INITIAL='QUARTER INQUIRY' 00054
|
|
SPACE 00055
|
|
DFHMDF POS=(06,16), *00056
|
|
ATTRB=(ASKIP,BRT), *00057
|
|
LENGTH=1, *00058
|
|
INITIAL='2' 00059
|
|
SPACE 00060
|
|
DFHMDF POS=(06,21), *00061
|
|
ATTRB=(ASKIP), *00062
|
|
LENGTH=25, *00063
|
|
INITIAL='ALTERNATE QUARTER INQUIRY' 00064
|
|
SPACE 00065
|
|
DFHMDF POS=(07,16), *00066
|
|
ATTRB=(ASKIP,BRT), *00067
|
|
LENGTH=1, *00068
|
|
INITIAL='3' 00069
|
|
SPACE 00070
|
|
DFHMDF POS=(07,21), *00071
|
|
ATTRB=(ASKIP), *00072
|
|
LENGTH=14, *00073
|
|
INITIAL='REPORT INQUIRY' 00074
|
|
SPACE 00075
|
|
DFHMDF POS=(08,16), *00076
|
|
ATTRB=(ASKIP,BRT), *00077
|
|
LENGTH=1, *00078
|
|
INITIAL='4' 00079
|
|
SPACE 00080
|
|
DFHMDF POS=(08,21), *00081
|
|
ATTRB=(ASKIP), *00082
|
|
LENGTH=15, *00083
|
|
INITIAL='PAYMENT INQUIRY' 00084
|
|
SPACE 00085
|
|
DFHMDF POS=(09,16), *00086
|
|
ATTRB=(ASKIP,BRT), *00087
|
|
LENGTH=1, *00088
|
|
INITIAL='5' 00089
|
|
SPACE 00090
|
|
DFHMDF POS=(09,21), *00091
|
|
ATTRB=(ASKIP), *00092
|
|
LENGTH=18, *00093
|
|
INITIAL='ADJUSTMENT INQUIRY' 00094
|
|
SPACE 00095
|
|
DFHMDF POS=(10,16), *00096
|
|
ATTRB=(ASKIP,BRT), *00097
|
|
LENGTH=1, *00098
|
|
INITIAL='6' 00099
|
|
SPACE 00100
|
|
DFHMDF POS=(10,21), *00101
|
|
ATTRB=(ASKIP), *00102
|
|
LENGTH=15, *00103
|
|
INITIAL='JOURNAL INQUIRY' 00104
|
|
SPACE 00105
|
|
DFHMDF POS=(11,16), *00106
|
|
ATTRB=(ASKIP,BRT), *00107
|
|
LENGTH=1, *00108
|
|
INITIAL='7' 00109
|
|
SPACE 00110
|
|
DFHMDF POS=(11,21), *00111
|
|
ATTRB=(ASKIP), *00112
|
|
LENGTH=26, *00113
|
|
INITIAL='ELECTRONIC PAYMENT INQUIRY' 00114
|
|
SPACE 00115
|
|
DFHMDF POS=(22,13), *00116
|
|
ATTRB=(ASKIP), *00117
|
|
LENGTH=7, *00118
|
|
INITIAL='OPTION:' 00119
|
|
SPACE 00120
|
|
F302221 DFHMDF POS=(22,21), *00121
|
|
ATTRB=(UNPROT,IC,FSET,BRT), *00122
|
|
LENGTH=2 00123
|
|
SPACE 00124
|
|
DFHMDF POS=(22,24), *00125
|
|
ATTRB=(ASKIP), *00126
|
|
LENGTH=1 00127
|
|
SPACE 00128
|
|
F302401 DFHMDF POS=(24,01), *00129
|
|
ATTRB=(ASKIP), *00130
|
|
LENGTH=8 00131
|
|
SPACE 00132
|
|
F302410 DFHMDF POS=(24,10), *00133
|
|
ATTRB=(ASKIP), *00134
|
|
LENGTH=58 00135
|