DUTAS re-platformed to Raincode - Initial Source Code
This commit is contained in:
94
Maps/DTSM50.bms
Normal file
94
Maps/DTSM50.bms
Normal file
@ -0,0 +1,94 @@
|
||||
* DATA SET DTSM50 AT LEVEL 002 AS OF 08/10/98
|
||||
* DATA SET MACM50 AT LEVEL 008 AS OF 01/23/95 00001
|
||||
***** 00002
|
||||
* 00003
|
||||
* 50 RATING / FUTA MENU 00004
|
||||
* 00005
|
||||
***** 00006
|
||||
SPACE 00007
|
||||
DTSM50 DFHMDI SIZE=(24,80), *00008**2
|
||||
LINE=1, *00009
|
||||
COLUMN=1 00010
|
||||
SPACE 00011
|
||||
F500101 DFHMDF POS=(1,1), *00012
|
||||
ATTRB=(ASKIP,FSET), *00013
|
||||
LENGTH=2, *00014
|
||||
INITIAL='50' 00015
|
||||
SPACE 00016
|
||||
DFHMDF POS=(1,25), *00017
|
||||
ATTRB=(ASKIP), *00018
|
||||
LENGTH=18, *00019
|
||||
INITIAL='RATING / FUTA MENU' 00020
|
||||
SPACE 00021
|
||||
F500162 DFHMDF POS=(1,62), *00022
|
||||
ATTRB=(ASKIP), *00023
|
||||
LENGTH=8 00024
|
||||
SPACE 00025
|
||||
F500172 DFHMDF POS=(1,72), *00026
|
||||
ATTRB=(ASKIP), *00027
|
||||
LENGTH=8 00028
|
||||
SPACE 00029
|
||||
F500272 DFHMDF POS=(2,72), *00030
|
||||
ATTRB=(ASKIP), *00031
|
||||
LENGTH=8 00032
|
||||
SPACE 00033
|
||||
DFHMDF POS=(03,13), *00034
|
||||
ATTRB=(ASKIP), *00035
|
||||
LENGTH=6, *00036
|
||||
INITIAL='OPTION' 00037
|
||||
SPACE 00038
|
||||
DFHMDF POS=(03,26), *00039
|
||||
ATTRB=(ASKIP), *00040
|
||||
LENGTH=11, *00041
|
||||
INITIAL='DESCRIPTION' 00042
|
||||
SPACE 00043
|
||||
DFHMDF POS=(05,16), *00044
|
||||
ATTRB=(ASKIP,BRT), *00045
|
||||
LENGTH=1, *00046
|
||||
INITIAL='1' 00047
|
||||
SPACE 00048
|
||||
DFHMDF POS=(05,21), *00049
|
||||
ATTRB=(ASKIP), *00050
|
||||
LENGTH=19, *00051
|
||||
INITIAL='RATE INQUIRY/UPDATE' 00052
|
||||
SPACE 00053
|
||||
DFHMDF POS=(06,16), *00054
|
||||
ATTRB=(ASKIP,BRT), *00055
|
||||
LENGTH=1, *00056
|
||||
INITIAL='2' 00057
|
||||
SPACE 00058
|
||||
DFHMDF POS=(06,21), *00059
|
||||
ATTRB=(ASKIP), *00060
|
||||
LENGTH=26, *00061
|
||||
INITIAL='RATE CUTOFF INQUIRY/UPDATE' 00062
|
||||
SPACE 00063
|
||||
DFHMDF POS=(07,16), *00064
|
||||
ATTRB=(ASKIP,BRT), *00065
|
||||
LENGTH=1, *00066
|
||||
INITIAL='3' 00067
|
||||
SPACE 00068
|
||||
DFHMDF POS=(07,21), *00069
|
||||
ATTRB=(ASKIP), *00070
|
||||
LENGTH=40, *00071
|
||||
INITIAL='FUTA CERTIFICATION/RECERTIFICATION PRINT' 00072
|
||||
SPACE 00073
|
||||
DFHMDF POS=(22,13), *00074
|
||||
ATTRB=(ASKIP), *00075
|
||||
LENGTH=7, *00076
|
||||
INITIAL='OPTION:' 00077
|
||||
SPACE 00078
|
||||
F502221 DFHMDF POS=(22,21), *00079
|
||||
ATTRB=(UNPROT,IC,FSET,BRT), *00080
|
||||
LENGTH=2 00081
|
||||
SPACE 00082
|
||||
DFHMDF POS=(22,24), *00083
|
||||
ATTRB=(ASKIP), *00084
|
||||
LENGTH=1 00085
|
||||
SPACE 00086
|
||||
F502401 DFHMDF POS=(24,01), *00087
|
||||
ATTRB=(ASKIP), *00088
|
||||
LENGTH=8 00089
|
||||
SPACE 00090
|
||||
F502410 DFHMDF POS=(24,10), *00091
|
||||
ATTRB=(ASKIP), *00092
|
||||
LENGTH=58 00093
|
||||
Reference in New Issue
Block a user