Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ACPT29P2

Package: CPT Files

Routine: ACPT29P2


Information

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

Source Information

Source file <ACPT29P2.m>

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 "AG*6.0*10".
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

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)
^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

Label References

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

Naked Globals

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

Marked Items

Name Field # of Occurrence
$T( ACPT29P2+9
$T(DATA+ACPTI^ACPT29P2 LOAD+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All