DUTAS re-platformed to Raincode - Initial Source Code
This commit is contained in:
167
Maps/DTSM12.bms
Normal file
167
Maps/DTSM12.bms
Normal file
@ -0,0 +1,167 @@
|
||||
* DATA SET DTSM12 AT LEVEL 004 AS OF 09/07/99
|
||||
* DATA SET MACM12 AT LEVEL 005 AS OF 02/04/95 00001
|
||||
***** 00002
|
||||
* 00003
|
||||
* 12 REGISTRATION SEARCHES. 00004
|
||||
* 00005
|
||||
***** 00006
|
||||
SPACE 00007
|
||||
DTSM12 DFHMDI SIZE=(24,80), X00008**2
|
||||
LINE=01, X00009
|
||||
COLUMN=01 00010
|
||||
F120101 DFHMDF POS=(01,01), X00011
|
||||
ATTRB=(ASKIP,FSET), X00012
|
||||
LENGTH=002, X00013
|
||||
INITIAL='12' 00014
|
||||
DFHMDF POS=(01,25), X00015
|
||||
ATTRB=(ASKIP), X00016
|
||||
LENGTH=021, X00017
|
||||
INITIAL='REGISTRATION SEARCHES' 00018
|
||||
F120162 DFHMDF POS=(01,62), X00019
|
||||
ATTRB=(ASKIP), X00020
|
||||
LENGTH=008 00021
|
||||
F120172 DFHMDF POS=(01,72), X00022
|
||||
ATTRB=(ASKIP), X00023
|
||||
LENGTH=008 00024
|
||||
F120272 DFHMDF POS=(02,72), X00025
|
||||
ATTRB=(ASKIP), X00026
|
||||
LENGTH=008 00027
|
||||
DFHMDF POS=(03,04), X00028
|
||||
ATTRB=(ASKIP), X00029
|
||||
LENGTH=016, X00030
|
||||
INITIAL='SEARCH EMP NAME:' 00031
|
||||
F120321 DFHMDF POS=(03,21), X00032
|
||||
ATTRB=(ASKIP,FSET), X00033
|
||||
LENGTH=040 00034
|
||||
DFHMDF POS=(03,62), X00035
|
||||
ATTRB=(ASKIP), X00036
|
||||
LENGTH=001 00037
|
||||
DFHMDF POS=(04,04), X00038
|
||||
ATTRB=(ASKIP), X00039
|
||||
LENGTH=016, X00040
|
||||
INITIAL='SEARCH OPO NAME:' 00041
|
||||
F120421 DFHMDF POS=(04,21), X00042
|
||||
ATTRB=(ASKIP,FSET), X00043
|
||||
LENGTH=032 00044
|
||||
DFHMDF POS=(04,54), X00045
|
||||
ATTRB=(ASKIP), X00046
|
||||
LENGTH=001 00047
|
||||
DFHMDF POS=(05,05), X00048
|
||||
ATTRB=(ASKIP), X00049
|
||||
LENGTH=015, X00050
|
||||
INITIAL='SEARCH OPO SSN:' 00051
|
||||
F120521 DFHMDF POS=(05,21), X00052
|
||||
ATTRB=(ASKIP,NUM,FSET), X00053
|
||||
LENGTH=003 00054
|
||||
F120525 DFHMDF POS=(05,25), X00055
|
||||
ATTRB=(ASKIP,NUM,FSET), X00056
|
||||
LENGTH=002 00057
|
||||
F120528 DFHMDF POS=(05,28), X00058
|
||||
ATTRB=(ASKIP,NUM,FSET), X00059
|
||||
LENGTH=004 00060
|
||||
DFHMDF POS=(05,33), X00061
|
||||
ATTRB=(ASKIP), X00062
|
||||
LENGTH=001 00063
|
||||
DFHMDF POS=(06,08), X00064
|
||||
ATTRB=(ASKIP), X00065
|
||||
LENGTH=012, X00066
|
||||
INITIAL='SEARCH FEIN:' 00067
|
||||
F120621 DFHMDF POS=(06,21), X00068
|
||||
ATTRB=(ASKIP,NUM,FSET), X00069
|
||||
LENGTH=002 00070
|
||||
F120624 DFHMDF POS=(06,24), X00071
|
||||
ATTRB=(ASKIP,NUM,FSET), X00072
|
||||
LENGTH=007 00073
|
||||
DFHMDF POS=(06,32), X00074
|
||||
ATTRB=(ASKIP), X00075
|
||||
LENGTH=001 00076
|
||||
DFHMDF POS=(07,09), X00077**3
|
||||
ATTRB=(ASKIP), X00078**3
|
||||
LENGTH=011, X00079**3
|
||||
INITIAL='SEARCH BTN:' 00080**3
|
||||
F120721 DFHMDF POS=(07,21), X00081**3
|
||||
ATTRB=(ASKIP,NUM,FSET), X00082**3
|
||||
LENGTH=009 00083**3
|
||||
DFHMDF POS=(07,31), X00084**4
|
||||
ATTRB=(ASKIP), X00085**4
|
||||
LENGTH=001 00086**4
|
||||
DFHMDF POS=(08,01), X00087**3
|
||||
ATTRB=(ASKIP), X00088
|
||||
LENGTH=079, X00089
|
||||
INITIAL='NO NAME X00090
|
||||
CITY ST EMP NO ES TY' 00091
|
||||
F120901 DFHMDF POS=(09,01), X00092**3
|
||||
ATTRB=(ASKIP), X00093
|
||||
LENGTH=079 00094
|
||||
F121001 DFHMDF POS=(10,01), X00095**3
|
||||
ATTRB=(ASKIP), X00096
|
||||
LENGTH=079 00097
|
||||
F121101 DFHMDF POS=(11,01), X00098**3
|
||||
ATTRB=(ASKIP), X00099
|
||||
LENGTH=079 00100
|
||||
F121201 DFHMDF POS=(12,01), X00101**3
|
||||
ATTRB=(ASKIP), X00102
|
||||
LENGTH=079 00103
|
||||
F121301 DFHMDF POS=(13,01), X00104**3
|
||||
ATTRB=(ASKIP), X00105
|
||||
LENGTH=079 00106
|
||||
F121401 DFHMDF POS=(14,01), X00107**3
|
||||
ATTRB=(ASKIP), X00108
|
||||
LENGTH=079 00109
|
||||
F121501 DFHMDF POS=(15,01), X00110**3
|
||||
ATTRB=(ASKIP), X00111
|
||||
LENGTH=079 00112
|
||||
F121601 DFHMDF POS=(16,01), X00113**3
|
||||
ATTRB=(ASKIP), X00114
|
||||
LENGTH=079 00115
|
||||
F121701 DFHMDF POS=(17,01), X00116**3
|
||||
ATTRB=(ASKIP), X00117
|
||||
LENGTH=079 00118
|
||||
F121801 DFHMDF POS=(18,01), X00119**3
|
||||
ATTRB=(ASKIP), X00120
|
||||
LENGTH=079 00121
|
||||
F121901 DFHMDF POS=(19,01), X00122**3
|
||||
ATTRB=(ASKIP), X00123
|
||||
LENGTH=079 00124
|
||||
F122001 DFHMDF POS=(20,01), X00125**3
|
||||
ATTRB=(ASKIP), X00126
|
||||
LENGTH=079 00127
|
||||
DFHMDF POS=(22,05), X00128**3
|
||||
ATTRB=(ASKIP), X00129
|
||||
LENGTH=015, X00130
|
||||
INITIAL='SELECT LINE NO:' 00131
|
||||
F122221 DFHMDF POS=(22,21), X00132**3
|
||||
ATTRB=(ASKIP,NUM), X00133
|
||||
LENGTH=002 00134
|
||||
DFHMDF POS=(22,24), X00135**3
|
||||
ATTRB=(ASKIP), X00136
|
||||
LENGTH=001 00137
|
||||
DFHMDF POS=(22,29), X00138**3
|
||||
ATTRB=(ASKIP), X00139
|
||||
LENGTH=010, X00140
|
||||
INITIAL='SCREEN ID:' 00141
|
||||
F122240 DFHMDF POS=(22,40), X00142**3
|
||||
ATTRB=(ASKIP,NUM), X00143
|
||||
LENGTH=002 00144
|
||||
DFHMDF POS=(22,43), X00145**3
|
||||
ATTRB=(ASKIP), X00146
|
||||
LENGTH=001 00147
|
||||
F122303 DFHMDF POS=(23,03), X00148**3
|
||||
ATTRB=(ASKIP), X00149
|
||||
LENGTH=007 00150
|
||||
F122312 DFHMDF POS=(23,12), X00151**3
|
||||
ATTRB=(ASKIP), X00152
|
||||
LENGTH=007 00153
|
||||
F122347 DFHMDF POS=(23,47), X00154**3
|
||||
ATTRB=(ASKIP), X00155
|
||||
LENGTH=020 00156**3
|
||||
F122401 DFHMDF POS=(24,01),LENGTH=08,ATTRB=ASKIP 00157
|
||||
SPACE 00158
|
||||
F122410 DFHMDF POS=(24,10),LENGTH=58,ATTRB=ASKIP 00159
|
||||
SPACE 00160
|
||||
DFHMDF POS=(24,69),LENGTH=06,ATTRB=ASKIP, X00161
|
||||
INITIAL='GO TO:' 00162
|
||||
SPACE 00163
|
||||
F122476 DFHMDF POS=(24,76),LENGTH=02,ATTRB=ASKIP 00164
|
||||
SPACE 00165
|
||||
DFHMDF POS=(24,79),LENGTH=01,ATTRB=ASKIP 00166
|
||||
Reference in New Issue
Block a user