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

Package: Inpatient Medications

Routine: PSJOEA


Information

PSJOEA ;BIR/MLM-INPATIENT ORDER ENTRY ;12 June 2019 09:31:53

Source Information

Source file <PSJOEA.m>

Call Graph

Call Graph

Call Graph Total: 24

Package Total Call Graph
Inpatient Medications 17 $$ENACTION^PSGOE1  ENSFE^PSGOEE0  START^PSGOEF  (CRA,ENGNA)^PSGOETO  ORSET^PSGOETO1  VF^PSIVORC2  GT531^PSIVORFA  NEW55^PSIVORFB  
ENIV^PSJAC  CMPLX2^PSJCOM1  EN1^PSJHL2  EN^PSJLIFN  REQDT^PSJLIVMD  GETUD^PSJLMGUD  $$OINAME^PSJLMUTL  $$LOCK^PSJOEA  
CHK^PSJOEA1  
List Manager 2 EN^VALM  PAUSE^VALM1  
VA FileMan 2 IX^DIK  ^DIR  
Kernel 1 $$PATCH^XPDUTL  
Pharmacy Data Management 1 ($$LS,UNL)^PSSLOCK  
Scheduling 1 $$SDIMO^SDAMA203  

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

Package Total Caller Graph
Inpatient Medications 7 PSGOEC  PSGOECS  PSGVBW0  PSIVOPT  PSJOE  PSJOEA  PSJOEA2  

Entry Points

Name Comments DBIA/ICR reference
LOCK(DFN,PSJORD) ; Check if the order is locked
SELECT ;
DISACTIO(DFN,PSJORD,PSJPNV)
ACTLOG(PSGORDP,DFN,PSGORD)
UD ;
IV ;
DONE ; Clean up

External References

Name Field # of Occurrence
IX^DIK IV+6
^DIR DISACTIO+13
$$ENACTION^PSGOE1 DISACTIO+14, DISACTIO+33
ENSFE^PSGOEE0 DISACTIO+29, DISACTIO+33
START^PSGOEF DISACTIO+29
CRA^PSGOETO UD+5
ENGNA^PSGOETO UD+1
ORSET^PSGOETO1 DISACTIO+35
VF^PSIVORC2 DISACTIO+19
GT531^PSIVORFA DISACTIO+19
NEW55^PSIVORFB IV+2
ENIV^PSJAC DISACTIO+7
CMPLX2^PSJCOM1 UD+8
EN1^PSJHL2 UD+2, IV+5
EN^PSJLIFN DISACTIO+31
REQDT^PSJLIVMD DISACTIO+27
GETUD^PSJLMGUD DISACTIO+8, DISACTIO+33
$$OINAME^PSJLMUTL DISACTIO+10
$$LOCK^PSJOEA SELECT+2
CHK^PSJOEA1 SELECT+7
$$LS^PSSLOCK LOCK+2
UNL^PSSLOCK SELECT+11, SELECT+15
$$SDIMO^SDAMA203 DISACTIO+24
EN^VALM DISACTIO+33
PAUSE^VALM1 DISACTIO+25, DISACTIO+28
$$PATCH^XPDUTL DISACTIO+24

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"This order is being edited by another terminal.",!
  • Line Location: DISACTIO+13
Function Call: WRITE
  • Prompt: !!,"Invalid schedule, can't finish this order"
  • Line Location: DISACTIO+28
Routine Call
  • DIR
  • Line Location:
    • DISACTIO+13
Routine Call
  • VALM
  • Line Location:
    • DISACTIO+33

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] DISACTIO+25
^PS(53.1 - [#53.1] LOCK+2, SELECT+3, SELECT+9, SELECT+10, DISACTIO+12, DISACTIO+15, DISACTIO+16, DISACTIO+22, DISACTIO+35, ACTLOG+4
, ACTLOG+5, UD+2*, UD+7!, IV+1, IV+5*, IV+7!
^PS(55 - [#55] ACTLOG+6, ACTLOG+7*, UD+2*, UD+4, UD+5, UD+6, IV+5*
^TMP("PSJCOM" SELECT+7, UD+1*, UD+2, IV+3*, IV+4*, IV+5
^TMP("PSJCOM2" UD+1*, UD+2, IV+3*, IV+4*, IV+5
^TMP("PSJCVFY" SELECT+13, SELECT+14, SELECT+15!
^TMP("PSJINTER" DISACTIO+30!

Label References

Name Line Occurrences
@( DISACTIO+29
DISACTIO SELECT+5
DONE SELECT+16

Naked Globals

Name Field # of Occurrence
^( ACTLOG+6
^(0 ACTLOG+6*, UD+1*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA UD+1~, UD+2, IV+6!*
DA(1 IV+6*
DFN LOCK~, LOCK+2, SELECT+8, DISACTIO~, DISACTIO+7, DISACTIO+8, DISACTIO+15, DISACTIO+24, DISACTIO+31, ACTLOG~
, ACTLOG+6, ACTLOG+7, IV+5, IV+6
DIE UD+1~
DIK IV+6!*
DIR DISACTIO+13!
DIR(0 DISACTIO+13*
DR UD+1~
ND2 UD+3~, UD+5*
ND2P1 UD+3~, UD+6*
O SELECT+1~, SELECT+5*
>> ON SELECT+4*, SELECT+5
ON55 DISACTIO+4~, IV+1!*, IV+2, IV+3, IV+4, IV+5, IV+6
>> P("NAT" IV+5*
>> P("PON" DISACTIO+18*
>> PSGACT DISACTIO+14*, DISACTIO+33*
PSGAL531 ACTLOG+3~, ACTLOG+5*, ACTLOG+7
PSGCOMP SELECT+6!
PSGFDX DISACTIO+4~
PSGFLG SELECT+6!
PSGNEFD UD+3~, UD+5*
PSGNESD UD+3~, UD+5*
>> PSGOEAV DISACTIO+9*, DISACTIO+35
>> PSGOEEF DISACTIO+33*
PSGOENG DISACTIO+11!, DISACTIO+12*, DISACTIO+13*
>> PSGOES DISACTIO+35
PSGORD SELECT+4*, DISACTIO+29*, DISACTIO+35, ACTLOG~, ACTLOG+6, ACTLOG+7
PSGORDP ACTLOG~, ACTLOG+4, ACTLOG+5
PSGP SELECT+2, SELECT+5, SELECT+8*, SELECT+11, SELECT+15, DISACTIO+4~, DISACTIO+7*, DISACTIO+14, DISACTIO+15, DISACTIO+19
, DISACTIO+25, DISACTIO+29, DISACTIO+31, DISACTIO+33, UD+2, UD+4, UD+5, UD+6, UD+8, IV+5
PSGPD DISACTIO+10*, DONE+1!
PSGPDN DISACTIO+10*, DONE+1!
PSGPDRG UD+3~, UD+4*
>> PSGPRF DISACTIO+11
>> PSGPXN UD+8
PSGRFD DISACTIO+26~
PSGRFDN DISACTIO+26~
>> PSGRMVT UD+6*
PSGRSD DISACTIO+26~
PSGRSDN DISACTIO+26~
PSGSCH DISACTIO+28, DONE+1!
PSGSDX DISACTIO+4~
PSGST UD+3~, UD+4*
PSGX ACTLOG+3~, ACTLOG+4*, ACTLOG+5
PSGXDA ACTLOG+3~, ACTLOG+6*, ACTLOG+7
PSIVACT IV+6*, DONE+1!
PSIVFLG DISACTIO+18*, DISACTIO+32!
PSJAPPT DISACTIO+4~, DISACTIO+22*
PSJCLIN SELECT+1~, DISACTIO+6, DISACTIO+22*, DISACTIO+23, DISACTIO+24, DISACTIO+25*
PSJCMPDA UD+1~*, UD+2, UD+4, UD+5, UD+6, UD+8
>> PSJCOI DISACTIO+10
PSJIDX SELECT+14~*, SELECT+15!
PSJIVFLG DISACTIO+4~, DISACTIO+16, DISACTIO+25*, DISACTIO+31*
PSJLM DISACTIO+29~*
PSJLYN DISACTIO+31*!
PSJMAI DISACTIO+31!
PSJNOO UD+2*, DONE+1!
PSJO LOCK+2~*, SELECT+3~*, SELECT+4, SELECT+5, SELECT+9~*, SELECT+10, SELECT+11, SELECT+13~*, SELECT+14, SELECT+15
, UD+1, UD+2, UD+7, IV+1, IV+3, IV+4, IV+5, IV+7
PSJORD LOCK~, LOCK+2, SELECT+2, SELECT+3, SELECT+9, DISACTIO~, DISACTIO+5, DISACTIO+8, DISACTIO+12, DISACTIO+14
, DISACTIO+15, DISACTIO+16, DISACTIO+18, DISACTIO+19, DISACTIO+22, DISACTIO+27, DISACTIO+29, DISACTIO+31, DISACTIO+33, UD+7
, UD+8, IV+7
PSJOVR DISACTIO+30!
>> PSJPDD DISACTIO+23
PSJPNV SELECT+5, DISACTIO~
PSJPREX UD+7!, UD+8*
>> PSJSYSP0 DISACTIO+9
>> PSJSYSU DISACTIO+9
>> PSJTUD DISACTIO+10, DISACTIO+21, DISACTIO+29
PSJXX1 DISACTIO+4~, DISACTIO+15*, DISACTIO+16*, DISACTIO+17, DISACTIO+20, DISACTIO+21*, DISACTIO+23, DISACTIO+28, DISACTIO+29, DISACTIO+31
Q LOCK+1~*, LOCK+2*, LOCK+3, ACTLOG+3~, ACTLOG+6*
QQ ACTLOG+3~, ACTLOG+6*
U DISACTIO+15, DISACTIO+16, DISACTIO+17, DISACTIO+20, DISACTIO+21, DISACTIO+23, DISACTIO+25, DISACTIO+28, DISACTIO+29, DISACTIO+31
, ACTLOG+6, UD+2, IV+4, IV+5
VAIP DISACTIO+22~
>> Y SELECT+2, DISACTIO+16
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All