Files
DUTAS/Maps/DTSM50.bms
2025-07-21 11:20:11 -04:00

95 lines
7.1 KiB
Plaintext

* 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