Routine: BGU15E

Package	Total	Call Graph
GUI Generic Tools	2	^BGULIST2 ^BGUXUSRB
IHS VA Utilities	2	$$DIR^XBDIR $$C^XBFUNC
Kernel	2	HOME^%ZIS ($$VERSION,BMES)^XPDUTL
VA Fileman	2	DT^DICRW ^DIR

Entry Points

Name	Comments	DBIA/ICR reference
SORRY	;
VERSION	;
ENVOK	; If this is just an environ check, end here.
OTHER	;

External References

Name	Field # of Occurrence
HOME^%ZIS	BGU15E+10
^BGULIST2	OTHER+5
^BGUXUSRB	OTHER+3, OTHER+4
DT^DICRW	BGU15E+10
^DIR	ENVOK+12
$$DIR^XBDIR	VERSION+7
$$C^XBFUNC	BGU15E+12, BGU15E+13, BGU15E+14, BGU15E+17, BGU15E+21, BGU15E+26, VERSION+4, VERSION+5, OTHER+3, OTHER+4 , OTHER+5, ENVOK+1, SORRY+3, SORRY+4, SORRY+5, SORRY+6, SORRY+7
$$VERSION^XPDUTL	BGU15E+24
BMES^XPDUTL	SORRY+9, SORRY+10, SORRY+11, SORRY+12, SORRY+13, SORRY+14

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"DUZ UNDEFINED OR 0." Line Location: BGU15E+6
Function Call: WRITE	Prompt: !,"DUZ(0) UNDEFINED OR NULL." Line Location: BGU15E+8
Function Call: WRITE	Prompt: !,$$C^XBFUNC("Who are you????") Line Location: BGU15E+12
Function Call: WRITE	Prompt: !,$$C^XBFUNC("Hello, "_$P(X,",",2)_" "_$P(X,",")) Line Location: BGU15E+13
Function Call: WRITE	Prompt: !!,$$C^XBFUNC("Checking Environment for Beta Install of Version "_$P($T(+2),";",3)_" of "_$P($T(+2),";",4)_".") Line Location: BGU15E+14
Function Call: WRITE	Prompt: !!,$$C^XBFUNC("Need at least FileMan 22.....FileMan "_X_" Present") Line Location: BGU15E+17
Function Call: WRITE	Prompt: !!,$$C^XBFUNC("Need at least Kernel 8.0.....Kernel "_X_" Present") Line Location: BGU15E+21
Function Call: WRITE	Prompt: !!,$$C^XBFUNC(XPX_" 1.5....."_XPX_" "_X_" Present") Line Location: BGU15E+26
Function Call: WRITE	Prompt: !,$$C^XBFUNC($P(^XTMP("XPDI",XPDST,"BLD",XPDBLD,0),U,1)_" "_$P(^XTMP("XPDI",XPDST,"BLD",XPDBLD,0),U,2)_" Cannot Be Installed Unless") Line Location: VERSION+4
Function Call: WRITE	Prompt: !,$$C^XBFUNC("File 200 PCC Conversion Has Been Previously Completed.") Line Location: VERSION+5
Function Call: WRITE	Prompt: !!,"Checking for IHS RPC BROKER Patch..." Line Location: OTHER+2
Function Call: WRITE	Prompt: !!,$$C^XBFUNC("IHS RPC BROKER Version 1.5, Patch 1 Is Not Installed") Line Location: OTHER+3
Function Call: WRITE	Prompt: !!,$$C^XBFUNC("IHS RPC BROKER Version 1.5, Patch 2 Is Not Installed") Line Location: OTHER+4
Function Call: WRITE	Prompt: !!,$$C^XBFUNC("IHS RPC BROKER Version 1.5, Patch 3 Is Not Installed") Line Location: OTHER+5
Function Call: WRITE	Prompt: !!,$$C^XBFUNC("ENVIRONMENT OK.") Line Location: ENVOK+1
Function Call: WRITE	Prompt: !! Line Location: ENVOK+8
Function Call: WRITE	Prompt: *7,!!!,$$C^XBFUNC("Sorry....something is wrong with your environment") Line Location: SORRY+3
Function Call: WRITE	Prompt: !,$$C^XBFUNC("Aborting "_XPDNM_" install!") Line Location: SORRY+4
Function Call: WRITE	Prompt: !,$$C^XBFUNC("Correct error and reinstall otherwise") Line Location: SORRY+5
Function Call: WRITE	Prompt: !,$$C^XBFUNC("please print/capture this screen and notify") Line Location: SORRY+6
Function Call: WRITE	Prompt: !,$$C^XBFUNC("the Help Desk") Line Location: SORRY+7
Function Call: WRITE	Prompt: !!,LINE Line Location: SORRY+8
Routine Call	%ZIS Line Location: BGU15E+10
Routine Call	DIR Line Location: ENVOK+12

Name	Line Occurrences (* Changed, ! Killed)
^AUTTSITE(1	VERSION+2
^DD("VERSION"	BGU15E+16
^DIC(9.4 - [#9.4]	BGU15E+20
^TMP("BPCPRE"	ENVOK+14*
^VA(200 - [#200]	BGU15E+11
^XTMP("XPDI"	VERSION+2, VERSION+4

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	VERSION+2*, VERSION+3
DIFQ	SORRY+1!
>> DIR("A"	ENVOK+11*
>> DIR("B"	ENVOK+10*
>> DIR(0	ENVOK+9*
>> DIRUT	ENVOK+13
DUZ	BGU15E+6, BGU15E+11, ENVOK+14
DUZ(0	BGU15E+8
>> LINE	BGU15E+3*, SORRY+8
U	BGU15E+11, VERSION+2, VERSION+4
>> X	BGU15E+11, BGU15E+12, BGU15E+13, BGU15E+16, BGU15E+17, BGU15E+18, BGU15E+20, BGU15E+21, BGU15E+22, BGU15E+24 , BGU15E+25*, BGU15E+26, BGU15E+27
>> XPDA	VERSION+2
>> XPDABORT	BGU15E+5, ENVOK+13, SORRY+2*
>> XPDBLD	VERSION+2*, VERSION+4
>> XPDDIQ("XPZ1"	ENVOK+5*
>> XPDDIQ("XPZ2"	ENVOK+5*
>> XPDENV	ENVOK+5
>> XPDNM	SORRY+4, SORRY+11
>> XPDNOQUE	BGU15E+4*
>> XPDST	VERSION+4
>> XPX	BGU15E+6, BGU15E+8, BGU15E+12, BGU15E+18, BGU15E+22, BGU15E+24, BGU15E+26, VERSION+6, OTHER+3, OTHER+4* , OTHER+5, ENVOK+13, SORRY+10
>> Y	ENVOK+13

Customize PDF page

Package: GUI Generic Tools

Routine: BGU15E

Information

Source Information

Call Graph

Call Graph Total: 8

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items