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

Package: Registration

Routine: DG950PST


Information

DG950PST ;OAK/ELZ-PATCH DG*5.3*950 POST INSTALLATION ROUTINE ;10/13/17

Source Information

Source file <DG950PST.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Kernel 4 ^%ZTLOAD  ($$FMTE,$$NOW)^XLFDT  (BMES,MES)^XPDUTL  $$PROD^XUPROD  
Registration 2 BRDATA^DGDTHBR  $$SITE^VASITE  
VA FileMan 2 $$FIND1^DIC  (UPDATE,WP)^DIE  
MailMan 1 ^XMD  

Entry Points

Name Comments DBIA/ICR reference
UPDTFLE ;Create a new entries in SUPPORTING DOCUMENTATION TYPES (#47.75) file
BRFILE ; populate business new rules into file. To ensure this is only done once, check the
; file to make sure they are not already just in case the patch is re-installed.
VFULLICN ;entry point for queued job to loop on Patient file to validate FULL ICN
BRDATA ; data to populate into the 47.761 file
; Format: IEN of Source of Notification^Active^Supporting Document Type (Type Code)^Active
QUE ;Queue the validation of the FULL ICN (#991.1) against the ICN (#991.01) and ICN CHECKSUM (#991.02)
POST ;
EMAILS ;Send email to person who ran the INIT, letting them know results

External References

Name Field # of Occurrence
^%ZTLOAD QUE+5
BRDATA^DGDTHBR BRFILE+7
$$FIND1^DIC UPDTFLE+5
UPDATE^DIE UPDTFLE+10, VFULLICN+13
WP^DIE UPDTFLE+14
$$SITE^VASITE EMAILS+19
$$FMTE^XLFDT VFULLICN+2, VFULLICN+15
$$NOW^XLFDT VFULLICN+2, VFULLICN+15
^XMD EMAILS+12, EMAILS+33
BMES^XPDUTL POST+1, POST+5, UPDTFLE+2, UPDTFLE+16, QUE+1
MES^XPDUTL UPDTFLE+5, UPDTFLE+6, UPDTFLE+11, UPDTFLE+15, BRFILE+2, BRFILE+4, BRFILE+8, BRFILE+9, QUE+6, QUE+7
$$PROD^XUPROD EMAILS+16

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DG(47.75 - [#47.75] FIND1^DIC,  WP^DIE

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(47.75 UPDTFLE+6
^DPT - [#2] VFULLICN+4, VFULLICN+5, VFULLICN+6, VFULLICN+12, VFULLICN+14

Label References

Name Line Occurrences
BRFILE POST+3
QUE POST+4
UPDTFLE POST+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CKSUM VFULLICN+1~, VFULLICN+7*, VFULLICN+9, VFULLICN+13
DFN VFULLICN+1~, VFULLICN+3*, VFULLICN+4*, VFULLICN+5, VFULLICN+6, VFULLICN+12, VFULLICN+13, VFULLICN+14
DFNCNT VFULLICN+1~, VFULLICN+3*, VFULLICN+4*, EMAILS+25
DGCOUNT BRFILE+3~, BRFILE+5*, BRFILE+6*
DGDATA BRFILE+3~, BRFILE+6*, BRFILE+7
DGDATA( BRFILE+6*
DGDOCTYP UPDTFLE+1~, UPDTFLE+3*, UPDTFLE+5, UPDTFLE+6, UPDTFLE+7, UPDTFLE+8, UPDTFLE+9, UPDTFLE+11, UPDTFLE+13, UPDTFLE+15
DGERRMSG UPDTFLE+4~, UPDTFLE+11, VFULLICN+1~
DGERRMSG("DIERR" UPDTFLE+11
DGFDA UPDTFLE+4~, VFULLICN+1~, VFULLICN+10!
DGFDA( UPDTFLE+7*, UPDTFLE+8*
DGFDA(2 VFULLICN+13*
DGIEN UPDTFLE+4~, UPDTFLE+13*, UPDTFLE+14
DGIEN(1 UPDTFLE+9*
DGLINE BRFILE+3~, BRFILE+6*, BRFILE+9*
DGRTN BRFILE+3~, BRFILE+7
DGRTN( BRFILE+9
DGRTN(1 BRFILE+8
DGSITE EMAILS+18~, EMAILS+20*, EMAILS+21, EMAILS+28
DGSNAME EMAILS+18~, EMAILS+20*, EMAILS+21
DGTMP UPDTFLE+4~
DGTMP("WP" UPDTFLE+13*
DONE VFULLICN+1~, VFULLICN+15*, EMAILS+6, EMAILS+23
DUZ EMAILS+11, EMAILS+29
FICNT VFULLICN+1~, VFULLICN+3*, VFULLICN+11*, EMAILS+7, EMAILS+27
FULLICN VFULLICN+1~, VFULLICN+7*, VFULLICN+9
ICN VFULLICN+1~, VFULLICN+7*, VFULLICN+8, VFULLICN+9, VFULLICN+13
MPINODE VFULLICN+1~, VFULLICN+6*, VFULLICN+7
R EMAILS+1~, EMAILS+18~
R(1 EMAILS+2*, EMAILS+21*
R(2 EMAILS+3*, EMAILS+22*
R(3 EMAILS+4*, EMAILS+23*
R(4 EMAILS+5*, EMAILS+24*
R(5 EMAILS+6*, EMAILS+25*
R(6 EMAILS+7*, EMAILS+26*
R(7 EMAILS+8*, EMAILS+27*
R(8 EMAILS+8*
START VFULLICN+1~, VFULLICN+2*, EMAILS+5, EMAILS+23
X EMAILS+1~, EMAILS+19*, EMAILS+20
XMDUN EMAILS+1~, EMAILS+18~
XMDUZ EMAILS+1~, EMAILS+10*, EMAILS+18~, EMAILS+29*
XMSUB EMAILS+1~, EMAILS+9*, EMAILS+18~, EMAILS+28*
XMTEXT EMAILS+1~, EMAILS+9*, EMAILS+18~, EMAILS+28*
XMY EMAILS+1~, EMAILS+18~
XMY( EMAILS+11*
XMY("Christine.Chesney@domain.ext" EMAILS+30*
XMY("Christine.Link@domain.ext" EMAILS+32*
XMY("John.Williams30ec0c@domain.ext" EMAILS+31*
XMZ EMAILS+1~, EMAILS+18~
Y QUE+2~
ZTDESC QUE+2~, QUE+4*
ZTDTH QUE+2~, QUE+3*
ZTIO QUE+2~, QUE+3*
ZTRTN QUE+2~, QUE+3*
ZTSAVE QUE+2~
ZTSK QUE+2~, QUE+6, QUE+7

Marked Items

Name Field # of Occurrence
$T(BRDATA+DGLINE BRFILE+6
Info |  Source |  Call Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All