118 lines
8.9 KiB
Plaintext
118 lines
8.9 KiB
Plaintext
* DATA SET DTSM18 AT LEVEL 003 AS OF 10/22/98
|
|
***** 00001
|
|
* 00002
|
|
* 18 RELATIONSHIP INQUIRY 00003
|
|
* 00004
|
|
***** 00005
|
|
SPACE 00006
|
|
DTSM18 DFHMDI SIZE=(24,80),LINE=1,COLUMN=1 00007**2
|
|
SPACE 00008
|
|
F180101 DFHMDF POS=(1,1),LENGTH=02,ATTRB=(FSET,ASKIP), *00009
|
|
INITIAL='18' 00010
|
|
SPACE 00011
|
|
DFHMDF POS=(1,24),LENGTH=20,ATTRB=(ASKIP), *00012
|
|
INITIAL='RELATIONSHIP INQUIRY' 00013
|
|
SPACE 00014
|
|
F180162 DFHMDF POS=(1,62),LENGTH=08,ATTRB=(ASKIP) 00015
|
|
SPACE 00016
|
|
F180172 DFHMDF POS=(1,72),LENGTH=08,ATTRB=(ASKIP) 00017
|
|
SPACE 00018
|
|
DFHMDF POS=(02,04),LENGTH=07,ATTRB=(ASKIP), *00019
|
|
INITIAL='EMP NO:' 00020
|
|
SPACE 00021
|
|
F180212 DFHMDF POS=(02,12),LENGTH=03,ATTRB=(ASKIP) 00022
|
|
SPACE 00023
|
|
F180216 DFHMDF POS=(02,16),LENGTH=03,ATTRB=(ASKIP) 00024
|
|
SPACE 00025
|
|
DFHMDF POS=(02,20),LENGTH=01,ATTRB=(ASKIP) 00026
|
|
SPACE 00027
|
|
F180223 DFHMDF POS=(02,23),LENGTH=40,ATTRB=(ASKIP) 00028
|
|
SPACE 00029
|
|
F180272 DFHMDF POS=(02,72),LENGTH=08,ATTRB=(ASKIP) 00030
|
|
SPACE 00031
|
|
F180372 DFHMDF POS=(03,72),LENGTH=02,ATTRB=(ASKIP) 00032
|
|
SPACE 00033
|
|
DFHMDF POS=(03,75),LENGTH=02,ATTRB=(ASKIP), *00034
|
|
INITIAL='OF' 00035
|
|
SPACE 00036
|
|
F180378 DFHMDF POS=(03,78),LENGTH=02,ATTRB=(ASKIP) 00037
|
|
SPACE 00038
|
|
DFHMDF POS=(04,01),LENGTH=02,ATTRB=(ASKIP), *00039
|
|
INITIAL='NO' 00040
|
|
SPACE 00041
|
|
DFHMDF POS=(04,07),LENGTH=04,ATTRB=(ASKIP), *00042
|
|
INITIAL='PRED' 00043
|
|
SPACE 00044
|
|
DFHMDF POS=(04,16),LENGTH=04,ATTRB=(ASKIP), *00045
|
|
INITIAL='SUCC' 00046
|
|
SPACE 00047
|
|
DFHMDF POS=(04,24),LENGTH=08,ATTRB=(ASKIP), *00048
|
|
INITIAL='EFF DATE' 00049
|
|
SPACE 00050
|
|
DFHMDF POS=(04,34),LENGTH=04,ATTRB=(ASKIP), *00051
|
|
INITIAL='TYPE' 00052
|
|
SPACE 00053
|
|
DFHMDF POS=(04,40),LENGTH=03,ATTRB=(ASKIP), *00054
|
|
INITIAL='EXP' 00055
|
|
SPACE 00056
|
|
DFHMDF POS=(04,51),LENGTH=12,ATTRB=(ASKIP), *00057**3
|
|
INITIAL='PRIMARY NAME' 00058**3
|
|
SPACE 00059
|
|
F180501 DFHMDF POS=(05,01),LENGTH=78,ATTRB=(ASKIP) 00060
|
|
SPACE 00061
|
|
F180601 DFHMDF POS=(06,01),LENGTH=78,ATTRB=(ASKIP) 00062
|
|
SPACE 00063
|
|
F180701 DFHMDF POS=(07,01),LENGTH=78,ATTRB=(ASKIP) 00064
|
|
SPACE 00065
|
|
F180801 DFHMDF POS=(08,01),LENGTH=78,ATTRB=(ASKIP) 00066
|
|
SPACE 00067
|
|
F180901 DFHMDF POS=(09,01),LENGTH=78,ATTRB=(ASKIP) 00068
|
|
SPACE 00069
|
|
F181001 DFHMDF POS=(10,01),LENGTH=78,ATTRB=(ASKIP) 00070
|
|
SPACE 00071
|
|
F181101 DFHMDF POS=(11,01),LENGTH=78,ATTRB=(ASKIP) 00072
|
|
SPACE 00073
|
|
F181201 DFHMDF POS=(12,01),LENGTH=78,ATTRB=(ASKIP) 00074
|
|
SPACE 00075
|
|
F181301 DFHMDF POS=(13,01),LENGTH=78,ATTRB=(ASKIP) 00076
|
|
SPACE 00077
|
|
F181401 DFHMDF POS=(14,01),LENGTH=78,ATTRB=(ASKIP) 00078
|
|
SPACE 00079
|
|
F181501 DFHMDF POS=(15,01),LENGTH=78,ATTRB=(ASKIP) 00080
|
|
SPACE 00081
|
|
F181601 DFHMDF POS=(16,01),LENGTH=78,ATTRB=(ASKIP) 00082
|
|
SPACE 00083
|
|
F181701 DFHMDF POS=(17,01),LENGTH=78,ATTRB=(ASKIP) 00084
|
|
SPACE 00085
|
|
F181801 DFHMDF POS=(18,01),LENGTH=78,ATTRB=(ASKIP) 00086
|
|
SPACE 00087
|
|
F181901 DFHMDF POS=(19,01),LENGTH=78,ATTRB=(ASKIP) 00088
|
|
SPACE 00089
|
|
F182001 DFHMDF POS=(20,01),LENGTH=78,ATTRB=(ASKIP) 00090
|
|
SPACE 00091
|
|
DFHMDF POS=(22,01),LENGTH=15,ATTRB=(ASKIP), *00092
|
|
INITIAL='SELECT LINE NO:' 00093
|
|
SPACE 00094
|
|
F182217 DFHMDF POS=(22,17),LENGTH=02,ATTRB=(ASKIP) 00095
|
|
SPACE 00096
|
|
DFHMDF POS=(22,20),LENGTH=01,ATTRB=(ASKIP) 00097
|
|
SPACE 00098
|
|
F182313 DFHMDF POS=(23,13),LENGTH=08,ATTRB=(ASKIP) 00099
|
|
SPACE 00100
|
|
F182324 DFHMDF POS=(23,24),LENGTH=07,ATTRB=(ASKIP) 00101
|
|
SPACE 00102
|
|
F182334 DFHMDF POS=(23,34),LENGTH=07,ATTRB=(ASKIP) 00103
|
|
SPACE 00104
|
|
F182344 DFHMDF POS=(23,44),LENGTH=07,ATTRB=(ASKIP) 00105
|
|
SPACE 00106
|
|
F182401 DFHMDF POS=(24,01),LENGTH=08,ATTRB=(ASKIP) 00107
|
|
SPACE 00108
|
|
F182410 DFHMDF POS=(24,10),LENGTH=58,ATTRB=(ASKIP) 00109
|
|
SPACE 00110
|
|
DFHMDF POS=(24,69),LENGTH=06,ATTRB=(ASKIP), *00111
|
|
INITIAL='GO TO:' 00112
|
|
SPACE 00113
|
|
F182476 DFHMDF POS=(24,76),LENGTH=02,ATTRB=(ASKIP) 00114
|
|
SPACE 00115
|
|
DFHMDF POS=(24,79),LENGTH=01,ATTRB=(ASKIP) 00116
|