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

Package: IHS VA Support Files

Routine: AVA32P13


Information

AVA32P13 ;IHS/ASDST/GTH - AVA 93.2 PATCH 13 ; [ 09/12/2002 3:15 PM ]

Source Information

Source file <AVA32P13.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 4 HOME^%ZIS  ENDR^%ZISS  $$CJ^XLFSTR  ($$VERSION,BMES,MES)^XPDUTL  
IHS VA Utilities 2 $$DIR^XBDIR  EN2^XBFRESET  
MailMan 1 ^XMD  
VA Fileman 1 IX^DIC  

Entry Points

Name Comments DBIA/ICR reference
PRE ;EP - From KIDS.
SINGLE(K) ; Get holders of a single key K.
FAIL(X) ;
SFDD ;
MAIL ; Send install mail message.
POST ;EP - From KIDS.
VCHK(AVAPRE,AVAVER,AVAQUIT) ; Check versions needed.
;
SORRY ;

External References

Name Field # of Occurrence
HOME^%ZIS AVA32P13+5
ENDR^%ZISS AVA32P13+17
IX^DIC AVA32P13+25
$$DIR^XBDIR AVA32P13+51, SORRY+1
EN2^XBFRESET PRE+5
$$CJ^XLFSTR AVA32P13+12, AVA32P13+13, AVA32P13+27, AVA32P13+28, AVA32P13+29, AVA32P13+39, AVA32P13+44, AVA32P13+47, AVA32P13+49, SORRY+1
, VCHK+4
^XMD MAIL+8
$$VERSION^XPDUTL VCHK+3
BMES^XPDUTL PRE+1, POST+2, POST+4, POST+7, POST+10
MES^XPDUTL PRE+2, PRE+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"DUZ UNDEFINED OR 0."
  • Line Location: AVA32P13+7
Function Call: WRITE
  • Prompt: !,"DUZ(0) UNDEFINED OR NULL."
  • Line Location: AVA32P13+9
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("Hello, "_$P(X,",",2)_" "_$P(X,","),IOM)
  • Line Location: AVA32P13+12
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: AVA32P13+13
Function Call: WRITE
  • Prompt: !!,*7,*7,$$CJ^XLFSTR("You Have More Than One Entry In The",IOM),!,$$CJ^XLFSTR("PACKAGE File with an ""AVA"" prefix.",IOM)
  • Line Location: AVA32P13+27
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR(IORVON_"One entry needs to be deleted."_IORVOFF,IOM)
  • Line Location: AVA32P13+28
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("FIX IT! Before Proceeding.",IOM),!!,*7,*7,*7
  • Line Location: AVA32P13+29
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("The dd updates require an '@' in your DUZ(0). "_IORVON_"<<<-- FIX IT!"_IORVOFF,IOM)
  • Line Location: AVA32P13+39
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("NEW PERSON '"_IORVON_$P(^VA(200,DA,0),U,1)_IORVOFF_"' has a Person Class.",IOM)
  • Line Location: AVA32P13+44
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR(IORVON_"Please Fix It!!"_IORVOFF,IOM)
  • Line Location: AVA32P13+47
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("ENVIRONMENT OK.",IOM)
  • Line Location: AVA32P13+49
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("Need at least "_AVAPRE_" v "_AVAVER_"....."_AVAPRE_" v "_AVAV_" Present"_AVAMSG,IOM)
  • Line Location: VCHK+4
Routine Call
  • %ZIS
  • Line Location:
    • AVA32P13+5
Routine Call
  • DIC
  • Line Location:
    • AVA32P13+25

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(200 SFDD+2
^DIC(9.4 - [#9.4] AVA32P13+26
^TMP("AVAP13MS" MAIL+2!, MAIL+3*, MAIL+5*, MAIL+9!
^UTILITY("XBDSET" PRE+3!, PRE+4*
^VA(200 - [#200] AVA32P13+11, AVA32P13+42, AVA32P13+44, SFDD+3
^XTMP("XPDI" MAIL+5
^XUSEC( SINGLE+3, SINGLE+4

Label References

Name Line Occurrences
$$VCHK AVA32P13+19, AVA32P13+20, AVA32P13+21
FAIL AVA32P13+7, AVA32P13+9, AVA32P13+30, AVA32P13+39, AVA32P13+43, AVA32P13+51, VCHK+5
MAIL POST+8
SFDD POST+5
SINGLE MAIL+7
SORRY AVA32P13+7, AVA32P13+9, AVA32P13+47, AVA32P13+51

Naked Globals

Name Field # of Occurrence
^( AVA32P13+42, MAIL+5
^(0 SFDD+3*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % MAIL+4*, MAIL+5*, MAIL+7*
AVA POST+1~
AVAMSG VCHK+2~, VCHK+3*, VCHK+4
AVAPRE VCHK~, VCHK+3, VCHK+4
AVAQUIT VCHK~, VCHK+5
AVAV VCHK+2~, VCHK+3*, VCHK+4, VCHK+5
AVAVER VCHK~, VCHK+3, VCHK+4, VCHK+5
>> D AVA32P13+24*
DA AVA32P13+23~, AVA32P13+41*, AVA32P13+42*, AVA32P13+44
DIC AVA32P13+23~, AVA32P13+24*
DIC(0 AVA32P13+24*
DIFQ FAIL+1!
DIFROM MAIL+1~
DUZ AVA32P13+7, AVA32P13+11, MAIL+6
DUZ(0 AVA32P13+9, AVA32P13+39
I SFDD+1~, SFDD+2*, SFDD+3*
IOM AVA32P13+5, AVA32P13+12, AVA32P13+13, AVA32P13+27, AVA32P13+28, AVA32P13+29, AVA32P13+39, AVA32P13+44, AVA32P13+47, AVA32P13+49
, SORRY+1, VCHK+4
IORVOFF AVA32P13+15~, AVA32P13+28, AVA32P13+39, AVA32P13+44, AVA32P13+47
IORVON AVA32P13+15~, AVA32P13+28, AVA32P13+39, AVA32P13+44, AVA32P13+47
K SINGLE~, SINGLE+3, SINGLE+4
P SFDD+1~, SFDD+2*, SFDD+3
U AVA32P13+11, AVA32P13+42, AVA32P13+44, SFDD+2, SFDD+3
X AVA32P13+11*, AVA32P13+12, AVA32P13+16*, AVA32P13+24*, FAIL~, FAIL+2
XMDUZ MAIL+1~, MAIL+6*
XMSUB MAIL+1~, MAIL+6*
XMTEXT MAIL+1~, MAIL+6*
XMY MAIL+1~
XMY( MAIL+6*, SINGLE+4*
XMY(1 MAIL+6*
>> XPDA MAIL+5
>> XPDBLD MAIL+5
>> XPDDIQ("XPZ1" AVA32P13+36*
>> XPDDIQ("XPZ2" AVA32P13+36*
>> XPDENV AVA32P13+33
>> XPDQUIT AVA32P13+47, FAIL+2*
Y AVA32P13+26, SINGLE+1~, SINGLE+2*, SINGLE+4*
>> ZTQUEUED SORRY+1

Marked Items

Name Field # of Occurrence
$T( AVA32P13+13, MAIL+6
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