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

Package: Registration

Routine: DG837PST


Information

DG837PST ;BIR/PTD/ELZ/CKN-PATCH DG*5.3*837 POST INSTALLATION ROUTINE ; 1/3/12 1:30pm

Source Information

Source file <DG837PST.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
VA FileMan 8 C^%DTC  TURNON^DIAUTL  (FILE,UPDATE)^DIE  ^DIK  $$VFILE^DILFD  $$GET1^DIQ  ^DIR  EN^DIU2  
Kernel 4 ^%ZTLOAD  ($$DT,$$FMTE,$$NOW)^XLFDT  ($$PATCH,BMES)^XPDUTL  $$STA^XUAF4  
MailMan 1 ^XMD  
Registration 1 $$SITE^VASITE  

Entry Points

Name Comments DBIA/ICR reference
AGAIN ;Line tag to be called if module needs to be run again.
DELDD ;MVI_791 (ptd) - Delete obsolete fields in #391.91 file and 391.92.
PROCESS ;
STOP ;Stop the process
CHECK() ;Initial check
ALIAS ;MVI_805 (elz) - clean up Alias multiple in patient (#2) file.
QUE ;Queue the process
IDFLD ;MVI_876 (ptd) - Turn on Audit for the new DoD identification fields
MAIL ;Send Mail message
STRTAGN ;Re run of process in case of process is stopped
EP ;MVI_791 (ckn) - Post install routine entry point for TF conversion process

External References

Name Field # of Occurrence
C^%DTC PROCESS+3
^%ZTLOAD QUE+4
TURNON^DIAUTL IDFLD+4, IDFLD+6
FILE^DIE AGAIN+10, PROCESS+17, PROCESS+22, PROCESS+29
UPDATE^DIE PROCESS+47
^DIK PROCESS+50, DELDD+17
$$VFILE^DILFD DELDD+23, DELDD+30
$$GET1^DIQ PROCESS+19, PROCESS+41
^DIR CHECK+7, STOP+5
EN^DIU2 DELDD+25, DELDD+33
$$SITE^VASITE MAIL+3
$$DT^XLFDT PROCESS+5
$$FMTE^XLFDT MAIL+15, MAIL+17
$$NOW^XLFDT CHECK+3, CHECK+12, PROCESS+52, PROCESS+53
^XMD MAIL+20
$$PATCH^XPDUTL IDFLD+2, ALIAS+2
BMES^XPDUTL IDFLD+5, IDFLD+7, AGAIN+2, AGAIN+11, AGAIN+12, CHECK+1, CHECK+3, CHECK+4, CHECK+5, CHECK+13
, DELDD+12, DELDD+19, DELDD+27, DELDD+31, DELDD+35
$$STA^XUAF4 PROCESS+13, PROCESS+19, PROCESS+40, PROCESS+41

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: CHECK+7
Function Call: WRITE
  • Prompt: !!,"Stop process"
  • Line Location: STOP+1
Function Call: WRITE
  • Prompt: !,"<< No process is currently running >>"
  • Line Location: STOP+2
Function Call: WRITE
  • Prompt: !,"<< Process already completed >>"
  • Line Location: STOP+3
Function Call: WRITE
  • Prompt: !!,"Process is currently running."
  • Line Location: STOP+4
Function Call: WRITE
  • Prompt: !
  • Line Location: STOP+5
Routine Call
  • DIE
  • Line Location:
    • PROCESS+47
Routine Call
  • DIE
  • Line Location:
    • AGAIN+10
    • PROCESS+17
    • PROCESS+22
    • PROCESS+29
Routine Call
  • DIR
  • Line Location:
    • CHECK+7
    • STOP+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] TURNON^DIAUTL
^DIC(4 - [#4] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCN(391.91 - [#391.91] PROCESS+4, PROCESS+7, PROCESS+10, PROCESS+12, PROCESS+15, PROCESS+16, PROCESS+24, PROCESS+25, PROCESS+26, PROCESS+31
, PROCESS+33, PROCESS+43, PROCESS+44, PROCESS+50
^DPT - [#2] AGAIN+7, AGAIN+8
^DPT("B" AGAIN+4
^TMP("DG837PST" AGAIN+3!, AGAIN+4*, AGAIN+5, AGAIN+13!
^XTMP("DG837PST" QUE+5*, CHECK+3*, CHECK+4, CHECK+5, CHECK+9, CHECK+10!, CHECK+11*, CHECK+12*, PROCESS+4*, PROCESS+5*
, PROCESS+6, PROCESS+8, PROCESS+9*, PROCESS+52*, PROCESS+53*, MAIL+10, MAIL+15, MAIL+17, MAIL+19, STOP+2
, STOP+3, STOP+6*

Label References

Name Line Occurrences
$$CHECK EP+3, STRTAGN+3
ALIAS DG837PST+3
DELDD PROCESS+55
EP DG837PST+4
IDFLD DG837PST+3
MAIL PROCESS+54
QUE EP+4, STRTAGN+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA PROCESS+50*, PROCESS+51!, DELDD+16*, DELDD+18!
DA(1 PROCESS+49*, DELDD+16*
DFN AGAIN+1~, AGAIN+4*, AGAIN+5*, AGAIN+7, AGAIN+8, AGAIN+10, AGAIN+11
DGALIAS AGAIN+6~, AGAIN+8*, AGAIN+9
DGALIAS( AGAIN+9*
DGERR AGAIN+1~
DGERR("DIERR" AGAIN+11
DGNM AGAIN+1~, AGAIN+4*
DGX AGAIN+1~, AGAIN+7*, AGAIN+8, AGAIN+10
DIK PROCESS+49*, PROCESS+51!, DELDD+16*, DELDD+18!
DIR CHECK+7!, STOP+5!, STOP+7!
DIR("A" CHECK+7*, STOP+5*
DIR("B" CHECK+7*, STOP+5*
DIR(0 CHECK+7*, STOP+5*
DIU DELDD+24*, DELDD+26!, DELDD+32*, DELDD+34!
DIU(0 DELDD+24*, DELDD+32*
DT PROCESS+3
DUZ MAIL+4
FDA AGAIN+1~, PROCESS+1~, PROCESS+14~, PROCESS+18!, PROCESS+20~, PROCESS+23!, PROCESS+30!, PROCESS+48!
FDA( AGAIN+10*
FDA(1 PROCESS+15*, PROCESS+16*, PROCESS+21*, PROCESS+27*, PROCESS+28*, PROCESS+34*, PROCESS+35*, PROCESS+36*, PROCESS+37*, PROCESS+38*
, PROCESS+39*, PROCESS+40*, PROCESS+42*, PROCESS+45*, PROCESS+46*
FDAIEN PROCESS+1~, PROCESS+44~, PROCESS+48!
FLDNUM IDFLD+3~, IDFLD+4*, IDFLD+5, IDFLD+6*, IDFLD+7
INITSTRT CHECK+2~, CHECK+9*, CHECK+11
MIEN PROCESS+1~, PROCESS+25*, PROCESS+26, PROCESS+31, PROCESS+43*, PROCESS+44
MSG MAIL+1~
MSG( MAIL+8*, MAIL+16*, MAIL+18*
MSG(1 MAIL+7*
MSG(10 MAIL+19*
MSG(2 MAIL+9*
MSG(3 MAIL+10*
MSG(4 MAIL+11*
MSG(5 MAIL+12*
MSG(6 MAIL+13*
MSG(7 MAIL+14*
MSG(8 MAIL+15*
MSG(9 MAIL+17*
NODE0 PROCESS+1~, PROCESS+33*, PROCESS+34, PROCESS+35, PROCESS+36, PROCESS+37, PROCESS+38, PROCESS+39
PATCH MAIL+1~, MAIL+2*, MAIL+9
QFLG PROCESS+1~, PROCESS+2*, PROCESS+7, PROCESS+8*, PROCESS+52
RESTART EP+1~, EP+2*, CHECK+6, STRTAGN+1~, STRTAGN+2*
SITE MAIL+1~, MAIL+3*
SITENM MAIL+1~, MAIL+3*, MAIL+13
SNODE0 PROCESS+1~, PROCESS+26*, PROCESS+27, PROCESS+28, PROCESS+44*, PROCESS+45, PROCESS+46
STATN MAIL+1~, MAIL+3*, MAIL+6, MAIL+12
TFIEN PROCESS+1~, PROCESS+6*, PROCESS+7*, PROCESS+9, PROCESS+10, PROCESS+12, PROCESS+15, PROCESS+16, PROCESS+21, PROCESS+24
, PROCESS+25, PROCESS+26, PROCESS+27, PROCESS+28, PROCESS+31, PROCESS+33, PROCESS+43, PROCESS+44, PROCESS+49, PROCESS+50
TMPST PROCESS+11~, PROCESS+12*, PROCESS+13, PROCESS+19, PROCESS+33*, PROCESS+40, PROCESS+41
X PROCESS+1~, PROCESS+5
X1 PROCESS+1~, PROCESS+3*
X2 PROCESS+1~, PROCESS+3*
XMDUZ MAIL+1~, MAIL+5*
XMSUB MAIL+1~, MAIL+6*
XMTEXT MAIL+1~, MAIL+5*
XMY MAIL+1~
XMY( MAIL+4*
XMY("CHINTAN.NAIK@DOMAIN.EXT" MAIL+4*
XMY("CHRISTINE.CHESNEY@DOMAIN.EXT" MAIL+4*
XMY("PAULETTE.DAVIS@DOMAIN.EXT" MAIL+4*
Y CHECK+8, STOP+6, STOP+7!
ZTDESC QUE+1~, QUE+2*
>> ZTDTH QUE+3*
>> ZTIO QUE+3*
>> ZTQUEUED QUE+6
>> ZTREQ QUE+6*
ZTRTN QUE+1~, QUE+2*
ZTSK QUE+1~, QUE+5
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All