59 lines
4.4 KiB
Plaintext
59 lines
4.4 KiB
Plaintext
* DATA SET DTSM91 AT LEVEL 003 AS OF 12/22/98
|
|
***** 00001
|
|
* 00002
|
|
* 91 PURGE INDICATOR INQUIRY/UPDATE. 00003
|
|
* 00004
|
|
***** 00005
|
|
SPACE 00006
|
|
DTSM91 DFHMDI SIZE=(24,80),LINE=1,COLUMN=1 00007**2
|
|
SPACE 00008
|
|
F910101 DFHMDF POS=(1,1),LENGTH=02,ATTRB=(FSET,ASKIP), *00009
|
|
INITIAL='91' 00010
|
|
SPACE 00011
|
|
DFHMDF POS=(1,21),LENGTH=30,ATTRB=(ASKIP), *00012
|
|
INITIAL='PURGE INDICATOR INQUIRY/UPDATE' 00013
|
|
SPACE 00014
|
|
F910162 DFHMDF POS=(1,62),LENGTH=08,ATTRB=(ASKIP) 00015
|
|
SPACE 00016
|
|
F910172 DFHMDF POS=(1,72),LENGTH=08,ATTRB=(ASKIP) 00017
|
|
SPACE 00018
|
|
F910272 DFHMDF POS=(2,72),LENGTH=08,ATTRB=(ASKIP) 00019
|
|
SPACE 00020
|
|
DFHMDF POS=(03,02),LENGTH=07,ATTRB=(ASKIP), *00021
|
|
INITIAL='EMP NO:' 00022
|
|
SPACE 00023
|
|
F910310 DFHMDF POS=(03,10),LENGTH=03,ATTRB=(ASKIP) 00024
|
|
SPACE 00025
|
|
F910314 DFHMDF POS=(03,14),LENGTH=03,ATTRB=(ASKIP) 00026
|
|
SPACE 00027
|
|
DFHMDF POS=(03,18),LENGTH=01,ATTRB=(ASKIP) 00028
|
|
SPACE 00029
|
|
F910336 DFHMDF POS=(03,21),LENGTH=40,ATTRB=(ASKIP) 00030
|
|
SPACE 00031
|
|
DFHMDF POS=(05,03),LENGTH=06,ATTRB=(ASKIP), *00032
|
|
INITIAL='PURGE?' 00033
|
|
SPACE 00034
|
|
F910510 DFHMDF POS=(05,10),LENGTH=01,ATTRB=(ASKIP) 00035
|
|
SPACE 00036
|
|
DFHMDF POS=(05,12),LENGTH=01,ATTRB=(ASKIP) 00037
|
|
SPACE 00038
|
|
DFHMDF POS=(21,01),LENGTH=16,ATTRB=(ASKIP), *00039
|
|
INITIAL='DISREGARD EDITS?' 00040
|
|
SPACE 00041
|
|
F912118 DFHMDF POS=(21,18),LENGTH=01,ATTRB=(ASKIP) 00042
|
|
SPACE 00043
|
|
DFHMDF POS=(21,20),LENGTH=01,ATTRB=(ASKIP) 00044
|
|
SPACE 00045
|
|
F912324 DFHMDF POS=(23,24),LENGTH=07,ATTRB=(ASKIP) 00046
|
|
SPACE 00047
|
|
F912401 DFHMDF POS=(24,01),LENGTH=08,ATTRB=(ASKIP) 00048
|
|
SPACE 00049
|
|
F912410 DFHMDF POS=(24,10),LENGTH=58,ATTRB=(ASKIP) 00050
|
|
SPACE 00051
|
|
DFHMDF POS=(24,69),LENGTH=06,ATTRB=(ASKIP), *00052
|
|
INITIAL='GO TO:' 00053
|
|
SPACE 00054
|
|
F912476 DFHMDF POS=(24,76),LENGTH=02,ATTRB=(ASKIP) 00055
|
|
SPACE 00056
|
|
DFHMDF POS=(24,79),LENGTH=01,ATTRB=(ASKIP) 00057
|