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

Package: Inpatient Medications

Routine: PSIVORA1


Information

PSIVORA1 ;BIR/MLM-UTILITIES FOR IV FLUIDS - OE/RR INTERFACE (CONT) ;05 FEB 97 / 1:30 PM

Source Information

Source file <PSIVORA1.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
Inpatient Medications 10 ENGNN^PSGOETO  ENIVKV^PSGSETU  EDIT^PSIVEDT  (PS,RUPTXT)^PSIVOREN  (PUT531,UPD100)^PSIVORFA  GT55^PSIVORFB  (GTFLDS,NEWENT,SET,SETUP)^PSIVORFE  ENED^PSIVORV1  
$$GTPCI^PSIVUTL  $$DATE^PSJUTL2  

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Inpatient Medications 4 PSIVORA  PSIVOREN  PSIVORFE  PSIVORH  

Entry Points

Name Comments DBIA/ICR reference
EDIT ; Edit an existing order.
LOCKERR ; Display msg. if lock is unsuccessful.
REDIT ; Set edit string for OE/RR renew.
RENEW ;Renew order through OE/RR.
FLUIDQO ; Process IV Fluid quick order.
DONE ; Kill variables and exit

External References

Name Field # of Occurrence
ENGNN^PSGOETO EDIT+10, RENEW+4, FLUIDQO+11
ENIVKV^PSGSETU DONE+1
EDIT^PSIVEDT RENEW+4, FLUIDQO+10
PS^PSIVOREN FLUIDQO+1
RUPTXT^PSIVOREN RENEW+6
PUT531^PSIVORFA EDIT+8, EDIT+10, RENEW+4, FLUIDQO+11
UPD100^PSIVORFA EDIT+8
GT55^PSIVORFB RENEW+2
GTFLDS^PSIVORFE EDIT+7
NEWENT^PSIVORFE EDIT+3, RENEW+4, FLUIDQO+11
SET^PSIVORFE EDIT+10, RENEW+4, FLUIDQO+11
SETUP^PSIVORFE FLUIDQO+2
ENED^PSIVORV1 EDIT+7, RENEW+4, FLUIDQO+10
$$GTPCI^PSIVUTL FLUIDQO+7
$$DATE^PSJUTL2 EDIT+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),!!,"This order is being edited by another user."
  • Line Location: LOCKERR+1
Function Call: WRITE
  • Prompt: !,$C(7),"Order must be removed from HOLD before editing."
  • Line Location: EDIT+1
Function Call: WRITE
  • Prompt: !,$C(7),"Expired orders cannot be edited."
  • Line Location: EDIT+2
Function Call: WRITE
  • Prompt: !,"...updating order..."
  • Line Location: EDIT+8
Function Call: WRITE
  • Prompt: !,"...creating new order..."
  • Line Location: EDIT+10
Function Call: WRITE
  • Prompt: !,$C(7),"Only ACTIVE OR EXPIRED orders may be RENEWED."
  • Line Location: RENEW+1
Function Call: WRITE
  • Prompt: !,"...creating new order..."
  • Line Location: RENEW+4
Function Call: WRITE
  • Prompt: !!,"...transcribing this order..."
  • Line Location: FLUIDQO+11
Function Call: WRITE
  • Prompt: !
  • Line Location: FLUIDQO+11

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS( FLUIDQO+5
^PS(51.2 - [#51.2] FLUIDQO+2
^PS(53.1 - [#53.1] EDIT+12, FLUIDQO+11
^PS(55 - [#55] EDIT+11, RENEW+5*
^PS(57.1 - [#57.1] FLUIDQO+3, FLUIDQO+4, FLUIDQO+9
^VA(200 - [#200] EDIT+9, REDIT+1

Label References

Name Line Occurrences
@( EDIT+3
REDIT EDIT+6, RENEW+2

Naked Globals

Name Field # of Occurrence
^(0 EDIT+12*
^(2 EDIT+11*, RENEW+5*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AD DONE+1!
C DONE+1!
DA EDIT+10, RENEW+4, FLUIDQO+11!
DFN EDIT+3, EDIT+11, RENEW+5, RENEW+6, FLUIDQO+2*, DONE+1!
DIC FLUIDQO+11!
DO DONE+1!
DONE EDIT+7~, FLUIDQO+10
DRG FLUIDQO+1~, DONE+1!
DRG( FLUIDQO+3*, FLUIDQO+6*
DRG("SC" FLUIDQO+3*, FLUIDQO+4, FLUIDQO+5
DRG("TYP" FLUIDQO+3*, FLUIDQO+6
DRG(1 FLUIDQO+4*, FLUIDQO+5, FLUIDQO+6
DRG(2 FLUIDQO+5*, FLUIDQO+6
DRG(3 FLUIDQO+4*, FLUIDQO+6
DRG(5 FLUIDQO+5*
DRG(6 FLUIDQO+5*
DT REDIT+1
DUZ EDIT+9, REDIT+1
EDIT EDIT+5*, REDIT+1*, FLUIDQO+1~, FLUIDQO+9*, FLUIDQO+10
I DONE+1!
ND FLUIDQO+1~, FLUIDQO+4*, FLUIDQO+5*, FLUIDQO+6
NN DONE+1!
ON EDIT+3*, EDIT+10*, EDIT+11, EDIT+12, RENEW+2*, RENEW+3, RENEW+4*, RENEW+5, RENEW+6*, FLUIDQO+11!*
ON55 EDIT+3*, EDIT+7!, RENEW+3!, RENEW+6*
>> OREND LOCKERR+1*, EDIT+1*, EDIT+2*, EDIT+7*, RENEW+1*
ORETURN RENEW+6!
>> ORL FLUIDQO+10
>> ORNP FLUIDQO+1
>> ORPK EDIT+3, RENEW+2
>> ORSTS EDIT+1, EDIT+2, EDIT+4, RENEW+1, FLUIDQO+10*
>> ORVP FLUIDQO+2
P FLUIDQO+1~, DONE+1!
P( EDIT+3*, RENEW+3*
P("CLRK" EDIT+9*
P("FRES" RENEW+4*, RENEW+6*
P("LOG" EDIT+9*
P("MR" FLUIDQO+2*
P("NEWON" RENEW+6*
P("OLDON" EDIT+10*, EDIT+11, EDIT+12, RENEW+3*, RENEW+5, RENEW+6, FLUIDQO+11!
P("RES" EDIT+4*, EDIT+5, RENEW+4*, RENEW+6*
P(17 EDIT+10*, RENEW+3*
P(6 EDIT+7, REDIT+1*
P(8 FLUIDQO+9*
PSGP DONE+1!
>> PSGPCP FLUIDQO+9*
PSIVAC FLUIDQO+1~*, DONE+1!
PSIVE DONE+1!
PSIVLOG DONE+1!
PSIVOK EDIT+5*, REDIT+1*, FLUIDQO+1~, FLUIDQO+9*
PSIVREA DONE+1!
PSIVUP FLUIDQO+7*, DONE+1!
PSIVX DONE+1!
PSJACNWP DONE+1!
PSJIVORF DONE+1!
PSJORL FLUIDQO+1~, FLUIDQO+10*, DONE+1!
PSJORNP EDIT+7*, FLUIDQO+1~*, DONE+1!
PSJORPF FLUIDQO+1, DONE+1!
PSJORSTS EDIT+8, EDIT+10, DONE+1!
>> PSJQO FLUIDQO+3, FLUIDQO+4, FLUIDQO+9
PSJQOD FLUIDQO+1~, FLUIDQO+3*, FLUIDQO+4
SOL DONE+1!
SPSOL DONE+1!
U EDIT+9, EDIT+11, EDIT+12, RENEW+5, REDIT+1, FLUIDQO+2, FLUIDQO+4, FLUIDQO+5, FLUIDQO+6, FLUIDQO+9
UL80 DONE+1!
>> X EDIT+3*, RENEW+3*, REDIT+1*, FLUIDQO+9*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All