Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: PSGRET

Package: Inpatient Medications

Routine: PSGRET


Information

PSGRET ;BIR/CML3-ENTER RETURNS ;17 SEP 97 / 1:41 PM

Source Information

Source file <PSGRET.m>

Entry Points

Name Comments DBIA/ICR reference
GP ;
DONE ;
R ;
H ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),!,"(Patient has NO active or old orders.)"
  • Line Location: GP+1
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: GP+3
Function Call: WRITE
  • Prompt: !!,"Select ORDER",$E("S",PSGON>1)," 1-",PSGON,": "
  • Line Location: GP+3
Function Call: WRITE
  • Prompt: X="^"
  • Condition for execution: '$T $C(7) S:'$T
  • Line Location: GP+3
Function Call: READ
  • Variable: G
  • Timeout: Y
  • Line Location: GP+4
Function Call: WRITE
  • Prompt: !!,"----------------------------------------",!,DRG,!,"Give: ",DO," ",MR," ",SCH
  • Line Location: R+2
Function Call: WRITE
  • Prompt: !
  • Line Location: R+9
Info |  Source |  Entry Points |  Interaction Calls