Routine: FHORD3

Information

FHORD3 ; HISC/REL/NCA - Withhold Service ;8/20/96 09:09 ;

Source file <FHORD3.m>

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Place patient on NPO/HOLD-TRAY." Line Location: F0+2
Function Call: WRITE	Prompt: !!,"... done" Line Location: F0+2
Function Call: READ	Formatting: !! Prompt: "Comment: " Variable: COM Timeout: DTIME Line Location: F6+0
Function Call: WRITE	Prompt: *7," ??" Line Location: F6+0
Function Call: WRITE	Prompt: *7,!,"Enter comment of up to 80 characters!" Line Location: F6+1
Function Call: WRITE	Prompt: !!,"No WITHHOLD Orders to Cancel" Line Location: EN2+5
Function Call: READ	Formatting: !! Prompt: "Cancel Which Order #? " Variable: X Timeout: DTIME Line Location: C0+0
Function Call: WRITE	Prompt: *7," Enter # of Order to Cancel" Line Location: C0+0
Function Call: WRITE	Prompt: !!," # Effective Expires Order",! Line Location: T1+2
Function Call: WRITE	Prompt: !,$J(CT,2)," ",DTP Line Location: T1+3
Function Call: WRITE	Prompt: ?24,DTP,?47,Y Line Location: T1+4
Function Call: WRITE	Prompt: *7,!!,"Withhold entry TERMINATED - No change!" Line Location: AB+0