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

Package: Registration

Routine: DG967PST


Information

DG967PST ;BIR/CML-PATCH DG*5.3*967 POST INSTALLATION ROUTINE ;8/14/18

Source Information

Source file <DG967PST.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 4 ^%ZTLOAD  ($$FMTE,$$NOW)^XLFDT  ($$PATCH,BMES,MES)^XPDUTL  $$PROD^XUPROD  
MailMan 1 ^XMD  
Master Patient Index VistA 1 $$A31^MPIFA31B  
Registration 1 $$SITE^VASITE  
VA FileMan 1 ^DIE  

Entry Points

Name Comments DBIA/ICR reference
POST ;queue off post-init to identify patients marked as "sensitive" and trigger A31 to MPI and clean up ZIP+4 records
QUE ; Queue off seeding job of sensitivity updates to MPI and ZIP+4 cleanup to run after 10:00pm
SECLOOP ; entry point for queued job to loop on DG SECURITY LOG FILE
EMAILS1 ; Send email to person who ran the INIT, letting them know results
ZIP4LOOP ; start cleanup of ZIP+4 records
EMAILS2 ; Send email to person who ran the INIT, letting them know results

External References

Name Field # of Occurrence
^%ZTLOAD QUE+10
^DIE ZIP4LOOP+7
$$A31^MPIFA31B SECLOOP+7
$$SITE^VASITE EMAILS1+18, EMAILS2+19
$$FMTE^XLFDT SECLOOP+2, SECLOOP+9, ZIP4LOOP+2, ZIP4LOOP+9
$$NOW^XLFDT QUE+5, QUE+7, SECLOOP+2, SECLOOP+9, ZIP4LOOP+2, ZIP4LOOP+9
^XMD EMAILS1+11, EMAILS1+32, EMAILS2+12, EMAILS2+33
$$PATCH^XPDUTL POST+3
BMES^XPDUTL POST+2, POST+3, POST+5, QUE+1
MES^XPDUTL QUE+11, QUE+12
$$PROD^XUPROD EMAILS1+15, EMAILS2+16

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGSL(38.1 - [#38.1] SECLOOP+4, SECLOOP+6
^DPT - [#2] SECLOOP+5, SECLOOP+7, ZIP4LOOP+4, ZIP4LOOP+5, ZIP4LOOP+6

Label References

Name Line Occurrences
QUE POST+4
ZIP4LOOP EMAILS1+15

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A31CNT SECLOOP+1~, SECLOOP+3*, SECLOOP+7*, EMAILS1+7, EMAILS1+26
DA ZIP4LOOP+7*!
DAY QUE+2~, QUE+5*, QUE+6
DFN SECLOOP+1~, SECLOOP+3*, SECLOOP+4*, SECLOOP+5, SECLOOP+6, SECLOOP+7, ZIP4LOOP+1~, ZIP4LOOP+3*, ZIP4LOOP+4*, ZIP4LOOP+5
, ZIP4LOOP+6, ZIP4LOOP+7
DFNCNT SECLOOP+1~, SECLOOP+3*, SECLOOP+4*, EMAILS1+6, EMAILS1+25, ZIP4LOOP+1~, ZIP4LOOP+3*, ZIP4LOOP+4*, EMAILS2+6, EMAILS2+26
DGFLDS POST+1~
DGI POST+1~
DGSITE EMAILS1+17~, EMAILS1+19*, EMAILS1+20, EMAILS1+27, EMAILS2+18~, EMAILS2+20*, EMAILS2+21, EMAILS2+28
DGSNAME EMAILS1+17~, EMAILS1+19*, EMAILS1+20, EMAILS2+18~, EMAILS2+20*, EMAILS2+21
DIE ZIP4LOOP+7*!
DONE QUE+2~, SECLOOP+1~, SECLOOP+9*, EMAILS1+5, EMAILS1+23, ZIP4LOOP+1~, ZIP4LOOP+9*, EMAILS2+5, EMAILS2+24
DR ZIP4LOOP+7*!
DUZ EMAILS1+10, EMAILS1+28, EMAILS2+11, EMAILS2+29
EDCNT ZIP4LOOP+1~, ZIP4LOOP+3*, ZIP4LOOP+6*, EMAILS2+7, EMAILS2+27
EDZIP ZIP4LOOP+1~, ZIP4LOOP+7*
ICN SECLOOP+1~, SECLOOP+7*
NODE ZIP4LOOP+1~, ZIP4LOOP+6*
QQ QUE+2~, QUE+5*
R EMAILS1+1~, EMAILS1+17~, EMAILS2+1~, EMAILS2+18~
R(1 EMAILS1+2*, EMAILS1+20*, EMAILS2+2*, EMAILS2+21*
R(2 EMAILS1+3*, EMAILS1+21*, EMAILS2+3*, EMAILS2+22*
R(3 EMAILS1+4*, EMAILS1+22*, EMAILS2+4*, EMAILS2+23*
R(4 EMAILS1+5*, EMAILS1+23*, EMAILS2+5*, EMAILS2+24*
R(5 EMAILS1+6*, EMAILS1+24*, EMAILS2+6*, EMAILS2+25*
R(6 EMAILS1+7*, EMAILS1+25*, EMAILS2+7*, EMAILS2+26*
R(7 EMAILS1+26*, EMAILS2+8*, EMAILS2+27*
R(8 EMAILS2+8*
SCH QUE+5!, QUE+6*, QUE+7*, QUE+8
SENSI SECLOOP+1~, SECLOOP+6*
START SECLOOP+1~, SECLOOP+2*, EMAILS1+4, EMAILS1+23, ZIP4LOOP+1~, ZIP4LOOP+2*, EMAILS2+4, EMAILS2+24
TIME QUE+2~, QUE+5*, QUE+6, QUE+7
TRY SECLOOP+1~, SECLOOP+7*
X EMAILS1+1~, EMAILS1+18*, EMAILS1+19, ZIP4LOOP+7*, EMAILS2+1~, EMAILS2+19*, EMAILS2+20
XMDUN EMAILS1+1~, EMAILS1+17~, EMAILS2+1~, EMAILS2+18~
XMDUZ EMAILS1+1~, EMAILS1+9*, EMAILS1+17~, EMAILS1+28*, EMAILS2+1~, EMAILS2+10*, EMAILS2+18~, EMAILS2+29*
XMSUB EMAILS1+1~, EMAILS1+8*, EMAILS1+17~, EMAILS1+27*, EMAILS2+1~, EMAILS2+9*, EMAILS2+18~, EMAILS2+28*
XMTEXT EMAILS1+1~, EMAILS1+8*, EMAILS1+17~, EMAILS1+27*, EMAILS2+1~, EMAILS2+9*, EMAILS2+18~, EMAILS2+28*
XMY EMAILS1+1~, EMAILS1+17~, EMAILS2+1~, EMAILS2+18~
XMY( EMAILS1+10*, EMAILS2+11*
XMY("Christine.Chesney@domain.ext" EMAILS1+29*, EMAILS2+30*
XMY("Christine.Link@domain.ext" EMAILS1+31*, EMAILS2+32*
XMY("John.Williams30ec0c@domain.ext" EMAILS1+30*, EMAILS2+31*
XMZ EMAILS1+1~, EMAILS1+17~, EMAILS2+1~, EMAILS2+18~
Y QUE+2~
ZIP4 ZIP4LOOP+1~, ZIP4LOOP+6*, ZIP4LOOP+7
ZTDESC QUE+2~, QUE+9*
ZTDTH QUE+2~, QUE+8*
ZTIO QUE+2~, QUE+3*
ZTRTN QUE+2~, QUE+3*
ZTSAVE QUE+2~
ZTSK QUE+2~, QUE+11, QUE+12
Info |  Source |  Call Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All