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

Package: Inpatient Medications

Routine: PSJCOM


Information

PSJCOM ;BIR/CML3-FINISH COMPLEX UNIT DOSE ORDERS ENTERED THROUGH OE/RR ;12 June 2019 09:31:53

Source Information

Source file <PSJCOM.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
Inpatient Medications 9 NEWNVAL^PSGAL5  $$ENDTC^PSGMI  ENWALL^PSGNE3  $$DDOK^PSGOE2  FILESI^PSJBCMA5  $$ISCLOZ^PSJCLOZ  (DOSECHK,SETVAR)^PSJDOSE  $$GETDUR^PSJLIVMD  
SETOC^PSJNEWOC  
VA FileMan 3 NOW^%DTC  %XY^%RCR  ^DIR  
List Manager 1 PAUSE^VALM1  
Text Integration Utility 1 MAIN^TIUEDIT  

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

Package Total Caller Graph
Inpatient Medications 4 PSGOEE  PSGOEF1  PSGOEV  PSJCOMV  

Entry Points

Name Comments DBIA/ICR reference
UPD ;
VFY ; change status, move to 55, and change label record
DONE ;
DDCHK ; dispense drug check
CONT() ;
NEWNVAL(PSGALORD,PSGALC,PSGFLD,PSGOLD)

External References

Name Field # of Occurrence
NOW^%DTC NEWNVAL+13, NEWNVAL+20
%XY^%RCR UPD+10, UPD+13
^DIR VFY+14, VFY+43, DONE+3, CONT+4
NEWNVAL^PSGAL5 UPD+20
$$ENDTC^PSGMI VFY+28, VFY+29
ENWALL^PSGNE3 UPD+16
$$DDOK^PSGOE2 DDCHK+3
FILESI^PSJBCMA5 UPD+20
$$ISCLOZ^PSJCLOZ VFY+12
DOSECHK^PSJDOSE VFY+6
SETVAR^PSJDOSE VFY+7
$$GETDUR^PSJLIVMD VFY+31
SETOC^PSJNEWOC VFY+3
MAIN^TIUEDIT DONE+5
PAUSE^VALM1 VFY+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "."
  • Line Location: UPD+9
Function Call: WRITE
  • Prompt: "."
  • Line Location: UPD+10
Function Call: WRITE
  • Prompt: "."
  • Line Location: UPD+13
Function Call: WRITE
  • Prompt: !!,PSJDOSE("WARN"),!,PSJDOSE("WARN1")
  • Line Location: VFY+7
Function Call: WRITE
  • Prompt: !,"...a few moments, please..."
  • Line Location: VFY+17
Function Call: WRITE
  • Prompt: "."
  • Line Location: VFY+22
Function Call: WRITE
  • Prompt: "."
  • Line Location: VFY+24
Function Call: WRITE
  • Prompt: "."
  • Line Location: VFY+25
Function Call: WRITE
  • Prompt: !,"ORDER VERIFIED.",!
  • Line Location: VFY+41
Function Call: WRITE
  • Prompt: !
  • Line Location: DONE+3
Function Call: WRITE
  • Prompt: $C(7),!!,"This order must have at least one valid, active dispense drug to be verified."
  • Line Location: DDCHK+5
Function Call: WRITE
  • Prompt: !
  • Line Location: CONT+2
Routine Call
  • DIR
  • Line Location:
    • VFY+14
    • VFY+43
    • DONE+3
    • CONT+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(53.1 - [#53.1] UPD+2, UPD+5, UPD+6, VFY+4
^PS(53.45 - [#53.45] UPD+20
^PS(55 - [#55] UPD+15, UPD+16
^TMP("PSJCOM" UPD+2*, UPD+4*, UPD+5*, UPD+6*, UPD+7*, UPD+8*, UPD+14, UPD+16, UPD+17*, UPD+18*
VFY+4*, VFY+13, VFY+15*, VFY+21, VFY+22*, VFY+26, VFY+40*, VFY+42*, VFY+45*, NEWNVAL+11
, NEWNVAL+17*
^TMP("PSJCOM2" VFY+20, VFY+23, VFY+24*, VFY+26, VFY+32*, VFY+40*, VFY+45*, DDCHK+1, NEWNVAL+10, NEWNVAL+18
, NEWNVAL+24*
^TMP("PSODAOC" VFY+2*

Label References

Name Line Occurrences
$$CONT VFY+7
DDCHK VFY+10
DONE VFY+10, VFY+13
NEWNVAL UPD+19, VFY+25, VFY+28, VFY+29
VFY UPD+21, UPD+22

Naked Globals

Name Field # of Occurrence
^( NEWNVAL+11, NEWNVAL+18
^(0 UPD+4*, NEWNVAL+11*, NEWNVAL+18*
^(2 UPD+4*, UPD+17*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % NEWNVAL+13, NEWNVAL+15, NEWNVAL+20, NEWNVAL+22
%X UPD+10*, UPD+13*, DONE+6!
%Y UPD+10*, UPD+13*, DONE+6!
>> ANQDATA VFY+42
CHK VFY+10, VFY+13, VFY+14*, DONE+1, DONE+2, DONE+6!, DDCHK+1*, DDCHK+3*, DDCHK+4
CLOZFLG VFY+12~*, VFY+13, VFY+42
DA DONE+6!
DIE DONE+6!
DIR VFY+14!, VFY+43!, DONE+3~, CONT+1~, CONT+2!
DIR("A" VFY+14*, DONE+3*, CONT+3*
DIR("B" DONE+3*, CONT+3*
DIR(0 VFY+14*, VFY+43*, DONE+3*, CONT+3*
DIRUT VFY+14, CONT+1~, CONT+2!
DP DONE+6!
DR DONE+6!
>> DRGF DDCHK+1*, DDCHK+2, DDCHK+3
DUR VFY+30~, VFY+31*, VFY+32
>> DURON VFY+30*, VFY+31
DURORD VFY+30~
DUZ UPD+20, VFY+39, NEWNVAL+15, NEWNVAL+22
F DONE+6!
ND DONE+6!
>> ON VFY+30
PSGAL DONE+6!
PSGAL("N" NEWNVAL+11*, NEWNVAL+17, NEWNVAL+18*, NEWNVAL+24
PSGALC NEWNVAL~, NEWNVAL+15, NEWNVAL+22
PSGALFN VFY+34!
PSGALORD NEWNVAL~, NEWNVAL+10, NEWNVAL+11, NEWNVAL+17, NEWNVAL+18, NEWNVAL+24
>> PSGAT UPD+17
>> PSGDO UPD+17
>> PSGDT UPD+16, VFY+39, NEWNVAL+13*, NEWNVAL+20*
PSGDUR UPD+18!
>> PSGFD UPD+4
PSGFLD NEWNVAL~, NEWNVAL+15, NEWNVAL+22
>> PSGHSM UPD+8
>> PSGND UPD+14*
PSGODA DONE+6!
>> PSGODDD(1 VFY+35
>> PSGOEAV UPD+19, UPD+21, UPD+22
>> PSGOEEF(109 VFY+8*
>> PSGOEEWF UPD+10, UPD+12*, UPD+13
>> PSGOHSM UPD+8
PSGOLD NEWNVAL~, NEWNVAL+14*, NEWNVAL+15, NEWNVAL+21*, NEWNVAL+22
>> PSGONF VFY+35
>> PSGORD UPD+2, UPD+4, UPD+5, UPD+6, UPD+7, UPD+8, UPD+14, UPD+16, UPD+17, UPD+18
UPD+19, UPD+20, VFY+2, VFY+3, VFY+4, VFY+12, VFY+13, VFY+15, VFY+18, VFY+19
VFY+20, VFY+21, VFY+22, VFY+23, VFY+24, VFY+25, VFY+26, VFY+28, VFY+29, VFY+30
VFY+32, VFY+36, VFY+40, VFY+42, VFY+45, DDCHK+1
>> PSGORDP VFY+19*
>> PSGP UPD+15, UPD+16, UPD+20, VFY+31, DONE+5
>> PSGPD DDCHK+2*, DDCHK+3
>> PSGRDTX VFY+31
PSGRF UPD+18!
PSGRFD VFY+21*, VFY+23*, VFY+29*, VFY+34!
PSGRMV UPD+18!
PSGRMVT UPD+18!
PSGRSD VFY+21*, VFY+23*, VFY+27, VFY+28*, VFY+34!
>> PSGS0XT UPD+17
>> PSGSCH UPD+3, UPD+7
>> PSGSD UPD+4
>> PSGSI UPD+5, UPD+6
>> PSGSM UPD+8
>> PSGST UPD+3*, UPD+4
PSGX VFY+21~*, VFY+23~*
>> PSJACEPT VFY+7, VFY+9*
>> PSJCOM UPD+1, VFY+1
PSJDOSE VFY+5~, DONE+6!
PSJDOSE("WARN" VFY+7
PSJDOSE("WARN1" VFY+7
PSJDSFLG VFY+5~, VFY+7
>> PSJOWALL UPD+15*
>> PSJPRI DONE+2
>> PSJRNF UPD+22
>> PSJSPEED VFY+41, VFY+43, DONE+2
>> PSJSYSP UPD+10, UPD+13
>> PSJSYSU UPD+19, UPD+21, VFY+25, VFY+36, VFY+37, VFY+39, DONE+2
PSJVAR DONE+6!
>> PSOSAND VFY+15*
Q UPD+10*, UPD+13*, DONE+6!, NEWNVAL+11*, NEWNVAL+15*, NEWNVAL+17, NEWNVAL+18*, NEWNVAL+22*, NEWNVAL+24
QQ DONE+6!, NEWNVAL+11*, NEWNVAL+18*
SIARRAY UPD+20~*
>> TIUDA DONE+5
U UPD+5, UPD+6, UPD+14, UPD+16, UPD+17, UPD+18, VFY+21, VFY+23, VFY+31, VFY+37
>> VALMBCK VFY+44*, DONE+6*
VND4 VFY+26*, VFY+36, VFY+37*, VFY+38*, VFY+39*, VFY+40, DONE+6!
X UPD+14*, UPD+16*, VFY+15, VFY+35~*, VFY+36, DONE+6!
Y DONE+4, CONT+1~, CONT+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All