Ì 2
rxm.drug.set.dictionary (main)
[mnemonic]
&HXS[hxs]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mnemonic 10 FREE L hxs
active 1 YN L &HXS[hxs]|0
description 30 FREE L &HXS[hxs]|1
last.update 10 FREE L &HXS[hxs]UPD|0
last.update.date 8 DATE L VAL=%Z.date.in.magic(@last.update)
last.update.date.time 15 FREE L VAL=%Z.date.out(@last.update.date,"",10)_"-"_@last.upd
VAL=ate.time'="-"
last.update.time 4 HHMM L VAL=%Z.time.out(@last.update)
last.update.user 10 FREE L MIS.USER &HXS[hxs]UPD|1
Ì € 2
rxm.drug.set.default.drugs (dft.drugs)
[mnemonic, dft.drug.seq]
&HXS[hxs]D[hxss]
Field Name Len Dat Typ J DPM Offset/Local/VAL
dft.drug.seq 3 PINT R hxss
dft.dosage 10 FREE L &HXS[hxs]D[hxss]|1
dft.drug 20 FREE L RXM.DRUG &HXS[hxs]D[hxss]|0
dft.order.ok 1 FREE L &HXS[hxs]D[hxss]|2
dft.order.ok.check 1 FREE L VAL=IF{@dft.order.ok @Z.check.mark;""}
dft.order.ok.yn 1 YN L VAL=IF{@dft.order.ok "Y";"N"}
|
|