Routine: AMH40P3

Package	Total	Call Graph
VA Fileman	4	(,IX)^DIC FILE^DICN ^DIE ^DIK
Kernel	3	$$CJ^XLFSTR $$ADD^XPDMENU ($$VERSION,MES)^XPDUTL
IHS VA Utilities	1	^XBFMK
M Transfer	1	GUIEP^BMXPO

Entry Points

Name	Comments	DBIA/ICR reference
PRE	;
IMES	;
CLEAN(APP)	;-- clean out the RPC multiple first
MENU	;add export option to menu
SORRY(X)	;
ENV	;EP
POST	;EP
BMXPO	;-- update the RPC file
ZISH	;create entry in ZISH SEND PARAMETERS file
INSTALLD(AMHSTAL)	;EP - Determine if patch AMHSTAL was installed, where ; APCLSTAL is the name of the INSTALL. E.g "AG6.011".

Name	Field # of Occurrence
GUIEP^BMXPO	BMXPO+5
^DIC	INSTALLD+9, INSTALLD+12
IX^DIC	INSTALLD+6
FILE^DICN	ZISH+5
^DIE	POST+5, ZISH+8
^DIK	PRE+1, ZISH+4, CLEAN+6
^XBFMK	ZISH+1
$$CJ^XLFSTR	ENV+2, ENV+3, ENV+4, ENV+5, ENV+6, ENV+7, IMES+1, SORRY+4
$$ADD^XPDMENU	MENU+2
$$VERSION^XPDUTL	ENV+2, ENV+4, ENV+6
MES^XPDUTL	ENV+2, ENV+3, ENV+4, ENV+5, ENV+6, ENV+7, IMES+1

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"error creating ZISH SEND PARAMETERS entry" Line Location: ZISH+6
Function Call: WRITE	Prompt: !!,"error updating ZISH SEND PARAMETERS entry" Line Location: ZISH+9
Function Call: WRITE	Prompt: *7,!,$$CJ^XLFSTR("Sorry....FIX IT!",IOM) Line Location: SORRY+4
Routine Call	DIE Line Location: POST+5 ZISH+8
Routine Call	DIC Line Location: INSTALLD+9 INSTALLD+12
Routine Call	DIC Line Location: INSTALLD+6

Name	Line Occurrences (* Changed, ! Killed)
^%ZIB(9888888.93 - [#9888888.93]	ZISH+3
^AMHRECD - [#9002014.1]	PRE+1
^AMHSITE - [#9002013]	POST+3, POST+4
^DIC(19 - [#19]	BMXPO+2, CLEAN+4, CLEAN+7!

Name	Field # of Occurrence
AMHDA	CLEAN+3~, CLEAN+4*, CLEAN+5
AMHRPC	BMXPO+1~, BMXPO+2*, BMXPO+3, BMXPO+4, BMXPO+5
AMHSTAL	INSTALLD~, INSTALLD+4, INSTALLD+8, INSTALLD+11, IMES+1
>> AMHX	POST+3*, POST+4, POST+5
AMHY	INSTALLD+3~, INSTALLD+13*, INSTALLD+15
>> APCLY	ZISH+3*, ZISH+4
APP	CLEAN~, CLEAN+1, CLEAN+4, CLEAN+7
>> D	INSTALLD+5*
D0	ZISH+1!
DA	PRE+1, PRE+2!, POST+5!, ZISH+4!, ZISH+7, CLEAN+5*
DA(1	CLEAN+1*, CLEAN+2
DD	ZISH+1!
DIADD	ZISH+1!
DIC	ZISH+1!, ZISH+5, INSTALLD+3~, INSTALLD+5, INSTALLD+8, INSTALLD+11
DIC(0	ZISH+5, INSTALLD+5
DIE	POST+5!, ZISH+7
DIFQ	SORRY+1!
DIK	PRE+1, PRE+2!, ZISH+4!, CLEAN+2*
DLAYGO	ZISH+1!
DO	ZISH+1!
DR	POST+5!, ZISH+7
IOM	IMES+1, SORRY+4
>> RETVAL	BMXPO+5
U	POST+4
X	ENV+1, MENU+1~, MENU+2, ZISH+5, INSTALLD+3~, INSTALLD+4, INSTALLD+8, INSTALLD+11, SORRY~, SORRY+2 , SORRY+3
>> XPDDIQ(	ENV+1*
>> XPDQUIT	SORRY+2, SORRY+3
Y	ZISH+6, ZISH+7, ZISH+9, INSTALLD+3~, INSTALLD+7, INSTALLD+8, INSTALLD+10, INSTALLD+11, INSTALLD+13, IMES+1