Routine: AUTP8

Package	Total	Call Graph
IHS VA Utilities	3	$$DIR^XBDIR $$C^XBFUNC MAIL^XBMAIL
Kernel	1	($$VERSION,BMES)^XPDUTL
VA Fileman	1	IX^DIC

Entry Points

Name	Comments	DBIA/ICR reference
PRE	;EP - From KIDS.
POST	;EP - From KIDS.
SAVE	; Save first few lines of install message into tmp global.
SORRY(X)	;

Name	Field # of Occurrence
IX^DIC	AUTP8+27
$$DIR^XBDIR	AUTP8+33, AUTP8+53, AUTP8+55, AUTP8+59, SORRY+4
$$C^XBFUNC	AUTP8+10, AUTP8+11, AUTP8+14, AUTP8+18, AUTP8+22, AUTP8+29, AUTP8+30, AUTP8+31, AUTP8+35, AUTP8+49 , SORRY+4
MAIL^XBMAIL	POST+5
$$VERSION^XPDUTL	AUTP8+13, AUTP8+17, AUTP8+21
BMES^XPDUTL	PRE+2, PRE+3, POST+1, POST+2, POST+8

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"DUZ UNDEFINED OR 0." Line Location: AUTP8+3
Function Call: WRITE	Prompt: !,"DUZ(0) UNDEFINED OR NULL." Line Location: AUTP8+5
Function Call: WRITE	Prompt: !!,$$C^XBFUNC("Hello, "_$P(X,",",2)_" "_$P(X,",")) Line Location: AUTP8+10
Function Call: WRITE	Prompt: !!,$$C^XBFUNC("Checking Environment for "_$P($T(+2),";",4)_" V "_$P($T(+2),";",3)_" Patch "_$P($T(+2),";",5)_".") Line Location: AUTP8+11
Function Call: WRITE	Prompt: !!,$$C^XBFUNC("Need AUT v 98.1.....AUT v "_X_" Present") Line Location: AUTP8+14
Function Call: WRITE	Prompt: !,$$C^XBFUNC("Need at least FileMan 21.....FileMan "_X_" Present") Line Location: AUTP8+18
Function Call: WRITE	Prompt: !,$$C^XBFUNC("Need at least Kernel 8.....Kernel "_X_" Present") Line Location: AUTP8+22
Function Call: WRITE	Prompt: !!,7,7,$$C^XBFUNC("You Have More Than One Entry In The"),!,$$C^XBFUNC("PACKAGE File with an ""AUT"" prefix.") Line Location: AUTP8+29
Function Call: WRITE	Prompt: !,$$C^XBFUNC("One entry needs to be deleted.") Line Location: AUTP8+30
Function Call: WRITE	Prompt: !,$$C^XBFUNC("FIX IT! Before Proceeding."),!!,7,7,*7 Line Location: AUTP8+31
Function Call: WRITE	Prompt: !,$$C^XBFUNC("No 'AUT' dups in PACKAGE file") Line Location: AUTP8+35
Function Call: WRITE	Prompt: !!,$$C^XBFUNC("ENVIRONMENT OK.") Line Location: AUTP8+49
Function Call: WRITE	Prompt: !,^(%,0) Line Location: AUTP8+55
Routine Call	DIC Line Location: AUTP8+27

FileNo	Call Tags
^DIC(9.4 - [#9.4]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("DEL"	POST+7
^%ZOSF("SAVE"	SAVE+12
^DIC(9.4 - [#9.4]	AUTP8+28, AUTP8+41, AUTP8+42
^TMP("AUTP8MSG"	SAVE+1!, SAVE+2, SAVE+3, SAVE+4, SAVE+5, SAVE+6, SAVE+9, SAVE+13!
^VA(200 - [#200]	AUTP8+9
^XTMP("XPDI"	AUTP8+52, AUTP8+55, SAVE+8, SAVE+9

Name	Line Occurrences
SAVE	POST+3
SORRY	AUTP8+3, AUTP8+5, AUTP8+7, AUTP8+15, AUTP8+19, AUTP8+23, AUTP8+32, AUTP8+59

Name	Field # of Occurrence
^(	AUTP8+55, SAVE+9

Name	Field # of Occurrence
>> %	AUTP8+42, AUTP8+54, AUTP8+55, SORRY+3, SAVE+9*
B	AUTP8+51~, AUTP8+52, AUTP8+53, AUTP8+55, AUTP8+57!, SAVE+7~, SAVE+8, SAVE+9, SAVE+10!
>> D	AUTP8+26*
DA	AUTP8+25~, AUTP8+39~, AUTP8+41*, AUTP8+42
DA(1	AUTP8+40*, AUTP8+41, AUTP8+42
DIC	AUTP8+25~, AUTP8+26*
DIC(0	AUTP8+26*
DIE	SAVE+7~, SAVE+11*
DIFQ	SORRY+1!
DIFROM	POST+4~
DUZ	AUTP8+3, AUTP8+9
DUZ(0	AUTP8+5, AUTP8+7
U	AUTP8+9
X	AUTP8+9, AUTP8+10, AUTP8+13, AUTP8+14, AUTP8+15, AUTP8+17, AUTP8+18, AUTP8+19, AUTP8+21, AUTP8+22 , AUTP8+23, AUTP8+26, SORRY~, SORRY+2, POST+6, SAVE+11*
XCM	SAVE+7~
XCN	SAVE+7~, SAVE+11*
>> XPDA	AUTP8+52, AUTP8+55
>> XPDDIQ("XPZ1"	AUTP8+47*
>> XPDDIQ("XPZ2"	AUTP8+47*
>> XPDENV	AUTP8+38, AUTP8+47
>> XPDQUIT	SORRY+2*
>> XPDQUIT("AUT98.1"	AUTP8+42, SORRY+3
>> Y	AUTP8+28, AUTP8+40
>> ZTQUEUED	AUTP8+7, SORRY+4

Name	Field # of Occurrence
$T(	AUTP8+11, SAVE+3, SAVE+5