Routine: AUM13EN

Package	Total	Call Graph
IHS VA Utilities	2	$$DIR^XBDIR ^XBFMK
Kernel	2	$$CJ^XLFSTR ($$VERSION,BMES,MES)^XPDUTL
Table Maintenance	1	UPDATE^AUM131
VA Fileman	1	ENALL^DIK

Package	Total	Caller Graph
Table Maintenance	1	AUM131

Entry Points

Name	Comments	DBIA/ICR reference
PRE	; EP - PRE-INSTALL ; RE-XREF ^ICD9
RSLT(%,LINE)	; EP - INSTALL MESSAGES
VCHK(AUMPRE,AUMVER,AUMQUIT)	; Check versions needed. ;
LAST(PKG,VER)	; EP - returns last patch applied for a Package, PATCH^DATE ; Patch includes Seq # if Released
SORRY(X)	;
POST	; EP - POST-INSTALL
VCHK2(AUMPRE,AUMVER,AUMQUIT)	; Check patch level

Name	Field # of Occurrence
UPDATE^AUM131	POST+1
ENALL^DIK	PRE+9, PRE+18
$$DIR^XBDIR	SORRY+3
^XBFMK	PRE+6, PRE+15
$$CJ^XLFSTR	AUM13EN+8, AUM13EN+9, AUM13EN+20, SORRY+3, VCHK+4, VCHK+5, VCHK2+3, VCHK2+5, VCHK2+6
$$VERSION^XPDUTL	VCHK+3, VCHK2+2, LAST+3
BMES^XPDUTL	RSLT+1
MES^XPDUTL	RSLT+2

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"DUZ UNDEFINED OR 0." Line Location: AUM13EN+3
Function Call: WRITE	Prompt: !,"DUZ(0) UNDEFINED OR NULL." Line Location: AUM13EN+5
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR("Hello, "_$P(X,",",2)_" "_$P(X,","),IOM) Line Location: AUM13EN+8
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR("Checking Environment for "_$P($T(+2),";",4)_" V "_$P($T(+2),";",3)_".",IOM) Line Location: AUM13EN+9
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR("ENVIRONMENT OK.",IOM) Line Location: AUM13EN+20
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR("Need at least "_AUMPRE_" v "_AUMVER_"....."_AUMPRE_" v "_AUMV_" Present",IOM) Line Location: VCHK+4
Function Call: WRITE	Prompt: 7,!,$$CJ^XLFSTR("^^^^NEEDS FIXED*^^^^",IOM) Line Location: VCHK+5
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR("Need at least "_AUMPRE_" v "_AUMVER_"....."_AUMPRE_" Not Installed",IOM),7,!,$$CJ^XLFSTR("^^^^NEEDS TO BE FIXED*^^^^",IOM) Line Location: VCHK2+3
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR("Need at least "_AUMPRE_" v "_AUMVER_"....."_AUMPRE_" v "_AUMV_DPTCH_" Present",IOM) Line Location: VCHK2+5
Function Call: WRITE	Prompt: 7,!,$$CJ^XLFSTR("^^^^NEEDS TO BE FIXED*^^^^",IOM) Line Location: VCHK2+6

FileNo	Call Tags
^ICD9 - [#80]	Classic Fileman Calls
^ICD0 - [#80.1]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^AUMDATA - [#9003103]	PRE+20!
^AUMDATA(0	PRE+21*
^DIC(9.4 - [#9.4]	LAST+4, LAST+5, LAST+7, LAST+8, LAST+9
^VA(200 - [#200]	AUM13EN+7

Name	Field # of Occurrence
^(0	LAST+8, LAST+9

Name	Field # of Occurrence
%	RSLT~, RSLT+1, RSLT+2
>> AUMK	PRE+2, PRE+3, PRE+4, PRE+5, PRE+11, PRE+12, PRE+13, PRE+14
AUMPRE	VCHK~, VCHK+3, VCHK+4, VCHK2~, VCHK2+2, VCHK2+3, VCHK2+4, VCHK2+5
AUMQUIT	AUM13EN+11*, VCHK~, VCHK+5, VCHK2~, VCHK2+3, VCHK2+6
AUMV	VCHK+2~, VCHK+3, VCHK+4, VCHK+5, VCHK2+1~, VCHK2+2, VCHK2+3, VCHK2+4, VCHK2+5, VCHK2+6
AUMVER	VCHK~, VCHK+4, VCHK+5, VCHK2~, VCHK2+3, VCHK2+5, VCHK2+6
>> CNT	PRE+20, PRE+21
DIFQ	SORRY+1!, VCHK2+6!
>> DIK	PRE+7, PRE+16
>> DIK(1	PRE+8, PRE+17
>> DPTCH	VCHK2+4*, VCHK2+5
DUZ	AUM13EN+3, AUM13EN+7
DUZ(0	AUM13EN+5
IOM	AUM13EN+8, AUM13EN+9, AUM13EN+20, SORRY+3, VCHK+4, VCHK+5, VCHK2+3, VCHK2+5, VCHK2+6
LATEST	LAST+2~, LAST+6, LAST+8, LAST+9, LAST+10
LINE	RSLT~, RSLT+1, RSLT+2
PATCH	LAST+2~, LAST+6, LAST+8, LAST+9*, LAST+10
PKG	LAST~, LAST+3, LAST+4
PKGIEN	LAST+2~, LAST+4*, LAST+5, LAST+7, LAST+8, LAST+9
>> PTCH	VCHK2+4*, VCHK2+6
SUBIEN	LAST+2~, LAST+6, LAST+7, LAST+8, LAST+9
U	AUM13EN+7, LAST+8, LAST+9, LAST+10
VER	LAST~, LAST+3*, LAST+5
VERIEN	LAST+2~, LAST+5*, LAST+7, LAST+8, LAST+9
X	AUM13EN+7*, AUM13EN+8, SORRY~, SORRY+2
>> XPDQUIT	AUM13EN+11, AUM13EN+18, SORRY+2, VCHK+5, VCHK2+3, VCHK2+6*
>> ZTQUEUED	SORRY+3

Name	Field # of Occurrence
$T(	AUM13EN+9