115 lines
8.7 KiB
Plaintext
115 lines
8.7 KiB
Plaintext
* DATA SET DTSM14 AT LEVEL 004 AS OF 10/12/98
|
|
***** 00001
|
|
* 00002
|
|
* 14 OWNER/PARTNER/OFFICER NAME INQUIRY 00003
|
|
* 00004
|
|
***** 00005
|
|
SPACE 00006
|
|
DTSM14 DFHMDI SIZE=(24,80),LINE=1,COLUMN=1 00007**2
|
|
SPACE 00008
|
|
F140101 DFHMDF POS=(1,1),LENGTH=02,ATTRB=(FSET,ASKIP), *00009
|
|
INITIAL='14' 00010
|
|
SPACE 00011
|
|
DFHMDF POS=(1,17),LENGTH=34,ATTRB=(ASKIP), *00012
|
|
INITIAL='OWNER/PARTNER/OFFICER NAME INQUIRY' 00013
|
|
SPACE 00014
|
|
F140162 DFHMDF POS=(1,62),LENGTH=08,ATTRB=(ASKIP) 00015
|
|
SPACE 00016
|
|
F140172 DFHMDF POS=(1,72),LENGTH=08,ATTRB=(ASKIP) 00017
|
|
SPACE 00018
|
|
DFHMDF POS=(02,02),LENGTH=07,ATTRB=(ASKIP), *00019
|
|
INITIAL='EMP NO:' 00020
|
|
SPACE 00021
|
|
F140210 DFHMDF POS=(02,10),LENGTH=03,ATTRB=(ASKIP) 00022
|
|
SPACE 00023
|
|
F140214 DFHMDF POS=(02,14),LENGTH=03,ATTRB=(ASKIP) 00024
|
|
SPACE 00025
|
|
DFHMDF POS=(02,18),LENGTH=01,ATTRB=(ASKIP) 00026
|
|
SPACE 00027
|
|
F140221 DFHMDF POS=(02,21),LENGTH=40,ATTRB=(ASKIP) 00028
|
|
SPACE 00029
|
|
F140272 DFHMDF POS=(02,72),LENGTH=08,ATTRB=(ASKIP) 00030
|
|
SPACE 00031
|
|
F140372 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
|
|
F140378 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,06),LENGTH=10,ATTRB=(ASKIP), *00042
|
|
INITIAL='O/P/O NAME' 00043
|
|
SPACE 00044
|
|
DFHMDF POS=(04,39),LENGTH=05,ATTRB=(ASKIP), *00045
|
|
INITIAL='TITLE' 00046
|
|
SPACE 00047
|
|
DFHMDF POS=(04,56),LENGTH=03,ATTRB=(ASKIP), *00048
|
|
INITIAL='SSN' 00049
|
|
SPACE 00050
|
|
DFHMDF POS=(04,67),LENGTH=04,ATTRB=(ASKIP), *00051
|
|
INITIAL='CITY' 00052
|
|
SPACE 00053
|
|
DFHMDF POS=(04,78),LENGTH=02,ATTRB=(ASKIP), *00054
|
|
INITIAL='ST' 00055
|
|
SPACE 00056
|
|
F140501 DFHMDF POS=(05,01),LENGTH=79,ATTRB=(ASKIP) 00057
|
|
SPACE 00058
|
|
F140601 DFHMDF POS=(06,01),LENGTH=79,ATTRB=(ASKIP) 00059
|
|
SPACE 00060
|
|
F140701 DFHMDF POS=(07,01),LENGTH=79,ATTRB=(ASKIP) 00061
|
|
SPACE 00062
|
|
F140801 DFHMDF POS=(08,01),LENGTH=79,ATTRB=(ASKIP) 00063
|
|
SPACE 00064
|
|
F140901 DFHMDF POS=(09,01),LENGTH=79,ATTRB=(ASKIP) 00065
|
|
SPACE 00066
|
|
F141001 DFHMDF POS=(10,01),LENGTH=79,ATTRB=(ASKIP) 00067
|
|
SPACE 00068
|
|
F141101 DFHMDF POS=(11,01),LENGTH=79,ATTRB=(ASKIP) 00069
|
|
SPACE 00070
|
|
F141201 DFHMDF POS=(12,01),LENGTH=79,ATTRB=(ASKIP) 00071
|
|
SPACE 00072
|
|
F141301 DFHMDF POS=(13,01),LENGTH=79,ATTRB=(ASKIP) 00073
|
|
SPACE 00074
|
|
F141401 DFHMDF POS=(14,01),LENGTH=79,ATTRB=(ASKIP) 00075
|
|
SPACE 00076
|
|
F141501 DFHMDF POS=(15,01),LENGTH=79,ATTRB=(ASKIP) 00077
|
|
SPACE 00078
|
|
F141601 DFHMDF POS=(16,01),LENGTH=79,ATTRB=(ASKIP) 00079
|
|
SPACE 00080
|
|
F141701 DFHMDF POS=(17,01),LENGTH=79,ATTRB=(ASKIP) 00081
|
|
SPACE 00082
|
|
F141801 DFHMDF POS=(18,01),LENGTH=79,ATTRB=(ASKIP) 00083
|
|
SPACE 00084
|
|
F141901 DFHMDF POS=(19,01),LENGTH=79,ATTRB=(ASKIP) 00085
|
|
SPACE 00086
|
|
F142001 DFHMDF POS=(20,01),LENGTH=79,ATTRB=(ASKIP) 00087
|
|
SPACE 00088
|
|
DFHMDF POS=(22,04),LENGTH=15,ATTRB=(ASKIP), *00089
|
|
INITIAL='SELECT LINE NO:' 00090
|
|
SPACE 00091
|
|
F142220 DFHMDF POS=(22,20),LENGTH=02,ATTRB=(ASKIP) 00092
|
|
SPACE 00093
|
|
DFHMDF POS=(22,23),LENGTH=01,ATTRB=(ASKIP) 00094
|
|
SPACE 00095
|
|
F142313 DFHMDF POS=(23,13),LENGTH=08,ATTRB=(ASKIP) 00096
|
|
SPACE 00097
|
|
F142324 DFHMDF POS=(23,24),LENGTH=07,ATTRB=(ASKIP) 00098
|
|
SPACE 00099
|
|
F142334 DFHMDF POS=(23,34),LENGTH=07,ATTRB=(ASKIP) 00100
|
|
SPACE 00101
|
|
F142344 DFHMDF POS=(23,44),LENGTH=07,ATTRB=(ASKIP) 00102
|
|
SPACE 00103
|
|
F142401 DFHMDF POS=(24,01),LENGTH=08,ATTRB=(ASKIP) 00104
|
|
SPACE 00105
|
|
F142410 DFHMDF POS=(24,10),LENGTH=58,ATTRB=(ASKIP) 00106
|
|
SPACE 00107
|
|
DFHMDF POS=(24,69),LENGTH=06,ATTRB=(ASKIP), *00108
|
|
INITIAL='GO TO:' 00109
|
|
SPACE 00110
|
|
F142476 DFHMDF POS=(24,76),LENGTH=02,ATTRB=(ASKIP) 00111
|
|
SPACE 00112
|
|
DFHMDF POS=(24,79),LENGTH=01,ATTRB=(ASKIP) 00113
|