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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: DG933PO

Package: Registration

Routine: DG933PO


Information

DG933PO ;DAL/JCH - PATCH DG*5.3*933 POST INSTALL ;06/18/2017

Source Information

Source file <DG933PO.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Kernel 4 $$NOW^XLFDT  MES^XPDUTL  $$KSP^XUPARAM  $$PROD^XUPROD  
VA FileMan 3 DD^%DT  FILE^DID  UPDATE^DIE  
Health Data and Informatics 2 ($$GETSTAT,SETSTAT)^HDISVF01  $$GETIEN^HDISVF09  
MailMan 1 ^XMD  
Registration 1 $$SITE^VASITE  

Entry Points

Name Comments DBIA/ICR reference
EN ;MAIN ENTRY POINT
HDIS(FIL,DOMPTR,DOMAIN) ; Do dummy 'seeding'
PSEED(FIL,DOMPTR,DOMAIN)
PSTDONE(MSG) ; display FINISHED message
DUMSEED(DGMFILE,DGDTAG) ; New file <#nn.99> contains no data, can't be seeded unless there is at least one entry
; RACE MASTER (#10.99) file initial population data elements from DAT1099 line tag
; MASTER MARITAL STATUS (#11.99) file initial population data elements from DAT1199 line tag;
; MASTER RELIGION (#13.99) file initial population data elements from DAT1399 line tag;
INSREC(DGFILE,DGIEN,DGFDA) ; Insert DGIEN into file DGFILE with data in DGFDA
PSTHALT(MSG) ; display error message
SEEDGRAM
SEEDGMMS
SEEDGMR

External References

Name Field # of Occurrence
DD^%DT PSEED+24
FILE^DID PSEED+10
UPDATE^DIE INSREC+3
$$GETSTAT^HDISVF01 PSEED+3, PSEED+28
SETSTAT^HDISVF01 PSEED+7
$$GETIEN^HDISVF09 EN+4
$$SITE^VASITE PSEED+13
$$NOW^XLFDT PSEED+24
^XMD PSEED+32
MES^XPDUTL EN+6, PSTDONE+7, PSTHALT+6
$$KSP^XUPARAM EN+2
$$PROD^XUPROD PSEED+12

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGMMS(11.99 - [#11.99] HDIS+8
^DGMR(13.99 - [#13.99] HDIS+11
^DGRAM(10.99 - [#10.99] HDIS+5
^XMB("NETNAME" PSEED+21

Label References

Name Line Occurrences
$$INSREC DUMSEED+17
DUMSEED HDIS+5, HDIS+8, HDIS+11
HDIS EN+8
PSEED HDIS+6, HDIS+9, HDIS+12
PSTDONE PSEED+33
PSTHALT EN+7, PSEED+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ASTATUS PSEED+1~, PSEED+3*, PSEED+4
B HDIS+1~, PSEED+24*
C HDIS+1~
DA EN+1~
DEMFAC EN+1~, EN+2*
DGDATA DUMSEED+10~, DUMSEED+12*, DUMSEED+14, DUMSEED+15, DUMSEED+16
DGDATLN DUMSEED+10~, DUMSEED+12*
DGDERR INSREC+2~, INSREC+4
DGDTAG DUMSEED~
DGEFFDT DUMSEED+13~
DGFDA DUMSEED+10~, DUMSEED+13~, DUMSEED+17, INSREC~, INSREC+5
DGFDA( DUMSEED+15*, DUMSEED+16*
DGFDAIEN DUMSEED+13~
DGFILE INSREC~, INSREC+1
DGIEN INSREC~
DGMFI DUMSEED+10~, DUMSEED+13~, DUMSEED+14*, DUMSEED+17
DGMFILE DUMSEED~, DUMSEED+15, DUMSEED+16, DUMSEED+17
DGRSLT DUMSEED+10~, DUMSEED+17*
DGSITE PSEED+1~, PSEED+13*, PSEED+14, PSEED+16, PSEED+20, PSEED+30
DIE EN+1~
DIFROM PSEED+32~!
DOMAIN EN+1~, EN+3*, EN+4, EN+6, EN+8, HDIS~, HDIS+6, HDIS+9, HDIS+12, PSEED~
DOMPTR EN+1~, EN+4, EN+5, EN+8, HDIS~, HDIS+6, HDIS+9, HDIS+12, PSEED~
DR EN+1~
DUZ PSEED+17
FIL EN+1~, EN+8*, HDIS~, HDIS+4, HDIS+7, HDIS+10, PSEED~, PSEED+3, PSEED+4, PSEED+7
, PSEED+10, PSEED+14, PSEED+26, PSEED+28, PSEED+30, PSEED+33, PSTDONE+4
FILNAM PSEED+1~, PSEED+11*, PSEED+26, PSEED+30, PSTDONE+4
FILNAM("NAME" PSEED+11
HDIMSG HDIS+1~, PSTDONE+1~, PSTDONE+7, PSTHALT+6
HDIMSG(1 PSTDONE+2*, PSTHALT+1*
HDIMSG(2 PSTDONE+3*, PSTHALT+2*
HDIMSG(3 PSTDONE+4*, PSTHALT+3*
HDIMSG(4 PSTDONE+5*, PSTHALT+4*
HDIMSG(5 PSTDONE+6*, PSTHALT+5*
HDITEXT PSEED+1~, PSEED+18!
HDITEXT(1 PSEED+19*
HDITEXT(10 PSEED+30*
HDITEXT(11 PSEED+31*
HDITEXT(2 PSEED+20*, PSEED+21*
HDITEXT(3 PSEED+22*
HDITEXT(4 PSEED+23*, PSEED+24*
HDITEXT(5 PSEED+25*
HDITEXT(6 PSEED+26*
HDITEXT(7 PSEED+27*
HDITEXT(8 PSEED+28*
HDITEXT(9 PSEED+29*
MSG PSEED+1~, PSEED+4*, PSEED+33*, PSTDONE~, PSTDONE+3, PSTHALT~, PSTHALT+2
SUCCESS EN+1~, EN+4*, EN+5
TMP EN+1~, HDIS+1~, PSEED+1~
U PSEED+3, PSEED+28
X EN+1~
X1 EN+1~
X2 EN+1~
XMDUZ PSEED+1~, PSEED+16*
XMSUB PSEED+1~, PSEED+14*
XMTEXT PSEED+1~, PSEED+32*
XMY PSEED+1~
XMY( PSEED+17*
XMY("G.HDIS E RT NOTIFICATION@DOMAIN.EXT" , PSEED+15*
XMZ PSEED+1~, PSEED+33
XPROD PSEED+1~, PSEED+12*, PSEED+14, PSEED+22
XUMF DUMSEED+10~, DUMSEED+11*
Y EN+1~, PSEED+24~*
ZTDESC EN+1~
ZTDTH EN+1~
ZTRTN EN+1~

Marked Items

Name Field # of Occurrence
$T(@DGDTAG+DGDATLN DUMSEED+12
Info |  Source |  Call Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All