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 |  Marked Items  | All
Print Page as PDF
Routine: PSJLMGUD

Package: Inpatient Medications

Routine: PSJLMGUD


Information

PSJLMGUD ;BIR/MLM - INITIALIZE UNIT DOSE ORDER FIELDS FOR DISPLAY ;Nov 10, 2020@14:21:01

Source Information

Source file <PSJLMGUD.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
Inpatient Medications 8 ($$ENDD,$$ENDTC,$$ENDTC2,$$ENNPN,$$ENSTN)^PSGMI  $$ACTPRO^PSGOE1  GTST^PSGOE6  ENF^PSGOEE  (ENDRG,UPD)^PSGOEF1  ENOS^PSGS0  $$ENSET^PSGSICHK  $$OINAME^PSJLMUTL  
VA FileMan 2 %XY^%RCR  ^DIR  
Kernel 1 $$LOW^XLFSTR  
List Manager 1 EN^VALM  
Order Entry Results Reporting 1 ($$ES,ES)^ORX8  

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

Package Total Caller Graph
Inpatient Medications 11 PSGOD  PSGOEE  PSGOEF  PSGOEI  PSGOETO  PSGOEVS  PSJCLOR2  PSJCOM1  
PSJOE  PSJOE1  PSJOEA  

Entry Points

Name Comments DBIA/ICR reference
GETUD(DFN,PSGORD) ;
EN2 ;
SET ;
FINISH ;
ACCEPT ;
BYPASS ;
EDIT ;
DONE ;
31 ;;101^PSGOE8;PSGOPD;PSGPD;101;1
32 ;;109^PSGOE8;PSGODO;PSGDO;102;PSGODO]""
33 ;;3^PSGOE8;PSGOMR;PSGMR;3;1
34 ;;7^PSGOE8;PSGOST;PSGST;7;0
35 ;;26^PSGOE8;PSGOSCH;PSGSCH;26;1
36 ;;39^PSGOE81;PSGOAT;PSGAT;39;0
37 ;;1^PSGOE82;PSGOPR;PSGPR;1;1
38 ;;8^PSGOE81;PSGOSI;PSGSI;8;0
39 ;;2^PSGOE82;;;2;0
310 ;;40^PSGOE82;;;40;0
311 ;;66^PSGOE82;;;66;1
312 ;;10^PSGOE81;PSGOSD;PSGSD;10;0
313 ;;25^PSGOE81;PSGOFD;PSGFD;25;0
314 ;;5^PSGOE82;PSGOSM;PSGSM;5;0
AH ;

External References

Name Field # of Occurrence
%XY^%RCR SET+5
^DIR FINISH+7
$$ES^ORX8 EN2+16
ES^ORX8 EN2+16
$$ENDD^PSGMI EN2+12, SET+2, SET+3
$$ENDTC^PSGMI EN2+12
$$ENDTC2^PSGMI SET+2, SET+3
$$ENNPN^PSGMI EN2+18
$$ENSTN^PSGMI SET+2
$$ACTPRO^PSGOE1 EN2+14
GTST^PSGOE6 FINISH+8
ENF^PSGOEE EDIT+1
ENDRG^PSGOEF1 FINISH+6
UPD^PSGOEF1 ACCEPT+1, EDIT+1
ENOS^PSGS0 SET+9, FINISH+2
$$ENSET^PSGSICHK EN2+15
$$OINAME^PSJLMUTL EN2+8
EN^VALM FINISH+8
$$LOW^XLFSTR EN2+17

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),!!,"PLEASE NOTE: This order must have"
  • Line Location: FINISH+4
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $L(Y)+$X>78
  • Line Location: FINISH+4
Function Call: WRITE
  • Prompt: Y," "
  • Line Location: FINISH+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: FINISH+7
Function Call: WRITE
  • Prompt: !!?2,"Answer 'YES' to accept this order as a NON-VERIFIED UNIT DOSE order. Answer",!,"'NO' to edit this order now. Enter '^' to BYPASS this order, leaving it as",!,"a PENDING INPATIENT order."
  • Line Location: AH+1
Routine Call
  • DIR
  • Line Location:
    • FINISH+7
Routine Call
  • VALM
  • Line Location:
    • FINISH+8

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(51.2 - [#51.2] EN2+9
^PS(53.1 - [#53.1] EN2+3, FINISH+1*
^PS(53.45 - [#53.45] SET+5!, SET+6*, FINISH+3
^PS(55 - [#55] EN2+3
^PSDRUG - [#50] EN2+14
^VA(200 - [#200] EN2+15

Label References

Name Line Occurrences
35 FINISH+5
@( FINISH+5
DONE FINISH+5, FINISH+6, FINISH+8, ACCEPT+1, BYPASS+1

Naked Globals

Name Field # of Occurrence
^( EN2+6
^(0 EN2+3
^(14 EN2+6
^(2 EN2+6, SET+5!
^(2.1 EN2+6
^(4 EN2+6
^(5 SET+5!
^(6 EN2+6, SET+5!
^(6.5 EN2+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%X EN2+1~, SET+5*
%Y EN2+1~, SET+5*
CHK FINISH+6*, DONE+1!
CLNOR EN2+23~*, EN2+24
DA DONE+1!
DFN GETUD~, EN2+3, EN2+4
DIE DONE+1!
DIR FINISH+7!
DIR(0 FINISH+7*
DO EN2+1~, EN2+6*, EN2+8
DR DONE+1!
DRG DONE+1!
DRGI EN2+1~, EN2+14*
DT EN2+14
ESIG EN2+1~, EN2+6*, EN2+16*, EN2+17
ESIG1 EN2+16~*
>> F1 FINISH+5*
FD EN2+1~, EN2+10*, SET+1*, SET+3
FL EN2+1~, EN2+4*
FQC EN2+1~, EN2+10*
GMRAL EN2+2!
MSG FINISH+5*, FINISH+7, DONE+1!
ND EN2+1~, EN2+6*, EN2+9, EN2+10, EN2+16, EN2+18
ND2 EN2+1~, EN2+6*, EN2+10
ND2P1 EN2+1~, EN2+6*, EN2+11
NF EN2+1~, EN2+3*, EN2+4
ORETURN DONE+1!
ORIFN DONE+1!
OSGSD DONE+1!
P EN2+2!
P("APPT" EN2+25*
P("APPTO" EN2+25*
P("CLIN" EN2+24*
P("CLINO" EN2+24*
PRI EN2+1~, EN2+14*
PSG0XT DONE+1!
>> PSG14 EN2+6*, EN2+7
>> PSGCANFL BYPASS+1*, EDIT+1
PSGDRGN DONE+1!
PSGDUR EN2+11*, DONE+2!
PSGEB EN2+6*, EN2+18, DONE+1!
>> PSGEBN EN2+18*
PSGEFN DONE+1!
>> PSGIND EN2+20*
>> PSGLI EN2+10*, EN2+12
>> PSGLIN EN2+12*
>> PSGLRN EN2+7*
PSGND DONE+1!
>> PSGOAT EN2+10*
>> PSGODO EN2+8*
PSGOEE FINISH+5*, DONE+1!
PSGOEEF FINISH+5*, DONE+1!
PSGOEEF( FINISH+5*
PSGOEEG DONE+1!
PSGOEEND EDIT+1!, DONE+1!
>> PSGOEEWF EN2+4*, EN2+6, EN2+7, EN2+20, EN2+23, SET+5
PSGOEF DONE+1!
PSGOEFF FINISH+3*, FINISH+4, FINISH+5, FINISH+6, FINISH+8, DONE+1!
PSGOES SET+8~*, FINISH+2~*, DONE+1!
>> PSGOFD EN2+10*
>> PSGOFDN SET+2*, SET+3*
>> PSGOHSM EN2+9*
>> PSGOIND EN2+20*
>> PSGOINST EN2+6*
>> PSGOMR EN2+9*
>> PSGOMRN EN2+9*
PSGOPD EN2+8*, EN2+14, FINISH+6, EDIT+1, DONE+1!
PSGOPDN EN2+8*, EDIT+1, DONE+1!
PSGOPR EN2+9*, EN2+14, EN2+15, DONE+1!
>> PSGOPRN EN2+15*, EN2+17*
PSGORD GETUD~, EN2+3*, EN2+4, FINISH+1, FINISH+8
PSGOSCH EN2+10*, SET+8~*, SET+9, FINISH+1, FINISH+2, FINISH+3, DONE+1!
>> PSGOSD EN2+10*
>> PSGOSDN SET+2*
>> PSGOSI EN2+6*, EN2+15*
>> PSGOSM EN2+9*
>> PSGOST EN2+9*
>> PSGOSTN SET+2*
PSGPDRG EDIT+1*, DONE+1!
>> PSGPDRGN EDIT+1*
>> PSGPRIO EN2+8*
>> PSGRF EN2+11*
PSGRMV EN2+11*, DONE+2!
PSGRMVT EN2+11*, DONE+2!
>> PSGS0XT EN2+10*, SET+8, SET+9*, FINISH+1
PSGS0XTO SET+8~*, SET+9
PSGS0Y EN2+10*, FINISH+2~, DONE+1!
>> PSGSCH SET+7, SET+8*, SET+9*
>> PSGST FINISH+8
>> PSGSTAT EN2+19*
PSJCLAPP EN2+22!, EN2+24*, EN2+25
>> PSJCMO EN2+24*
PSJNSS SET+7!
>> PSJPRI EN2+8*
>> PSJSYSP SET+5, SET+6, FINISH+3
>> Q FINISH+4*
Q1 DONE+1!
Q2 DONE+1!
SD EN2+1~, EN2+10*, SET+1*, SET+2
SIG EN2+1~, EN2+6*
ST EN2+1~, EN2+9*, SET+1*, SET+2
STD EN2+1~
>> STT EN2+9*, EN2+18*, EN2+19, SET+1
U EN2+6, EN2+8, EN2+10, EN2+11, EN2+12, EN2+16, EN2+18
X EN2+1~, EN2+8*, EN2+19*, SET+4*, SET+8*, SET+9, FINISH+2*, FINISH+3*, FINISH+4
XQORM FINISH+8~
Y EN2+1~, EN2+4*, SET+8~, FINISH+4*, FINISH+5*

Marked Items

Name Field # of Occurrence
$T(35 FINISH+5
$T(ES^ORX8 EN2+16
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All