Ì € 2
main
[mnemonic]
&(HX)HXH[hxh]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mnemonic 10 FREE L hxh
active 1 YN L &(HX)HXH[hxh]|0
last.update 10 FREE L &(HX)HXH[hxh]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 &(HX)HXH[hxh]UPD|1
source 1 CHOICE L &(HX)HXH[hxh]|2
source.desc 8 FREE L VAL=IF{@source^SS="S" "STANDARD";SS="M" "MEDITECH"}
title 40 FREE L &(HX)HXH[hxh]|1
Ì € 2
process.screens
[mnemonic, process.scrn]
&(HX)HXH[hxh]S[rxhS]
Field Name Len Dat Typ J DPM Offset/Local/VAL
process.scrn 6 CHOICE L rxhS
|
|