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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: PSIVORH

Package: Inpatient Medications

Routine: PSIVORH


Information

PSIVORH ;BIR/MLM-MAIN DRIVER FOR IV HYPERALS - OE/RR INTERFACE ;09 FEB 93 / 10:02 AM

Source Information

Source file <PSIVORH.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Inpatient Medications 5 (5,7,9)^PSIVORA  DONE^PSIVORA1  ENCPP^PSIVOREN  (ENDT,ONCALL)^PSIVORV1  $$GTPCI^PSIVUTL  
VA Fileman 1 ^DIR  

Entry Points

Name Comments DBIA/ICR reference
10 ; Verify
EN ; Entry point called by IV Hyperal protocol.
1 ; Edit an existing order.
EN1 ; Take action on existing order.
3 ; Flag
2 ; Renew
5 ; Event
4 ; Hold
7 ; Purge
6 ; Cancel - Delete pending or unreleased orders from Nonverified orders
; (53.1) and Orders (100) files.
9 ; release order (status=incomplete in 53.1, pending in 100)
NEW ; Enter a new IV Hyperal order.
8 ; Print

External References

Name Field # of Occurrence
^DIR 8+1
5^PSIVORA 5+1
7^PSIVORA 7+1
9^PSIVORA 9+2
DONE^PSIVORA1 EN+3
ENCPP^PSIVOREN EN+3
ENDT^PSIVORV1 8+2
ONCALL^PSIVORV1 EN1+3
$$GTPCI^PSIVUTL EN+1, 8+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"INSUFFICIENT INFORMATION, CANNOT CONTINUE."
  • Line Location: EN1+2
Function Call: WRITE
  • Prompt: $C(7),!!,"This order is being edited by another user."
  • Line Location: EN1+4
Function Call: WRITE
  • Prompt: !!,"HYPERAL ORDER ENTRY NOT AVAILABLE",!
  • Line Location: NEW+1
Function Call: WRITE
  • Prompt: !!,"EDIT OF HYPERAL ORDERS NOT AVAILABLE",!
  • Line Location: 1+1
Function Call: WRITE
  • Prompt: !!,"RENEWAL OF HYPERAL ORDERS NOT AVAILABLE",!
  • Line Location: 2+1
Function Call: WRITE
  • Prompt: !!,"HOLD OF HYPERAL ORDERS NOT AVAILABLE",!
  • Line Location: 4+1
Function Call: WRITE
  • Prompt: $C(7),!,"This order has already been DISCONTINUED."
  • Line Location: 6+2
Function Call: WRITE
  • Prompt: !!,"CANCEL HYPERAL ORDERS NOT AVAILABLE",!
  • Line Location: 6+3
Routine Call
  • DIR
  • Line Location:
    • 8+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(55 - [#55] EN1+3

Label References

Name Line Occurrences
@( EN+2, EN1+1, EN1+5, 8+2, 9+1
EN1 EN+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFN EN+2*, EN1+3, 8+2*
DIR 8+1!
DIR(0 8+1*
>> DUOUT 8+1
>> ON 8+2*
>> ON55 8+2*
>> ORACTION EN+1, EN+2, EN1+5, 9+1
>> OREND EN1+2*, EN1+4*, 8+1*
>> ORGY EN1+1
>> ORPK EN1+2, EN1+3, EN1+4, 8+1, 8+2
>> ORSTS EN1+4, 6+2, 9+2
>> ORVP EN+2, 8+2
>> PSIVAC EN+1*, 8+2*
>> PSIVUP EN+1*, 8+2*
>> PSJIVORF EN+3
>> PSJORD EN1+4*, EN1+5
>> PSJORF EN+3
>> PSJORSTS EN1+4*
U EN1+3
>> X EN+1*, EN+2*, 9+1*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All