Routine: ADE60P14

Call Graph

Package	Total	Call Graph
IHS Dental System	5	PREINST^ADE60P12 ^ADECD4 ^ADECD44 ^ADECD45 ^ADECD46
Kernel	4	HOME^%ZIS ENDR^%ZISS $$CJ^XLFSTR ($$VERSION,BMES)^XPDUTL
VA Fileman	2	(,IX)^DIC $$GET1^DIQ

Package	Total	Caller Graph
IHS Dental System	2	ADE60P15 ADE60P16

Name	Comments	DBIA/ICR reference
VCHK(ADEPRE,ADEVER,ADEQUIT,ADECOMP)	; Check versions needed. ;
INSTALLD(ADE)	; Determine if patch ADE was installed, where ADE is ; the name of the INSTALL. E.g "AVA93.212".
SORRY(X)	;
ENV	;Environment check
PREINST	;EP Pre-install -- Do previous patches as needed
POST	;EP Post-Install

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"DUZ UNDEFINED OR 0." Line Location: ENV+3
Function Call: WRITE	Prompt: !,"DUZ(0) UNDEFINED OR NULL." Line Location: ENV+5
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR("Hello, "_$P(X,",",2)_" "_$P(X,","),IOM) Line Location: ENV+10
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR("Checking Environment...",IOM) Line Location: ENV+11
Function Call: WRITE	Prompt: !!,7,7,$$CJ^XLFSTR("You Have More Than One Entry In The",IOM),!,$$CJ^XLFSTR("PACKAGE File with an ""ADE"" prefix.",IOM) Line Location: ENV+23
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR(IORVON_"One entry needs to be deleted."_IORVOFF,IOM) Line Location: ENV+24
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR("Need "_$S(ADECOMP="<":"at least ",1:"")_ADEPRE_" v "_ADEVER_"....."_ADEPRE_" v "_ADEV_" Present",IOM) Line Location: VCHK+4
Function Call: WRITE	Prompt: *7,!,$$CJ^XLFSTR("Sorry....Please fix it.",IOM) Line Location: SORRY+3
Routine Call	%ZIS Line Location: ENV+1
Routine Call	DIC Line Location: INSTALLD+11 INSTALLD+15
Routine Call	DIC Line Location: ENV+21 INSTALLD+7

FileNo	Call Tags
^VA(200 - [#200]	GET1^DIQ
^DIC(9.4 - [#9.4]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DIC(9.4 - [#9.4]	ENV+22

Name	Field # of Occurrence
ADE	INSTALLD~, INSTALLD+5, INSTALLD+10, INSTALLD+14
ADECOMP	VCHK~, VCHK+4, VCHK+5
ADEPRE	VCHK~, VCHK+3, VCHK+4
ADEQUIT	VCHK~, VCHK+5
ADEV	VCHK+2~, VCHK+3*, VCHK+4, VCHK+5
ADEVER	VCHK~, VCHK+4, VCHK+5
>> D	ENV+20, INSTALLD+6
DA	ENV+19~
DIC	ENV+19~, ENV+20, INSTALLD+3~, INSTALLD+6, INSTALLD+10, INSTALLD+14
DIC(0	ENV+20, INSTALLD+6
DIFQ	SORRY+1!
DUZ	ENV+3, ENV+9
DUZ(0	ENV+5, ENV+7
IOM	ENV+1, ENV+10, ENV+11, ENV+23, ENV+24, VCHK+4, SORRY+3
IORVOFF	ENV+13~, ENV+24
IORVON	ENV+13~, ENV+24
X	ENV+9, ENV+10, ENV+14, ENV+20, SORRY~, SORRY+2, INSTALLD+3~, INSTALLD+5, INSTALLD+10, INSTALLD+14
>> XPDQUIT	SORRY+2*
Y	ENV+22, INSTALLD+3~, INSTALLD+8, INSTALLD+10, INSTALLD+12, INSTALLD+14, INSTALLD+16
>> ZTQUEUED	ENV+7