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 |  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: ACPTENVC

Package: CPT Files

Routine: ACPTENVC


Information

ACPTENVC ; IHS/SD/SDR - Environment checker for ACPT V2.10 ;4/21/08 14:11

Source Information

Source file <ACPTENVC.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 3 $$LIST^%ZISH  $$CJ^XLFSTR  $$VERSION^XPDUTL  
IHS VA Utilities 1 $$DIR^XBDIR  
VA Fileman 1 (,IX)^DIC  

Entry Points

Name Comments DBIA/ICR reference
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) ;
POST1(ACPTDIR) ; input transform for KIDS question POST1
LAST(PKG,VER) ;EP - returns last patch applied for a Package, PATCH^DATE
; Patch includes Seq # if Released

External References

Name Field # of Occurrence
$$LIST^%ZISH POST1+26, POST1+68
^DIC INSTALLD+10, INSTALLD+13
IX^DIC ACPTENVC+19, INSTALLD+7
$$DIR^XBDIR ACPTENVC+30, SORRY+3
$$CJ^XLFSTR ACPTENVC+8, ACPTENVC+9, ACPTENVC+21, ACPTENVC+22, ACPTENVC+23, ACPTENVC+28, SORRY+3, VCHK+4, VCHK+5
$$VERSION^XPDUTL VCHK+3, LAST+3, POST1+29, POST1+35, POST1+44

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"DUZ UNDEFINED OR 0."
  • Line Location: ACPTENVC+3
Function Call: WRITE
  • Prompt: !,"DUZ(0) UNDEFINED OR NULL."
  • Line Location: ACPTENVC+5
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("Hello, "_$P(X,",",2)_" "_$P(X,","),IOM)
  • Line Location: ACPTENVC+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: ACPTENVC+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: ACPTENVC+21
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("One entry needs to be deleted.",IOM)
  • Line Location: ACPTENVC+22
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("FIX IT! Before Proceeding.",IOM),!!,*7,*7,*7
  • Line Location: ACPTENVC+23
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("ENVIRONMENT OK.",IOM)
  • Line Location: ACPTENVC+28
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
Function Call: WRITE
  • Prompt: !!,"Checking directory ",ACPTDIR,"..."
  • Line Location: POST1+16
Routine Call
  • DIC
  • Line Location:
    • INSTALLD+10
    • INSTALLD+13
Routine Call
  • DIC
  • Line Location:
    • ACPTENVC+19
    • 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)
^DIC(9.4 - [#9.4] ACPTENVC+20, LAST+4, LAST+5, LAST+7, LAST+8, LAST+9
^VA(200 - [#200] ACPTENVC+7

Label References

Name Line Occurrences
$$VCHK ACPTENVC+12, ACPTENVC+13, ACPTENVC+14, ACPTENVC+15
SORRY ACPTENVC+3, ACPTENVC+5, ACPTENVC+26, ACPTENVC+30

Naked Globals

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACPTDIR POST1~, POST1+6*, POST1+7*, POST1+8*, POST1+11*, POST1+12, POST1+13*, POST1+14*, POST1+16, POST1+26
, POST1+30, POST1+31, POST1+32, POST1+33, POST1+34, POST1+36, POST1+37, POST1+45, POST1+47, POST1+49
, POST1+52, POST1+54, POST1+63, POST1+68, POST1+69, POST1+74!
ACPTF POST1+70~*, POST1+71
ACPTFILE POST1+20~, POST1+66~
ACPTFILE("*" POST1+66*
ACPTFILE("acpt2010.9d" POST1+23*
ACPTFILE("acpt2010.9h" POST1+22*
ACPTFILE("acpt2010.9l" POST1+21*
ACPTFILE("acpt2010.d" POST1+25*
ACPTFILE("acpt2010.l" POST1+24*
ACPTFIND POST1+18~*, POST1+27, POST1+38*, POST1+57, POST1+61
ACPTFIND( POST1+30, POST1+31, POST1+32, POST1+33, POST1+34, POST1+36, POST1+37, POST1+45, POST1+47, POST1+49
, POST1+52, POST1+54
ACPTFIND("acpt2010.9d" POST1+32, POST1+47
ACPTFIND("acpt2010.9h" POST1+31, POST1+49
ACPTFIND("acpt2010.9l" POST1+30, POST1+45
ACPTFIND("acpt2010.d" POST1+34, POST1+37, POST1+54
ACPTFIND("acpt2010.l" POST1+33, POST1+36, POST1+52
ACPTINST INSTALLD~, INSTALLD+5, INSTALLD+9, INSTALLD+12
ACPTLIST POST1+67~
ACPTLIST( POST1+70
ACPTPRE VCHK~, VCHK+3, VCHK+4
ACPTQUIT ACPTENVC+11*, VCHK~, VCHK+5, POST1+28!, POST1+29, POST1+30*, POST1+31*, POST1+32*, POST1+33*, POST1+34*
, POST1+35, POST1+36*, POST1+37*, POST1+38
ACPTV VCHK+2~, VCHK+3*, VCHK+4, VCHK+5
ACPTVER VCHK~, VCHK+4, VCHK+5
>> D ACPTENVC+18*, INSTALLD+6*
DA ACPTENVC+17~
DIC ACPTENVC+17~, ACPTENVC+18*, INSTALLD+4~, INSTALLD+6*, INSTALLD+9*, INSTALLD+12*
DIC(0 ACPTENVC+18*, INSTALLD+6*
DIFQ SORRY+1!
DUZ ACPTENVC+3, ACPTENVC+7
DUZ(0 ACPTENVC+5
IOM ACPTENVC+8, ACPTENVC+9, ACPTENVC+21, ACPTENVC+22, ACPTENVC+23, ACPTENVC+28, 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 ACPTENVC+7, LAST+8, LAST+9, LAST+10
VER LAST~, LAST+3*, LAST+5
VERIEN LAST+2~, LAST+5*, LAST+7, LAST+8, LAST+9
X ACPTENVC+7*, ACPTENVC+8, ACPTENVC+18*, SORRY~, SORRY+2, INSTALLD+4~, INSTALLD+5*, INSTALLD+9*, INSTALLD+12*
>> XPDQUIT ACPTENVC+11*, ACPTENVC+15*, ACPTENVC+20*, ACPTENVC+26, SORRY+2*, VCHK+5*
Y ACPTENVC+20, INSTALLD+4~, INSTALLD+8, INSTALLD+9, INSTALLD+11, INSTALLD+12, INSTALLD+14, POST1+26~*, POST1+68~*
>> ZTQUEUED SORRY+3

Marked Items

Name Field # of Occurrence
$T( ACPTENVC+9
Info |  Source |  Call 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