DUTAS re-platformed to Raincode - Initial Source Code
This commit is contained in:
Neeraj Kumar
198
Maps/DTSM70.bms
Normal file
198
Maps/DTSM70.bms
Normal file
@ -0,0 +1,198 @@
|
||||
* DATA SET DTSM70 AT LEVEL 007 AS OF 01/23/03
|
||||
* DATA SET DTSM70 AT LEVEL 002 AS OF 01/02/03 00001
|
||||
* DATA SET DTSM70 AT LEVEL 005 AS OF 01/29/02 00002
|
||||
* DATA SET DTSM70 AT LEVEL 003 AS OF 11/20/01 00003
|
||||
* DATA SET DTSM70 AT LEVEL 003 AS OF 08/11/98 00004
|
||||
* DATA SET MACM70 AT LEVEL 001 AS OF 05/13/96 00005
|
||||
***** 00006
|
||||
* 00007
|
||||
* 70 MISCELLANEOUS MENU 00008
|
||||
* 00009
|
||||
***** 00010
|
||||
SPACE 00011
|
||||
DTSM70 DFHMDI SIZE=(24,80), *00012
|
||||
LINE=1, *00013
|
||||
COLUMN=1 00014
|
||||
SPACE 00015
|
||||
F700101 DFHMDF POS=(1,1), *00016
|
||||
ATTRB=(ASKIP,FSET), *00017
|
||||
LENGTH=2, *00018
|
||||
INITIAL='70' 00019
|
||||
SPACE 00020
|
||||
DFHMDF POS=(1,25), *00021
|
||||
ATTRB=(ASKIP), *00022
|
||||
LENGTH=18, *00023
|
||||
INITIAL='MISCELLANEOUS MENU' 00024
|
||||
SPACE 00025
|
||||
F700162 DFHMDF POS=(1,62), *00026
|
||||
ATTRB=(ASKIP), *00027
|
||||
LENGTH=8 00028
|
||||
SPACE 00029
|
||||
F700172 DFHMDF POS=(1,72), *00030
|
||||
ATTRB=(ASKIP), *00031
|
||||
LENGTH=8 00032
|
||||
SPACE 00033
|
||||
F700272 DFHMDF POS=(2,72), *00034
|
||||
ATTRB=(ASKIP), *00035
|
||||
LENGTH=8 00036
|
||||
SPACE 00037
|
||||
DFHMDF POS=(03,13), *00038
|
||||
ATTRB=(ASKIP), *00039
|
||||
LENGTH=6, *00040
|
||||
INITIAL='OPTION' 00041
|
||||
SPACE 00042
|
||||
DFHMDF POS=(03,26), *00043
|
||||
ATTRB=(ASKIP), *00044
|
||||
LENGTH=11, *00045
|
||||
INITIAL='DESCRIPTION' 00046
|
||||
SPACE 00047
|
||||
DFHMDF POS=(05,16), *00048
|
||||
ATTRB=(ASKIP,BRT), *00049
|
||||
LENGTH=1, *00050
|
||||
INITIAL='1' 00051
|
||||
SPACE 00052
|
||||
DFHMDF POS=(05,21), *00053
|
||||
ATTRB=(ASKIP), *00054
|
||||
LENGTH=23, *00055
|
||||
INITIAL='NOTE PAD INQUIRY/UPDATE' 00056
|
||||
SPACE 00057
|
||||
DFHMDF POS=(06,16), *00058
|
||||
ATTRB=(ASKIP,BRT), *00059
|
||||
LENGTH=1, *00060
|
||||
INITIAL='2' 00061
|
||||
SPACE 00062
|
||||
DFHMDF POS=(06,21), *00063
|
||||
ATTRB=(ASKIP), *00064
|
||||
LENGTH=17, *00065
|
||||
INITIAL='EVENT LOG INQUIRY' 00066
|
||||
SPACE 00067
|
||||
DFHMDF POS=(07,16), *00068
|
||||
ATTRB=(ASKIP,BRT), *00069
|
||||
LENGTH=1, *00070
|
||||
INITIAL='3' 00071
|
||||
SPACE 00072
|
||||
DFHMDF POS=(07,21), *00073
|
||||
ATTRB=(ASKIP), *00074
|
||||
LENGTH=24, *00075
|
||||
INITIAL='EVENT LOG INQUIRY/UPDATE' 00076
|
||||
SPACE 00077
|
||||
DFHMDF POS=(08,16), *00078
|
||||
ATTRB=(ASKIP,BRT), *00079
|
||||
LENGTH=1, *00080
|
||||
INITIAL='4' 00081
|
||||
SPACE 00082
|
||||
DFHMDF POS=(08,21), *00083
|
||||
ATTRB=(ASKIP), *00084
|
||||
LENGTH=22, *00085
|
||||
INITIAL='TICKLER INQUIRY/UPDATE' 00086
|
||||
SPACE 00087
|
||||
DFHMDF POS=(09,16), *00088
|
||||
ATTRB=(ASKIP,BRT), *00089
|
||||
LENGTH=1, *00090
|
||||
INITIAL='5' 00091
|
||||
SPACE 00092
|
||||
DFHMDF POS=(09,21), *00093
|
||||
ATTRB=(ASKIP), *00094
|
||||
LENGTH=29, *00095
|
||||
INITIAL='TICKLER BY DESTINATION SEARCH' 00096
|
||||
SPACE 00097
|
||||
DFHMDF POS=(10,16), *00098
|
||||
ATTRB=(ASKIP,BRT), *00099
|
||||
LENGTH=1, *00100
|
||||
INITIAL='6' 00101
|
||||
SPACE 00102
|
||||
DFHMDF POS=(10,21), *00103
|
||||
ATTRB=(ASKIP), *00104
|
||||
LENGTH=22, *00105
|
||||
INITIAL='MISCELLANEOUS REQUESTS' 00106
|
||||
SPACE 00107
|
||||
DFHMDF POS=(11,16), *00108
|
||||
ATTRB=(ASKIP,BRT), *00109
|
||||
LENGTH=1, *00110
|
||||
INITIAL='7' 00111
|
||||
SPACE 00112
|
||||
DFHMDF POS=(11,21), *00113
|
||||
ATTRB=(ASKIP), *00114
|
||||
LENGTH=31, *00115
|
||||
INITIAL='CORRESPONDENCE QUEUE INITIATION' 00116
|
||||
SPACE 00117
|
||||
DFHMDF POS=(12,16), *00118
|
||||
ATTRB=(ASKIP,BRT), *00119
|
||||
LENGTH=1, *00120
|
||||
INITIAL='8' 00121
|
||||
SPACE 00122
|
||||
DFHMDF POS=(12,21), *00123
|
||||
ATTRB=(ASKIP), *00124
|
||||
LENGTH=35, *00125
|
||||
INITIAL='CORRESPONDENCE QUEUE INQUIRY/UPDATE' 00126
|
||||
SPACE 00127
|
||||
DFHMDF POS=(13,16), *00128
|
||||
ATTRB=(ASKIP,BRT), *00129
|
||||
LENGTH=1, *00130
|
||||
INITIAL='9' 00131
|
||||
SPACE 00132
|
||||
DFHMDF POS=(13,21), *00133
|
||||
ATTRB=(ASKIP), *00134
|
||||
LENGTH=38, *00135
|
||||
INITIAL='BENEFIT MAILING ADDRESS INQUIRY/UPDATE' 00136
|
||||
SPACE 00137
|
||||
DFHMDF POS=(14,16), *00138
|
||||
ATTRB=(ASKIP,BRT), *00139
|
||||
LENGTH=1, *00140
|
||||
INITIAL='A' 00141
|
||||
SPACE 00142
|
||||
DFHMDF POS=(14,21), *00143
|
||||
ATTRB=(ASKIP), *00144
|
||||
LENGTH=31, *00145
|
||||
INITIAL='ELECTRONIC FILER INQUIRY/UPDATE' 00146
|
||||
SPACE 00147
|
||||
DFHMDF POS=(15,16), *00148
|
||||
ATTRB=(ASKIP,BRT), *00149
|
||||
LENGTH=1, *00150
|
||||
INITIAL='B' 00151
|
||||
SPACE 00152
|
||||
DFHMDF POS=(15,21), *00153
|
||||
ATTRB=(ASKIP), *00154
|
||||
LENGTH=24, *00155
|
||||
INITIAL='MODIFICATION LOG INQUIRY' 00156
|
||||
SPACE 00157
|
||||
DFHMDF POS=(16,16), *00158
|
||||
ATTRB=(ASKIP,BRT), *00159
|
||||
LENGTH=1, *00160
|
||||
INITIAL='C' 00161
|
||||
SPACE 00162
|
||||
DFHMDF POS=(16,21), *00163
|
||||
ATTRB=(ASKIP), *00164
|
||||
LENGTH=30, *00165
|
||||
INITIAL='FILING SCHEDULE INQUIRY/UPDATE' 00166
|
||||
SPACE 00167
|
||||
DFHMDF POS=(17,16), *00168
|
||||
ATTRB=(ASKIP,BRT), *00169
|
||||
LENGTH=1, *00170
|
||||
INITIAL='D' 00171
|
||||
SPACE 00172
|
||||
DFHMDF POS=(17,21), *00173
|
||||
ATTRB=(ASKIP), *00174
|
||||
LENGTH=30, *00175
|
||||
INITIAL='EMPLOYER WAGE REQUEST' 00176
|
||||
SPACE 00177
|
||||
DFHMDF POS=(22,13), *00178
|
||||
ATTRB=(ASKIP), *00179
|
||||
LENGTH=7, *00180
|
||||
INITIAL='OPTION:' 00181
|
||||
SPACE 00182
|
||||
F702221 DFHMDF POS=(22,21), *00183
|
||||
ATTRB=(UNPROT,IC,FSET,BRT), *00184
|
||||
LENGTH=2 00185
|
||||
SPACE 00186
|
||||
DFHMDF POS=(22,24), *00187
|
||||
ATTRB=(ASKIP), *00188
|
||||
LENGTH=1 00189
|
||||
SPACE 00190
|
||||
F702401 DFHMDF POS=(24,01), *00191
|
||||
ATTRB=(ASKIP), *00192
|
||||
LENGTH=8 00193
|
||||
SPACE 00194
|
||||
F702410 DFHMDF POS=(24,10), *00195
|
||||
ATTRB=(ASKIP), *00196
|
||||
LENGTH=58 00197
|
||||
Reference in New Issue
Block a user