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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PSIVOPT

Package: Inpatient Medications

Routine: PSIVOPT


Information

PSIVOPT ;BIR/PR,MLM - OPTION DRIVER ; 1/4/12 7:36am

Source Information

Source file <PSIVOPT.m>

Call Graph

Call Graph

Call Graph Total: 23

Package Total Call Graph
Inpatient Medications 19 ENL^PSGVDS  CKO^PSIVCHK  (EXPIR,HOLD)^PSIVOE  ($$IVDUPADD,ENLBL)^PSIVOPT  E^PSIVOPT1  (D,R)^PSIVOPT2  LOG^PSIVORAL  SHOW1^PSIVORC  
VF^PSIVORC2  (NATURE,ORPARM)^PSIVOREN  GT531^PSIVORFA  GT55^PSIVORFB  (EN,ENNH)^PSIVORV2  WP^PSJAC  EN1^PSJHL2  EN^PSJLIFN  
EN^PSJLIORD  $$LOCK^PSJOEA  CHK^PSJOEA1  
VA FileMan 4 NOW^%DTC  ^DIC  ^DIE  ^DIK  

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

Package Total Caller Graph
Inpatient Medications 16 PSGOEC  PSGVBWP  PSIVOPT  PSIVOPT1  PSIVOPT2  PSIVORA  PSIVORC2  PSIVORE  
PSIVUWL  PSJADT0  PSJCLOR4  PSJCOMR  PSJLIACT  PSJOE  PSJOE0  PSJPR  

Entry Points

Name Comments DBIA/ICR reference
UNLOCK ; Unlock order.
K ; Kill variables. *271
ACT ; Prompt for order action.
CK ; Check if drugs are still valid.
D ; Discontinue order.
O(DFN,ON,STAT,STOP) ; On/Off Call
E ; Entry for Pharmacy edit
R ; Renew order.
H(DFN,ON,STAT,STOP)
S ; View order.
EXPIR ; Update status of expired orders.
UPSTAT ; Update orders status.
ENIN ; Entry for inpatient order entry/profile options.
ENARI(DFN,ON,PSGUOW,PSIVAL) ; Auto-reinstate IV orders if movement is deleted.
ENINP(DFN,ON) ; Entry from Inpatient Profile.
ENLBL(PSGTOL,PSGUOW,PSGP,PSGTOO,DA,RES) ;
IVDUPADD(PSGP,ORDERNUM) ;
VA200(X) ;Return the IEN for the user.
; X = User name

External References

Name Field # of Occurrence
NOW^%DTC O+1, H+1, ENLBL+5, IVDUPADD+8
^DIC VA200+2
^DIE UPSTAT+1, ENARI+18
^DIK ENARI+26
ENL^PSGVDS ENLBL+5
CKO^PSIVCHK O+4, H+5
EXPIR^PSIVOE EXPIR+2
HOLD^PSIVOE H+5
$$IVDUPADD^PSIVOPT ENARI+11
ENLBL^PSIVOPT H+5, ENARI+27
E^PSIVOPT1 E+1
D^PSIVOPT2 D+1
R^PSIVOPT2 R+3
LOG^PSIVORAL O+4, H+5, ENARI+20
SHOW1^PSIVORC ENIN+1
VF^PSIVORC2 ACT+4, ACT+6
NATURE^PSIVOREN H+3
ORPARM^PSIVOREN ENARI+22
GT531^PSIVORFA ACT+4, ACT+6
GT55^PSIVORFB ENIN+2
EN^PSIVORV2 S+1, ENIN+2
ENNH^PSIVORV2 ENINP+1
WP^PSJAC ENLBL+2
EN1^PSJHL2 ENARI+23
EN^PSJLIFN ACT+7, ACT+9
EN^PSJLIORD ACT+3
$$LOCK^PSJOEA ACT+5
CHK^PSJOEA1 ACT+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$C(7),$C(7),"This order is being edited by another user. Try later."
  • Line Location: PSIVOPT+11
Function Call: WRITE
  • Prompt: !,$C(7),$C(7),"This order is being edited by another user. Try later."
  • Line Location: PSIVOPT+12
Function Call: WRITE
  • Prompt: !,$C(7),"Only active orders may be placed on hold."
  • Line Location: O+2
Function Call: WRITE
  • Prompt: !,$C(7),"Only active orders may be placed on hold."
  • Line Location: H+2
Function Call: WRITE
  • Prompt: !!,"Order unchanged."
  • Line Location: H+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: S+1
Function Call: WRITE
  • Prompt: $C(7)," This order has expired."
  • Line Location: EXPIR+2
Routine Call
  • DIC
  • Line Location:
    • VA200+2
Routine Call
  • DIE
  • Line Location:
    • UPSTAT+1
    • ENARI+18

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] ENLBL+2
^PS( CK+2
^PS(53.1 - [#53.1] ACT+2, ACT+4, ACT+5, ACT+6, ACT+7
^PS(53.3 - [#53.3] ENARI+20
^PS(53.41 - [#53.41] ENARI+26
^PS(55 - [#55] PSIVOPT+10, UNLOCK+3, ACT+2, ENIN+3, ENARI+4, ENARI+5, ENARI+6, ENARI+8, ENARI+13!, ENARI+15
, ENARI+17, ENARI+22, ENLBL+4, ENLBL+5*, IVDUPADD+5, IVDUPADD+7, IVDUPADD+11, IVDUPADD+14, IVDUPADD+16, IVDUPADD+18
, IVDUPADD+20
^PSDRUG - [#50] CK+2
^TMP("PSJNOTUNDC" ENARI+11*
^TMP("PSJUNDC" ENARI+19*

Label References

Name Line Occurrences
$$VA200 ENARI+9
@( PSIVOPT+14, S+1, ENINP+1
ACT PSIVOPT+15
EXPIR O+1, H+1
K PSIVOPT+11, PSIVOPT+14
PSIVOPT ENIN+2
UPSTAT O+4, H+5, EXPIR+2

Naked Globals

Name Field # of Occurrence
^("I" CK+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% K+1!, O+1, H+1, ENLBL+5, IVDUPADD+9
CHKIT ENARI+17~*
DA K+1!, UPSTAT+1~*, ENARI+12~, ENARI+16*, ENARI+26!*, ENARI+27!, ENLBL~, ENLBL+4, ENLBL+5
DA(1 UPSTAT+1*, ENARI+16*, ENARI+26*
DA(2 ENARI+26*
DA(3 ENARI+26*
DA(4 ENARI+26*
>> DATELOOP IVDUPADD+9*, IVDUPADD+11*, IVDUPADD+14
DFN PSIVOPT+10, UNLOCK+3, ACT+2, ACT+3, ACT+4, ACT+5, ACT+6, O~, H~, H+5
, S+1, UPSTAT+1, ENIN+1~*, ENIN+2*, ENIN+3, ENARI~, ENARI+13, ENARI+15, ENARI+16, ENARI+17
, ENARI+19, ENARI+22, ENARI+23, ENARI+26, ENARI+27, ENINP~, ENINP+1, ENLBL+5
DIC VA200+2~*
DIC(0 VA200+2*
DIE K+1!, UPSTAT+1~*, ENARI+12~, ENARI+16*
DIK K+1!, ENARI+12~, ENARI+26!*
DLAYGO K+1!
DNE K+1!
>> DONE PSIVOPT+15*, ACT+4*, ACT+10*
DR K+1!, UPSTAT+1~*, ENARI+12~, ENARI+15*, ENARI+17*
DRG K+1!, CK+2*
DRG( CK+1, CK+2
DRGI K+1!, CK+1*, CK+2
DRGT K+1!, CK+1*, CK+2
DT CK+2
>> DUPFOUND IVDUPADD+3*, IVDUPADD+5, IVDUPADD+11, IVDUPADD+14, IVDUPADD+18, IVDUPADD+23*, IVDUPADD+24
>> DUPLOOP IVDUPADD+2*, IVDUPADD+5*, IVDUPADD+7
DUZ H+5
ENTBY ENARI+8~, ENARI+9*
ERR K+1!, CK+2*
>> EXISTADD IVDUPADD+17*, IVDUPADD+18*, IVDUPADD+20
>> EXISTORD IVDUPADD+12*, IVDUPADD+14*, IVDUPADD+16, IVDUPADD+18, IVDUPADD+20
>> FIL CK+1*, CK+2
HELP K+1!
IOF S+1
J K+1!
>> MATCHADD IVDUPADD+20*, IVDUPADD+22
OD K+1!
ON PSIVOPT+10, UNLOCK+3, ACT+1*, ACT+2, ACT+3, ACT+4, ACT+5~*, ACT+6, ACT+7, ACT+9
, O~, H~, ENIN+1~*, ENIN+2*, ENARI~, ENARI+8, ENARI+13, ENARI+15, ENARI+16, ENARI+17
, ENARI+19, ENARI+20, ENARI+22, ENARI+26, ENARI+27, ENINP~, ENINP+1
ON55 PSIVOPT+10, UNLOCK+3, ACT+1, H+5, S+1, UPSTAT+1, ENIN+2*, ENARI+20*, ENARI+23, ENINP+1~
>> OR55 ENARI+2
ORDERNUM IVDUPADD~, IVDUPADD+5, IVDUPADD+7
P K+1!, ENIN+1~, ENLBL+3~
P("NAT" H+3
P("PON" ENIN+1*, ENIN+2*
P(12 ENARI+22*
P(17 O+3*, H+4*, EXPIR+1*, UPSTAT+1, ENARI+20*
P(3 ENARI+22*
P16 K+1!
>> PSGALO ENARI+11, ENARI+25
>> PSGDT ENLBL+5*
PSGFDX ACT+1~
>> PSGORD ENARI+2
>> PSGORNUM ENARI+2*, ENARI+3, ENARI+4, ENARI+5, ENARI+6, ENARI+11
PSGP ENIN+1, ENIN+2, ENARI+4, ENARI+5, ENARI+6, ENARI+8, ENARI+11, ENARI+26, ENLBL~, ENLBL+2
, ENLBL+4, IVDUPADD~, IVDUPADD+5, IVDUPADD+7, IVDUPADD+11, IVDUPADD+14, IVDUPADD+16, IVDUPADD+18, IVDUPADD+20
PSGSDX ACT+1~
PSGTOL ENARI+24*, ENARI+27, ENLBL~
PSGTOO ENLBL~
PSGUOW ENARI~, ENARI+26, ENARI+27, ENLBL~
PSIVAC PSIVOPT+13*, PSIVOPT+14, ENIN+1~*, ENINP+1~*
PSIVACT UPSTAT+1~*, ENARI+15*
PSIVAL K+1!, ENARI~, ENARI+20*
PSIVALCK ENARI+12~, ENARI+20*
PSIVALT O+3*, H+4*, ENARI+12~, ENARI+20*
PSIVC K+1!
PSIVLOCK PSIVOPT+8~*, PSIVOPT+10*, PSIVOPT+11
PSIVLOG K+1!
PSIVNOL K+1!
PSIVOK K+1!
PSIVOPT K+1!, ENARI+12~, ENARI+20*
PSIVREA K+1!, O+3*, H+4*, H+5, EXPIR+1*, UPSTAT+1, ENARI+12~, ENARI+20*
PSJACNWP ENLBL+2~
PSJACPF ENLBL+2~*
PSJCOM ACT+2*, ACT+4, ACT+5, ACT+8, ACT+9, IVDUPADD+1~, IVDUPADD+5*, IVDUPADD+16
PSJEDFLG ACT+11!
PSJEDIT1 E+1~
PSJIVBD ACT+1!
>> PSJIVORF ENARI+22
PSJO ACT+5~*
PSJOCFG R+1~, R+2*, R+4!
PSJORD ACT+1*, ACT+5~*, ACT+8~*, ENIN+1, ENIN+2, ENIN+3, ENARI+2
>> PSJPRF ENIN+2
>> PSJSENTO( ENARI+4*, ENARI+5*, ENARI+6*, ENARI+9*
>> PSJSYSL ENLBL+2
>> PSJSYSW0 ENARI+25, ENLBL+2, ENLBL+4
>> PSJUNDC ENARI+20, ENARI+24, ENARI+25
PSJX ENARI+8~*, ENARI+9
RES ENLBL~, ENLBL+5
SCRNPRO K+1!
STAT O~, O+1, O+2, O+3*, O+4, H~, H+1, H+2, H+4*, H+5
, EXPIR+1, EXPIR+2*
STOP O~, O+1, H~, H+1
>> TARGET IVDUPADD+7*, IVDUPADD+22
TEX PSIVOPT+14*, K+1!, O+3, H+4
U ACT+4, ACT+6, ACT+7, CK+2, ENARI+4, ENARI+5, ENARI+6, ENARI+9, ENARI+15, ENARI+17
, ENARI+20, ENARI+22, ENARI+25, ENLBL+4, ENLBL+5, VA200+4
>> UWLFLAG PSIVOPT+14
X CK+2*, ENARI+12~, ENARI+13*, ENLBL+3~, ENLBL+4*, ENLBL+5, VA200~
XED PSIVOPT+14*, K+1!
Y ACT+5, ENARI+12~, ENARI+22*, ENLBL+3~, ENLBL+4*, ENLBL+5*, VA200+2~, VA200+3, VA200+4
ZZND K+1!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All