Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PSIVAOR1

Package: Inpatient Medications

Routine: PSIVAOR1


Information

PSIVAOR1 ;BIR/PR-PRINT ACT/DC ORDER RPT BY WD/DRG ;16 DEC 97 / 1:39 PM

Source Information

Source file <PSIVAOR1.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
Inpatient Medications 1 H^PSIVAOR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Inpatient Medications 1 PSIVAOR  

Entry Points

Name Comments DBIA/ICR reference
P1 ;Print IV room
P2 ;Print out ward
P3 ;Print out patient
P4 ;Print order number
P40 ;Print ONCALL or HOLD
P5 ;Print out order contents
F

External References

Name Field # of Occurrence
H^PSIVAOR F

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"IV ROOM: ",$S($D(^PS(59.5,IV,0)):$P(^(0),U),1:"Broken pointer??")
  • Line Location: P1+1
Function Call: WRITE
  • Prompt: !!?1,"WARD: ",WD
  • Line Location: P2+1
Function Call: WRITE
  • Prompt: !!,?4,$P(PAT,U)," ",$P(PAT,U,3)," ",$P(PAT,U,4)
  • Line Location: P3+1
Function Call: WRITE
  • Prompt: !!?7,"[",+ON,"] ",$P(ON,U,2)
  • Line Location: P4+1
Function Call: WRITE
  • Prompt: ?35,Y,?60,$E(P6,1,20)
  • Line Location: P4+1
Function Call: WRITE
  • Prompt: $S($P(G,U,17)="H":" (*ON HOLD*)",1:" (*ON CALL*)")
  • Line Location: P40+1
Function Call: WRITE
  • Prompt: !,?9,$P(^PS(52.6,+NA,0),U)," ",$P(NA,U,2)
  • Line Location: P5+1
Function Call: WRITE
  • Prompt: !?9,$P(^PS(52.7,+NA,0),U)," ",$P(NA,U,2)
  • Line Location: P5+2
Function Call: WRITE
  • Prompt: !?9,$P(^(0),U,9)," ",$P(^(0),U,11)
  • Line Location: P5+3
Function Call: WRITE
  • Prompt: !?9,"Cumulative doses: ",$S($D(^PS(55,DFN,"IV",+ON,9)):+$P(^(9),U,3),1:0)
  • Line Location: P5+4
Function Call: WRITE
  • Prompt: !?9,"Last DC'd on: ",Y
  • Line Location: P5+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" P4+1, P5+5
^PS(52.6 - [#52.6] P5+1
^PS(52.7 - [#52.7] P5+2
^PS(55 - [#55] P4+1, P5+1, P5+2, P5+3, P5+4, P5+5
^PS(59.5 - [#59.5] P1+1
^TMP("PSJ" P1+1, P2+1, P3+1, P4+1
^VA(200 - [#200] P4+1

Label References

Name Line Occurrences
F P1+1, P2+1, P3+1, P4+1, P5+1, P5+2, P5+3, P5+4, P5+5
P2 P1+1
P3 P2+1
P4 P3+1
P40 P4+1
P5 P4+1

Naked Globals

Name Field # of Occurrence
^( P5+1, P5+2
^("ADC" P5+5
^(0 P1+1, P4+1, P5+1, P5+2, P5+3
^(9 P5+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFN P3+1*, P4+1, P5+1, P5+2, P5+3, P5+4, P5+5
>> G P4+1*, P40+1
IOSL F
>> IV P1+1*, P2+1, P3+1, P4+1
>> NA P5+1*, P5+2*
>> ON P3+1*, P4+1*, P5+1, P5+2, P5+3, P5+4, P5+5
>> P2 P2+1*
>> P3 P3+1*
>> P5 P5+1*, P5+2*
>> P6 P4+1*
>> PAT P3+1*, P4+1
>> Q P4+1*
U P1+1, P3+1, P4+1, P40+1, P5+1, P5+2, P5+3, P5+4
>> WD P2+1*, P3+1, P4+1
>> XREF P5+5
>> Y P4+1*, P5+5*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All