Routine: ACPT29P2

Information

ACPT29P2 ; IHS/SD/SDR - ACPT V2.09 patch 2 ;4/21/08 14:11

Source Information

Call Graph

Call Graph Total: 6

Package	Total	Call Graph
Kernel	2	$$CJ^XLFSTR $$VERSION^XPDUTL
VA Fileman	2	(,IX)^DIC ^DIE
CPT Files	1	^ACPT29P2
IHS VA Utilities	1	$$DIR^XBDIR

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
CPT Files	1	ACPT29P2

Entry Points

Name	Comments	DBIA/ICR reference
LOAD	;
LAST(PKG,VER)	;EP - returns last patch applied for a Package, PATCH^DATE ; Patch includes Seq # if Released
INSTALLD(ACPTINST)	;EP - Determine if patch ACPTINST was installed, where ACPTINST is ; the name of the INSTALL. E.g "AG6.010".
VCHK(ACPTPRE,ACPTVER,ACPTQUIT)	; Check versions needed. ;
SORRY(X)	;
TEXT(ACPTDESC)	; convert Description text to Word-Processing data type ; input: .ACPTDESC = passed by reference, starts out as long string, ; ends as Fileman WP-format array complete with header
DATA	;

External References

Name	Field # of Occurrence
^ACPT29P2	LOAD+2
^DIC	INSTALLD+10, INSTALLD+13, LOAD+47
IX^DIC	ACPT29P2+23, INSTALLD+7
^DIE	LOAD+35
$$DIR^XBDIR	ACPT29P2+34, SORRY+3
$$CJ^XLFSTR	ACPT29P2+8, ACPT29P2+9, ACPT29P2+25, ACPT29P2+26, ACPT29P2+27, ACPT29P2+32, SORRY+3, VCHK+4, VCHK+5
$$VERSION^XPDUTL	VCHK+3, LAST+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"DUZ UNDEFINED OR 0." Line Location: ACPT29P2+3
Function Call: WRITE	Prompt: !,"DUZ(0) UNDEFINED OR NULL." Line Location: ACPT29P2+5
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR("Hello, "_$P(X,",",2)_" "_$P(X,","),IOM) Line Location: ACPT29P2+8
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR("Checking Environment for "_$P($T(+2),";",4)_" V "_$P($T(+2),";",3)_" Patch "_$P($T(+2),";",5)_".",IOM),! Line Location: ACPT29P2+9
Function Call: WRITE	Prompt: !!,7,7,$$CJ^XLFSTR("You Have More Than One Entry In The",IOM),!,$$CJ^XLFSTR("PACKAGE File with an ""ACPT"" prefix.",IOM) Line Location: ACPT29P2+25
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR("One entry needs to be deleted.",IOM) Line Location: ACPT29P2+26
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR("FIX IT! Before Proceeding.",IOM),!!,7,7,*7 Line Location: ACPT29P2+27
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR("ENVIRONMENT OK.",IOM) Line Location: ACPT29P2+32
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR("Need at least "_ACPTPRE_" v "_ACPTVER_"....."_ACPTPRE_" v "_ACPTV_" Present",IOM) Line Location: VCHK+4
Function Call: WRITE	Prompt: 7,!,$$CJ^XLFSTR("^^^^NEEDS FIXED*^^^^",IOM) Line Location: VCHK+5
Routine Call	DIE Line Location: LOAD+35
Routine Call	DIC Line Location: INSTALLD+10 INSTALLD+13 LOAD+47
Routine Call	DIC Line Location: ACPT29P2+23 INSTALLD+7

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(81	LOAD+42
^DIC(9.4 - [#9.4]	ACPT29P2+24, LAST+4, LAST+5, LAST+7, LAST+8, LAST+9
^ICPT - [#81]	LOAD+9, LOAD+11, LOAD+12, LOAD+14, LOAD+17, LOAD+20!, LOAD+21*, LOAD+23, LOAD+24, LOAD+27
^ICPT("B"	LOAD+6, LOAD+7, LOAD+10*
^VA(200 - [#200]	ACPT29P2+7

Name	Line Occurrences
$$VCHK	ACPT29P2+13, ACPT29P2+15, ACPT29P2+17, ACPT29P2+19
SORRY	ACPT29P2+3, ACPT29P2+5, ACPT29P2+30, ACPT29P2+34
TEXT	LOAD+19

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

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACPTBRK	TEXT+10~, TEXT+15, TEXT+17, TEXT+20, TEXT+23, TEXT+25, TEXT+27*, TEXT+30, TEXT+31
ACPTCNT	TEXT+6~, TEXT+29, TEXT+30, TEXT+33
>> ACPTCODE	LOAD+3*, LOAD+6, LOAD+7, LOAD+8, LOAD+9, LOAD+10, LOAD+12, LOAD+44
ACPTDA	LOAD+1~
ACPTDESC	LOAD+5*, LOAD+19, LOAD+21, TEXT~, TEXT+4, TEXT+5!
ACPTDESC(	TEXT+30*
ACPTDESC(0	TEXT+33*
>> ACPTEDT	LOAD+23*, LOAD+24, LOAD+26
ACPTEIEN	LOAD+24~*, LOAD+26, LOAD+27, LOAD+30
ACPTI	LOAD+1~, LOAD+2*
>> ACPTIEN	LOAD+6, LOAD+8, LOAD+9, LOAD+10, LOAD+11, LOAD+12, LOAD+14, LOAD+17, LOAD+20, LOAD+21 , LOAD+23, LOAD+24, LOAD+27, LOAD+31, LOAD+39
ACPTINST	INSTALLD~, INSTALLD+5, INSTALLD+9, INSTALLD+12
ACPTLN	LOAD+1~, LOAD+2*, LOAD+3, LOAD+4, LOAD+5
>> ACPTNODE	LOAD+14, LOAD+15, LOAD+16*, LOAD+17
ACPTPRE	VCHK~, VCHK+3, VCHK+4
ACPTQUIT	ACPT29P2+11~, ACPT29P2+12, ACPT29P2+13, ACPT29P2+15, ACPT29P2+17, ACPT29P2+19, ACPT29P2+24, ACPT29P2+30, VCHK~
ACPTRY	TEXT+13~, TEXT+14, TEXT+15, TEXT+17, TEXT+18, TEXT+19, TEXT+20, TEXT+22, TEXT+23
>> ACPTSHRT	LOAD+4*, LOAD+15
ACPTSTRN	TEXT+4~, TEXT+8, TEXT+14, TEXT+18, TEXT+19, TEXT+22, TEXT+30, TEXT+31*
ACPTV	VCHK+2~, VCHK+3*, VCHK+4, VCHK+5
ACPTVER	VCHK~, VCHK+4, VCHK+5
>> D	ACPT29P2+22, INSTALLD+6
DA	ACPT29P2+21~, LOAD+1~, LOAD+29!, LOAD+30*, LOAD+38!
DA(1	LOAD+31, LOAD+32, LOAD+39, LOAD+40
DIC	ACPT29P2+21~, ACPT29P2+22, INSTALLD+4~, INSTALLD+6, INSTALLD+9, INSTALLD+12, LOAD+29!, LOAD+38!, LOAD+40*
DIC("DR"	LOAD+45*
DIC("P"	LOAD+42*
DIC(0	ACPT29P2+22, INSTALLD+6, LOAD+41*
DIDEL	LOAD+34~
DIE	LOAD+1~, LOAD+29!, LOAD+32*, LOAD+38!
DIFQ	SORRY+1!
DIR	LOAD+29!, LOAD+38!
DLAYGO	LOAD+46~
DR	LOAD+1~, LOAD+33*
DT	TEXT+33
DTOUT	LOAD+34~, LOAD+46~
DUOUT	LOAD+46~
DUZ	ACPT29P2+3, ACPT29P2+7
DUZ(0	ACPT29P2+5
IOM	ACPT29P2+8, ACPT29P2+9, ACPT29P2+25, ACPT29P2+26, ACPT29P2+27, ACPT29P2+32, SORRY+3, VCHK+4, VCHK+5
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	ACPT29P2+7, LAST+8, LAST+9, LAST+10, LOAD+3, LOAD+4, LOAD+5, LOAD+11, LOAD+12, LOAD+15 , LOAD+16, LOAD+27, LOAD+42, TEXT+33
VER	LAST~, LAST+3*, LAST+5
VERIEN	LAST+2~, LAST+5*, LAST+7, LAST+8, LAST+9
X	ACPT29P2+7, ACPT29P2+8, ACPT29P2+22, SORRY~, SORRY+2, INSTALLD+4~, INSTALLD+5, INSTALLD+9, INSTALLD+12, LOAD+29! , LOAD+38!, LOAD+43, LOAD+44*
>> XPDQUIT	SORRY+2*
Y	ACPT29P2+24, INSTALLD+4~, INSTALLD+8, INSTALLD+9, INSTALLD+11, INSTALLD+12, INSTALLD+14, LOAD+29!, LOAD+38!, LOAD+46~
>> ZTQUEUED	SORRY+3

Customize PDF page

Package: CPT Files

Routine: ACPT29P2

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 1

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