Routine: DG531075P

Package	Total	Call Graph
VA FileMan	4	DELIX^DDMOD $$FIND1^DIC (FILE,UPDATE)^DIE DIEZ^DIKCUTL3
Kernel	1	(BMES,MES)^XPDUTL
Toolkit	1	EN^XPAR

Entry Points

Name	Comments	DBIA/ICR reference
QUIT	;No direct entry
HELP	; Help for ?? on Installation Question POS1 (use direct writes in env check routine)
ENV	;Main entry point for Environment check
PRE	;Main entry point for Pre-Install items
PRE1	; ;Remove non-SAC compliant trigger on ELIGIBILITY field #.01 of PATIENT ELIGIBILITIES subfile #361 for PATIENT file #2 ; ^^TRIGGER^2.0361^.03 ; The patch DG5.31075 will replace this with an updated trigger
POST	;Main entry point for Post-Install items
POST1	; Modify port/host DG EE SUMMARY SERVER and SEVICE ; ICRs: ; 7190 : Read access to file 18.02 ; 7191 : R/W access to file 18.12
SERVER(DGIEN)	; Modify the web server
DISABLE(DGIEN)	; Get the DG EE SUMMARY server IEN and disable it - update of server will set it back to enabled (except for Pre-prod)
POST2	; Set the parameter to Date/Time
POST3	; Add HUD-VASH eligibility to file #8
POST4	; Recompile all input templates for fields that were modified ; - ELIGIBILITY (#.01) field of the PATIENT ELIGIBILITIES (#361) subfile of the PATIENT (#2) file
TYPEMAP	; Map the system type to the SERVER endpoint and Port values

Name	Field # of Occurrence
DELIX^DDMOD	PRE1+9
$$FIND1^DIC	POST1+9, POST3+4, POST3+10
FILE^DIE	SERVER+23, DISABLE+4
UPDATE^DIE	POST3+23
DIEZ^DIKCUTL3	POST4+13
EN^XPAR	POST2+4
BMES^XPDUTL	PRE+1, PRE+3, PRE1+4, POST+2, POST+7, POST1+6, POST1+11, SERVER+7, SERVER+25, SERVER+26 , SERVER+27, DISABLE+5, POST2+2, POST2+6, POST3+3, POST3+6, POST3+11, POST3+24, POST3+26, POST4+4
MES^XPDUTL	PRE1+5, PRE1+6, POST1+12, POST1+13, POST1+14, POST2+3, POST2+7, POST2+8, POST2+9, POST3+7 , POST3+8, POST3+9, POST3+27, POST3+28, POST3+29, POST4+5, POST4+6

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Enter 1 if patch is being installed in a Pre-Production (Mirror) system." Line Location: HELP+1
Function Call: WRITE	Prompt: !,"Enter 2 if patch is being installed in a Software Quality Assurance system." Line Location: HELP+2
Function Call: WRITE	Prompt: !,"Enter 3 if patch is being installed in a Development system." Line Location: HELP+3
Routine Call	DIC Line Location: POST1+9 POST3+4 POST3+10
Routine Call	DIE Line Location: SERVER+23 DISABLE+4
Routine Call	DIE Line Location: POST3+23

Name	Field # of Occurrence
DGCOUNT	SERVER+1~, SERVER+10*
DGDATA	SERVER+1~, SERVER+10*, SERVER+11
DGEC	POST3+1~, POST3+2*, POST3+4, POST3+10, POST3+13, POST3+18, POST3+20
DGEPT	SERVER+1~, SERVER+11*, SERVER+16
DGERR	POST2+1~, POST2+4, POST2+5, POST2+7, POST3+1~, POST3+24, POST3+25
DGERR12	SERVER+2~, DISABLE+1~
DGERR12("DIERR"	SERVER+24, SERVER+27
DGEXIT	SERVER+1~, SERVER+8, SERVER+10, SERVER+11
DGFDA	POST3+1~
DGFDA(8	POST3+13, POST3+14, POST3+15, POST3+16, POST3+17, POST3+18, POST3+19, POST3+20, POST3+21, POST3+22
DGFIELD	PRE1+7~, PRE1+8*, PRE1+9
DGFILE	PRE1+7~, PRE1+8*, PRE1+9
DGFLD	POST4+3~, POST4+13
DGFLD(	POST4+12*
DGIEN	POST1+5~, POST1+9*, POST1+10, POST1+17, POST1+19, SERVER~, SERVER+12, DISABLE~, DISABLE+3
DGIENS	SERVER+2~, SERVER+12*, SERVER+14, SERVER+16, SERVER+19, SERVER+21
DGPH	POST3+1~, POST3+4*, POST3+5
DGPORT	SERVER+1~, SERVER+11*, SERVER+14, SERVER+21
DGREF	PRE1+7~, PRE1+8*, PRE1+9
DGSERVER	SERVER+2~, DISABLE+1~
DGSERVER(	SERVER+14, SERVER+16, SERVER+19, SERVER+21, DISABLE+3*
DGSERVICE	SERVER+2~
DGSRVR	POST1+5~, POST1+7*, POST1+9, SERVER+25, SERVER+26, SERVER+27, DISABLE+5
DGTYPE	SERVER+1~, SERVER+4, SERVER+6, SERVER+7, SERVER+11, SERVER+19, SERVER+25
>> XPDQUES("POS1"	SERVER+4

Name	Field # of Occurrence
$T(TYPEMAP+DGCOUNT	SERVER+10