Ì 2
MIS clinic loc type dict (zcus.main)
[zcus.loc.type]
\ZCUSLTZCUS[zloct]
Field Name Len Dat Typ J DPM Offset/Local/VAL
zcus.loc.type 10 FREE L zloct
zcus.last.update 10 PINT R \ZCUSLTZCUS[zloct]UPD
zcus.loc.type.active 1 YN L \ZCUSLTZCUS[zloct]|0
zcus.loc.type.name 30 FREE L \ZCUSLTZCUS[zloct]|1
Ì € 2
abs.tape.codes (zcus.abs.abs.tape.codes)
[zcus.loc.type, zcus.abs.tape.svc]
\ZCUSLTZCUS[zloct]ZCUSA[gsc]
Field Name Len Dat Typ J DPM Offset/Local/VAL
zcus.abs.tape.svc 10 FREE L MIS.ABS.TAPE gsc
zcus.abs.tape.code 8 FREE L \ZCUSLTZCUS[zloct]ZCUSA[gsc]|0
|
|