Ì 2
main
[mnemonic]
&(HO)HOED[hed]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mnemonic 10 FREE L hed
active 1 YN L &(HO)HOED[hed]|0
fax.yn 1 YN L &(HO)HOED[hed]|5
generic 10 FREE L EAR.GENERIC &(HO)HOED[hed]|2
keyword 25 FREE L
name 30 FREE L &(HO)HOED[hed]|1
number 12 FREE L &(HO)HOED[hed]|4
schedule 10 FREE L &(HO)HOED[hed]|6
text.editor 0 FREE L VAL=%Z.text.create(^@Root(@t.instructions[mnemonic]),{
VAL=21,0,4,78})^/TH,%Z.text.disp(/TH),%Z.text.close.up
VAL=(/TH),""^/TH
text.editor2 0 FREE L VAL=%Z.text.create(^@Root(@t.dft.dosages[dft.seq.no]),
VAL={0,0,5,80})^/TH,%Z.text.disp(/TH),%Z.text.close.up
VAL=(/TH),""^/TH
type 8 FREE L PBR.PHA.CAT &(HO)HOED[hed]|3
Ì € 2
dft.dosages
[mnemonic, dft.seq.no]
&(HO)HOED[hed]D[hedD]
Field Name Len Dat Typ J DPM Offset/Local/VAL
dft.seq.no 3 PINT R hedD
dft.disp.days 3 PINT R &(HO)HOED[hed]D[hedD]|9
dft.disp.form 10 FREE L EAR.MED.FORM &(HO)HOED[hed]D[hedD]|3
dft.dose 8 FREE L &(HO)HOED[hed]D[hedD]|0
dft.duration 4 FREE L &(HO)HOED[hed]D[hedD]|5
dft.edit.inst 1 YN L &(HO)HOED[hed]D[hedD]|10
dft.inst.exists 1 FREE L &(HO)HOED[hed]D[hedD]|11
dft.qty 5 PINT R &(HO)HOED[hed]D[hedD]|7
dft.refill 2 PINT R &(HO)HOED[hed]D[hedD]|8
dft.route 10 FREE L EAR.MED.RTE &(HO)HOED[hed]D[hedD]|6
dft.sig 8 FREE L PBR.PHA.FQY &(HO)HOED[hed]D[hedD]|4
dft.take 4 PINT R &(HO)HOED[hed]D[hedD]|2
dft.units 6 FREE L EAR.MED.UNIT &(HO)HOED[hed]D[hedD]|1
Ì € 2
instructions
[mnemonic, instr.urn]
&(HO)HOED[hed]I[hedI]
Field Name Len Dat Typ J DPM Offset/Local/VAL
instr.urn 2 PINT R hedI
instr.text 80 FREE L &(HO)HOED[hed]I[hedI]
|
|
|