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: PSIVAOR

Package: Inpatient Medications

Routine: PSIVAOR


Information

PSIVAOR ;BIR/PR-BUILD ACT/DC ORDER RPT BY WD/DRUG ;24 JAN 94 / 11:18 AM

Source Information

Source file <PSIVAOR.m>

Entry Points

Name Comments DBIA/ICR reference
SW ;
WARD ;Select ward
DRUG ;Select drug
QUEUE ;Ask to queue report
ENQ1 ;Entry from first queue or fall through
AIV ;Active orders
ADC ;Discontinued orders
Q2 ;Do second queue
1 ;1 w 1 d
2 ;1 w all d
3 ;All w all d
4 ;1 d all w
B ;;Build TMP
ENQ2 ;Entry second queue
H ;
K ;

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Formatting: !!
  • Prompt: "Select Ward (or enter ^ALL or ^OUTPATIENT): "
  • Variable: X
  • Timeout: DTIME
  • Line Location: WARD+1
Function Call: WRITE
  • Prompt: $P("^ALL",X,2)
  • Line Location: WARD+1
Function Call: WRITE
  • Prompt: $P("^OUTPATIENT",X,2)
  • Line Location: WARD+2
Function Call: READ
  • Formatting: !
  • Prompt: "Select DRUG (or enter ^ALL): "
  • Variable: X
  • Timeout: DTIME
  • Line Location: DRUG+1
Function Call: WRITE
  • Prompt: $P(Y,X,2)
  • Line Location: DRUG+2
Function Call: WRITE
  • Prompt: !,"No Device selected or report run."
  • Line Location: QUEUE+1
Function Call: WRITE
  • Prompt: !,"No data"
  • Line Location: ENQ2+2
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: H+1
Function Call: WRITE
  • Prompt: TYPE,"Order Report by Ward/Drug For: ",I11,!,USER
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !,"Date range: ",RANGE
  • Condition for execution: XREF="ADC"
  • Line Location: H+1
Function Call: WRITE
  • Prompt: ?70,"PAGE: ",PG,!!,"IV ROOM/WARD/NAME/ORDER",?35,"STOP DATE",?60,"PROVIDER",!
  • Line Location: H+1
Function Call: WRITE
  • Prompt: ?70,"PAGE: ",PG,!!,"IV ROOM/WARD/NAME/ORDER",?35,"STOP DATE",?60,"PROVIDER",!
  • Line Location: H+1
Info |  Source |  Entry Points |  Interaction Calls