Routine: AUM17

Entry Points

Name	Comments	DBIA/ICR reference
PRE	; EP - PRE-INSTALL
VCHK(AUMPRE,AUMVER,AUMPAT)	; Check patch level
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)	;
POST	; EP - POST-INSTALL

Name	Field # of Occurrence
POST^AUM17D	POST+2
IX^DIC	AUM17+16
$$CJ^XLFSTR	AUM17+7, AUM17+8, AUM17+11, AUM17+18, AUM17+19, AUM17+23, AUM17+24, SORRY+3, DISP+6
$$VERSION^XPDUTL	AUM17+10, VCHK+2, LAST+3

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"DUZ UNDEFINED OR 0." Line Location: AUM17+3
Function Call: WRITE	Prompt: !,"DUZ(0) UNDEFINED OR NULL." Line Location: AUM17+4
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR("Hello, "_$P(X,",",2)_" "_$P(X,","),IOM) Line Location: AUM17+7
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: AUM17+8
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR("Need AICD v4.0.....AICD v"_AUMAICD_" Present"_$S(AUMAICD<4:" *FIX IT*",1:""),IOM) Line Location: AUM17+11
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: AUM17+18
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR("One entry needs to be deleted.",IOM) Line Location: AUM17+19
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR("FIX IT! Before Proceeding.",IOM),!!,7,7,*7 Line Location: AUM17+23
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR("ENVIRONMENT OK.",IOM) Line Location: AUM17+24
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: DISP+6
Routine Call	DIC Line Location: AUM17+16

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

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

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

Name	Field # of Occurrence
AUMAICD	AUM17+10~*, AUM17+11
AUMDT	POST+1~*
AUMI	PRE+1~, PRE+3, PRE+4
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	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	AUM17+15*
DA	AUM17+14~
DIC	AUM17+14~, AUM17+15*
DIC(0	AUM17+15*
DIFQ	SORRY+1!, VCHK+3!, VCHK+6!
DUZ	AUM17+3, AUM17+6
DUZ(0	AUM17+4
IOM	AUM17+7, AUM17+8, AUM17+11, AUM17+18, AUM17+19, AUM17+23, AUM17+24, SORRY+3, DISP+6
LATEST	LAST+2~, LAST+6, LAST+8, LAST+9, LAST+10
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
SUBIEN	LAST+2~, LAST+6, LAST+7, LAST+8, LAST+9
U	AUM17+6, LAST+8, LAST+9, LAST+10
VER	LAST~, LAST+3*, LAST+5
VERIEN	LAST+2~, LAST+5*, LAST+7, LAST+8, LAST+9
X	AUM17+6, AUM17+7, AUM17+15, SORRY~, SORRY+2
>> XPDQUIT	AUM17+10, AUM17+12, AUM17+23, SORRY+2*
>> Y	AUM17+17

Name	Field # of Occurrence
$T(	AUM17+8