Routine: AICD41

Package	Total	Call Graph
Kernel	3	HOME^%ZIS $$CJ^XLFSTR $$VERSION^XPDUTL

Entry Points

Name	Comments	DBIA/ICR reference
PRE	; EP FR KIDS
LAST(PKG,VER)	; EP - returns last patch applied for a Package, PATCH^DATE ; Patch includes Seq # if Released
VCHK(AICDPRE,AICDVER,AICDPAT)	; Check patch level
DISP(AICDPRE,AICDVER,AICDPAT,AICDV,AICDP,AICDR)	; Display requirement checking results
SORRY(X)	; Environment check failure message
PCHK(PKG,VER,PAT)	; Check specific patch
GCHK(AICDGL,AICDMSG)	; Check for global
POST	; EP FR KIDS

Name	Field # of Occurrence
HOME^%ZIS	AICD41+4
$$CJ^XLFSTR	AICD41+16, AICD41+17, AICD41+29, SORRY+3, GCHK+5, PCHK+9, DISP+5
$$VERSION^XPDUTL	VCHK+2, LAST+3

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"DUZ UNDEFINED OR 0." Line Location: AICD41+11
Function Call: WRITE	Prompt: !,"DUZ(0) UNDEFINED OR NULL." Line Location: AICD41+13
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR("Hello, "_$P(X,",",2)_" "_$P(X,","),IOM) Line Location: AICD41+16
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: AICD41+17
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR("FIX IT! Before Proceeding.",IOM),!!,7,7,*7 Line Location: AICD41+29
Function Call: WRITE	Prompt: *7,!,$$CJ^XLFSTR("Sorry....FIX IT!",IOM) Line Location: SORRY+3
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR(AICDS,IOM) Line Location: GCHK+5
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR(AICDS,IOM) Line Location: PCHK+9
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR(AICDS,IOM) Line Location: DISP+5
Routine Call	%ZIS Line Location: AICD41+4

Name	Line Occurrences (* Changed, ! Killed)
^DIC(9.4 - [#9.4]	PCHK+5, PCHK+6, PCHK+7, LAST+4, LAST+5, LAST+7, LAST+8, LAST+9
^VA(200 - [#200]	AICD41+15

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

Name	Field # of Occurrence
AICDGL	GCHK~, GCHK+1, GCHK+3, GCHK+4, GCHK+6
AICDMSG	GCHK~, GCHK+3
AICDP	VCHK+1~, VCHK+3, VCHK+4, VCHK+5*, VCHK+6, VCHK+7, DISP~, DISP+3
AICDPAT	VCHK~, VCHK+3, VCHK+4, VCHK+6, VCHK+7, DISP~, DISP+2
AICDPRE	VCHK~, VCHK+2, VCHK+3, VCHK+4, VCHK+5, VCHK+6, VCHK+7, DISP~, DISP+2, DISP+3
AICDR	DISP~, DISP+4
AICDS	GCHK+2~, GCHK+3, GCHK+4, GCHK+5, PCHK+1~, PCHK+3, PCHK+8, PCHK+9, DISP+1~, DISP+2* , DISP+3, DISP+4, DISP+5
AICDV	VCHK+1~, VCHK+2*, VCHK+3, VCHK+4, DISP~, DISP+3
AICDVER	VCHK~, VCHK+3, VCHK+4, VCHK+5, VCHK+6, VCHK+7, DISP~, DISP+2
DIFQ	SORRY+1!, VCHK+3!, VCHK+6!
DUZ	AICD41+11, AICD41+15
DUZ(0	AICD41+13
IOM	AICD41+4, AICD41+16, AICD41+17, AICD41+29, SORRY+3, GCHK+5, PCHK+9, DISP+5
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	AICD41+15, 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	AICD41+9, AICD41+15, AICD41+16, SORRY~, SORRY+2
>> XPDDIQ(	AICD41+9*
>> XPDDIQ("XPZ1"	AICD41+8*
>> XPDDIQ("XPZ2"	AICD41+8*
>> XPDENV	AICD41+8
>> XPDQUIT	AICD41+20, AICD41+21, AICD41+22, AICD41+29, AICD41+31, SORRY+2

Name	Field # of Occurrence
$T(	AICD41+17