Routine: AUMI10

Package	Total	Call Graph
Kernel	2	$$CJ^XLFSTR $$VERSION^XPDUTL
IHS VA Utilities	1	$$DIR^XBDIR
Table Maintenance	1	POST^AUMI10D
VA Fileman	1	IX^DIC

Entry Points

Name	Comments	DBIA/ICR reference
PRE	; EP FR KIDS
VCHK(AUMPRE,AUMVER,AUMPAT)	; Check patch level
GCHK(AUMGL,AUMMSG)	; Check for global
LAST(PKG,VER)	; EP - returns last patch applied for a Package, PATCH^DATE ; Patch includes Seq # if Released
DISP(AUMPRE,AUMVER,AUMPAT,AUMV,AUMP,AUMR)	; Display requirement checking results
SORRY(X)	;
PCHK(PKG,VER,PAT)	; Check specific patch
POST	; EP FR KIDS

External References

Name	Field # of Occurrence
POST^AUMI10D	POST+3
IX^DIC	AUMI10+16
$$DIR^XBDIR	AUMI10+33
$$CJ^XLFSTR	AUMI10+8, AUMI10+9, AUMI10+18, AUMI10+19, AUMI10+23, AUMI10+25, SORRY+3, GCHK+5, PCHK+9, DISP+6
$$VERSION^XPDUTL	VCHK+2, LAST+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"DUZ UNDEFINED OR 0." Line Location: AUMI10+3
Function Call: WRITE	Prompt: !,"DUZ(0) UNDEFINED OR NULL." Line Location: AUMI10+5
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR("Hello, "_$P(X,",",2)_" "_$P(X,","),IOM) Line Location: AUMI10+8
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR("Checking Environment for "_$P($T(+2),";",4)_" V "_$P($T(+2),";",3)_$S($L($P($T(+2),";",5))>4:" Patch "_$P($T(+2),";",5),1:"")_".",IOM),! Line Location: AUMI10+9
Function Call: WRITE	Prompt: !!,7,7,$$CJ^XLFSTR("You Have More Than One Entry In The",IOM),!,$$CJ^XLFSTR("PACKAGE File with an ""AUM"" prefix.",IOM) Line Location: AUMI10+18
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR("One entry needs to be deleted.",IOM) Line Location: AUMI10+19
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR("FIX IT! Before Proceeding.",IOM),!!,7,7,*7 Line Location: AUMI10+23
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR("ENVIRONMENT OK.",IOM) Line Location: AUMI10+25
Function Call: WRITE	Prompt: *7,!,$$CJ^XLFSTR("Sorry....FIX IT!",IOM) Line Location: SORRY+3
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR(AUMS,IOM) Line Location: GCHK+5
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR(AUMS,IOM) Line Location: PCHK+9
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR(AUMS,IOM) Line Location: DISP+6
Routine Call	DIC Line Location: AUMI10+16

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUMDATA - [#9003103]	PRE+2!
^AUMDATA(0	PRE+3*
^DIC(9.4 - [#9.4]	AUMI10+17, PCHK+5, PCHK+6, PCHK+7, LAST+4, LAST+5, LAST+7, LAST+8, LAST+9
^TMP("AUM"	POST+1!, POST+2*, POST+4!
^VA(200 - [#200]	AUMI10+7

Label References

Name	Line Occurrences
$$LAST	VCHK+5
$$VCHK	AUMI10+11, AUMI10+12
DISP	VCHK+3, VCHK+4, VCHK+6, VCHK+7
SORRY	AUMI10+3, AUMI10+5, AUMI10+20, AUMI10+33

Naked Globals

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

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AUMGL	GCHK~, GCHK+1, GCHK+3, GCHK+4, GCHK+6
AUMI	PRE+1~, PRE+2, PRE+3
AUMMSG	GCHK~, GCHK+3
AUMP	VCHK+1~, VCHK+3, VCHK+4, VCHK+5*, VCHK+6, VCHK+7, DISP~, DISP+4
AUMPAT	VCHK~, VCHK+3, VCHK+4, VCHK+6, VCHK+7, DISP~, DISP+3
AUMPRE	VCHK~, VCHK+2, VCHK+3, VCHK+4, VCHK+5, VCHK+6, VCHK+7, DISP~, DISP+3, DISP+4
AUMR	DISP~, DISP+5
AUMS	GCHK+2~, GCHK+3, GCHK+4, GCHK+5, PCHK+1~, PCHK+3, PCHK+8, PCHK+9, DISP+2~, DISP+3* , DISP+4, DISP+5, DISP+6
AUMV	VCHK+1~, VCHK+2*, VCHK+3, VCHK+4, DISP~, DISP+4
AUMVER	VCHK~, VCHK+3, VCHK+4, VCHK+5, VCHK+6, VCHK+7, DISP~, DISP+3
>> D	AUMI10+15*
DA	AUMI10+14~
DIC	AUMI10+14~, AUMI10+15*
DIC(0	AUMI10+15*
DIFQ	SORRY+1!, VCHK+3!, VCHK+6!
DUZ	AUMI10+3, AUMI10+7
DUZ(0	AUMI10+5
IOM	AUMI10+8, AUMI10+9, AUMI10+18, AUMI10+19, AUMI10+23, AUMI10+25, SORRY+3, GCHK+5, PCHK+9, DISP+6
LATEST	LAST+2~, LAST+6, LAST+8, LAST+9, LAST+10
PAT	PCHK~, PCHK+2*, PCHK+3, PCHK+7
PATCH	LAST+2~, LAST+6, LAST+8, LAST+9*, LAST+10
PATIEN	PCHK+1~, PCHK+7*, PCHK+8, PCHK+10
PKG	PCHK~, PCHK+2*, PCHK+3, PCHK+5, LAST~, LAST+3, LAST+4
PKGIEN	PCHK+1~, PCHK+5, PCHK+6, PCHK+7, LAST+2~, LAST+4, LAST+5, LAST+7, LAST+8, LAST+9
SUBIEN	LAST+2~, LAST+6, LAST+7, LAST+8, LAST+9
U	AUMI10+7, LAST+8, LAST+9, LAST+10
VER	PCHK~, PCHK+2, PCHK+3, PCHK+6, LAST~, LAST+3, LAST+5
VERIEN	PCHK+1~, PCHK+6, PCHK+7, LAST+2~, LAST+5, LAST+7, LAST+8, LAST+9
X	AUMI10+7, AUMI10+8, AUMI10+15, SORRY~, SORRY+2
>> XPDDIQ("XPZ1"	AUMI10+30*
>> XPDDIQ("XPZ2"	AUMI10+30*
>> XPDENV	AUMI10+27
>> XPDNM	POST+2
>> XPDQUIT	AUMI10+11, AUMI10+12, AUMI10+23, SORRY+2*
>> Y	AUMI10+17

Marked Items

Customize PDF page

Package: Table Maintenance

Routine: AUMI10

Information

Source Information

Call Graph

Call Graph Total: 5

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items