Ì € i 2
main
[mnemonic]
&(G)GKD[gkd]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mnemonic 10 FREE L gkd
active 1 YN L &(G)GKD[gkd]|0
hospital.code 10 FREE L &(G)GKD[gkd]HHC|0
name 30 FREE L &(G)GKD[gkd]|1
ub82.code 1 FREE L &(G)GKD[gkd]|2
Ì € i 2
abs.tape.codes
[mnemonic, abs.tape.svc]
&(G)GKD[gkd]A[gsc]
Field Name Len Dat Typ J DPM Offset/Local/VAL
abs.tape.svc 10 FREE L MIS.ABS.TAPE gsc
abs.tape.code 1 FREE L &(G)GKD[gkd]A[gsc]|0
Ì € i 2
customer.defined.queries
[mnemonic, cd.query]
&(G)GKD[gkd]CD[ggv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cd.query 10 FREE L MIS.QUERY ggv
cd.response 75 QRY.RESP L &(G)GKD[gkd]CD[ggv]|0
Index Files Subscripts/Physical Base
hospital.code.x [hospital.code] = mnemonic
&(G)GKDHX[gkdhx]
ub.code.x [ub82.code,mnemonic] = active
&(G)GKDU[gkdU,gkd]
|
|
| |