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

Package: Inpatient Medications

Routine: PSJ5P340


Information

PSJ5P340 ;PAW - Patch 340 Post Install Routine;4/25/2017

Source Information

Source file <PSJ5P340.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 3 ^%ZTLOAD  ($$FMADD,$$FMTH,$$HTE,$$NOW)^XLFDT  (BMES,MES)^XPDUTL  
VA FileMan 3 NOW^%DTC  ^DIE  EN2^DIK  
Inpatient Medications 1 EN1^PSJHL2  
MailMan 1 ^XMD  

Entry Points

Name Comments DBIA/ICR reference
EN ; Begin post-installation routine
ENQN
UD ; Process Unit Dose Orders
IV ; Process IV Orders
UPDATE ; Loop to Update Status on Unit Dose and IV Orders
UPDATE1 ; Update Status on Unit Dose and IV Orders
CORRUPT ; Corrupt Unit Dose Data Found
STOP
XMAIL1 ; Post-installation Notification for Installer
XMAIL2 ; Post-installation Notification for Users

External References

Name Field # of Occurrence
NOW^%DTC ENQN+1, XMAIL1+1
^%ZTLOAD EN+18
^DIE UPDATE1+6
EN2^DIK CORRUPT+3
EN1^PSJHL2 UPDATE1+8
$$FMADD^XLFDT ENQN+1
$$FMTH^XLFDT EN+6
$$HTE^XLFDT EN+9
$$NOW^XLFDT EN+6
^XMD XMAIL1+4, XMAIL2+32
BMES^XPDUTL EN+7, EN+21, EN+23
MES^XPDUTL EN+8, EN+9, EN+10, EN+11, EN+12, EN+13, EN+20

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Your DUZ is not defined. It must be defined to run this routine."
  • Line Location: EN+1
Routine Call
  • DIE
  • Line Location:
    • UPDATE1+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" XMAIL1+1
^PS(55 - [#55] ENQN+4, UD+2, UD+3, UD+4, IV+2, IV+3, IV+4, UPDATE1+2, UPDATE1+4, CORRUPT+2*
, CORRUPT+5
^TMP("PSJ5P340R" ENQN+2!, XMAIL2+4*, XMAIL2+5*, XMAIL2+6*, XMAIL2+7*, XMAIL2+8*, XMAIL2+9*, XMAIL2+10*, XMAIL2+11*, XMAIL2+12*
, XMAIL2+13*, XMAIL2+14*, XMAIL2+15*, XMAIL2+16*, XMAIL2+17*, XMAIL2+18*, XMAIL2+25*, XMAIL2+33!
^XTMP("PSJ5P340" ENQN+2!, UD+5*, IV+5*, UPDATE+1, UPDATE+2, UPDATE+3, CORRUPT+4*, STOP+3*
^XTMP("PSJ5P340C" CORRUPT+6*, STOP+4*, XMAIL2+20, XMAIL2+21, XMAIL2+22, XMAIL2+24
^XUSEC("PSJ RPHARM" XMAIL2+29
^XUSEC("PSJI MGR" XMAIL2+26
^XUSEC("PSJU MGR" XMAIL2+27
^XUSEC("PSJU RPH" XMAIL2+28
^XUSEC("PSNMGR" XMAIL2+30

Label References

Name Line Occurrences
CORRUPT UPDATE1+5
IV ENQN+4
STOP ENQN+6
UD ENQN+4
UPDATE ENQN+5
UPDATE1 UPDATE+4
XMAIL1 STOP+1
XMAIL2 STOP+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% ENQN+1, STOP!, XMAIL1+1
CNT EN+2~, ENQN~, ENQN+3*, ENQN+5, UD+5*, IV+5*, XMAIL2+5, XMAIL2+19*, XMAIL2+23*, XMAIL2+25
, XMAIL2+33!
CPS STOP!
CPSX STOP!
DA UPDATE1+6*, CORRUPT+3!*, STOP!
DA(1 UPDATE1+6*, CORRUPT+3*
DFN ENQN~, ENQN+3*, ENQN+4*, UD+2, UD+3, UD+4, UD+5, IV+2, IV+3, IV+4
, IV+5, UPDATE+1*, UPDATE+2, UPDATE+3, UPDATE1+2, UPDATE1+4, UPDATE1+6, UPDATE1+8, CORRUPT+2, CORRUPT+3
, CORRUPT+4, CORRUPT+5, CORRUPT+6, STOP!, XMAIL2+20*, XMAIL2+21, XMAIL2+22, XMAIL2+24, XMAIL2+25
DIE UPDATE1+6*, STOP!
DIFROM XMAIL2+32~
DIK CORRUPT+3!*
DIK(1 CORRUPT+3*
DR UPDATE1+6*, STOP!
DRG XMAIL2+1~, XMAIL2+30*
DT UD+5, IV+5
DUZ EN+1, XMAIL1+1, XMAIL2+31
JOBN EN+2~, EN+4*, EN+8, EN+16
NAMSP EN+2~, EN+3*, EN+15
NUM STOP!
ORSTA ENQN~, UD+3*, UD+5, IV+3*, IV+5, STOP!
ORSTOP ENQN~, UD+4*, UD+5, IV+4*, IV+5, STOP!
PATCH EN+2~, EN+5*
PSG XMAIL1+1!
PSG(1 XMAIL1+2*
PSG(2 XMAIL1+3*
PSGPO ENQN~, UPDATE1+6*
PSIVACT ENQN~, UPDATE1+6*
PSJCOR ENQN~, UPDATE1+3*, UPDATE1+4*, UPDATE1+5
PSJCREAT ENQN~, ENQN+1*, STOP+3, STOP+4
PSJEXPR ENQN~, ENQN+1*, STOP+3, STOP+4
PSJORD CORRUPT+1~, CORRUPT+5*, CORRUPT+6, XMAIL2+1~, XMAIL2+24*, XMAIL2+25
PSJPO ENQN~
PSJSTART ENQN~, ENQN+1*
PSJX XMAIL2+1~, XMAIL2+26*, XMAIL2+27*, XMAIL2+28*, XMAIL2+29*
SBJM EN+2~, EN+16*
STATUS ENQN~, UPDATE1+6*
U UD+3, UD+4, IV+3, IV+4
UDIV ENQN~, UPDATE+2*, UPDATE+3, UPDATE1+1, UPDATE1+5, UPDATE1+6, UPDATE1+7, CORRUPT+4, CORRUPT+6, STOP!
, XMAIL2+21*, XMAIL2+22, XMAIL2+24, XMAIL2+25
UDIV1 ENQN~, UPDATE1+1*, UPDATE1+2, UPDATE1+4, CORRUPT+2, CORRUPT+5
UIEN ENQN~, UD+1*, UD+2*, UD+3, UD+4, UD+5, IV+1*, IV+2*, IV+3, IV+4
, IV+5, UPDATE+3*, UPDATE1+2, UPDATE1+4, UPDATE1+6, UPDATE1+7, CORRUPT+2, CORRUPT+3, CORRUPT+4, CORRUPT+5
, CORRUPT+6, STOP!, XMAIL2+22*, XMAIL2+24, XMAIL2+25
UIEN1 ENQN~, UPDATE1+7*, UPDATE1+8, STOP!
XMDUZ XMAIL1+1*, XMAIL2+3*, XMAIL2+33!
XMSUB XMAIL1+1*, XMAIL2+2*, XMAIL2+33!
XMTEXT XMAIL1+1*, XMAIL2+32*, XMAIL2+33!
XMY XMAIL1+1!, XMAIL2+33!
XMY( XMAIL1+1*, XMAIL2+26*, XMAIL2+27*, XMAIL2+28*, XMAIL2+29*, XMAIL2+30*, XMAIL2+31*
XPDQUES EN+24!
Y EN+2~, EN+6*, XMAIL1+1*, XMAIL1+3
ZTDESC EN+2~, EN+16*
ZTDTH EN+2~, EN+6*, EN+9
ZTIO EN+2~, EN+15*
ZTQUEUED EN+2~
ZTREQ EN+2~
ZTRTN EN+2~, EN+15*
ZTSAVE EN+2~
ZTSAVE("DUZ" EN+17*
ZTSAVE("JOBN" EN+17*
ZTSAVE("SBJM" EN+17*
ZTSAVE("ZTDTH" EN+17*
ZTSAVE("ZTSK" EN+22*
ZTSK EN+2~, EN+19, EN+20
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All