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

Package: IHS VA Support Files

Routine: AVA32P12


Information

AVA32P12 ;IHS/ASDST/GTH - AVA 93.2 PATCH 12 ; [ 02/13/2002 5:15 PM ]

Source Information

Source file <AVA32P12.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 2 $$CJ^XLFSTR  ($$VERSION,BMES)^XPDUTL  
IHS VA Utilities 1 $$DIR^XBDIR  
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.
SFDD ;
SORRY(X) ;
MAIL ; Send install mail message.
POST ;EP - From KIDS.
VCHK(AVAPRE,AVAVER,AVAQUIT) ; Check versions needed.
;

External References

Name Field # of Occurrence
IX^DIC AVA32P12+19
$$DIR^XBDIR AVA32P12+25, AVA32P12+39, SORRY+3, VCHK+5
$$CJ^XLFSTR AVA32P12+10, AVA32P12+11, AVA32P12+21, AVA32P12+22, AVA32P12+23, AVA32P12+27, AVA32P12+37, SORRY+3, VCHK+4, VCHK+5
^XMD MAIL+8
$$VERSION^XPDUTL VCHK+3
BMES^XPDUTL PRE+2, PRE+3, POST+2, POST+4, POST+7, POST+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"DUZ UNDEFINED OR 0."
  • Line Location: AVA32P12+5
Function Call: WRITE
  • Prompt: !,"DUZ(0) UNDEFINED OR NULL."
  • Line Location: AVA32P12+7
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("Hello, "_$P(X,",",2)_" "_$P(X,","),IOM)
  • Line Location: AVA32P12+10
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: AVA32P12+11
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: AVA32P12+21
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("One entry needs to be deleted.",IOM)
  • Line Location: AVA32P12+22
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("FIX IT! Before Proceeding.",IOM),!!,*7,*7,*7
  • Line Location: AVA32P12+23
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("No 'AVA' dups in PACKAGE file",IOM)
  • Line Location: AVA32P12+27
Function Call: WRITE
  • Prompt: !,"The dd updates require an '@' in your DUZ(0).",!,"Everything else looks OK!"
  • Line Location: AVA32P12+35
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("ENVIRONMENT OK.",IOM)
  • Line Location: AVA32P12+37
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("Need at least "_AVAPRE_" v "_AVAVER_"....."_AVAPRE_" v "_AVAV_" Present",IOM)
  • Line Location: VCHK+4
Function Call: WRITE
  • Prompt: *7,!,$$CJ^XLFSTR("Sorry....",IOM)
  • Line Location: VCHK+5
Routine Call
  • DIC
  • Line Location:
    • AVA32P12+19

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] AVA32P12+20
^TMP("AVAP12MS" MAIL+2!, MAIL+3*, MAIL+5*, MAIL+9!
^VA(200 - [#200] AVA32P12+9, SFDD+3
^XTMP("XPDI" MAIL+5
^XUSEC( SINGLE+3, SINGLE+4

Label References

Name Line Occurrences
$$VCHK AVA32P12+13, AVA32P12+14, AVA32P12+15
MAIL POST+8
SFDD POST+5
SINGLE MAIL+7
SORRY AVA32P12+5, AVA32P12+7, AVA32P12+24, AVA32P12+35, AVA32P12+39

Naked Globals

Name Field # of Occurrence
^( 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~
AVAPRE VCHK~, VCHK+3, VCHK+4
AVAQUIT VCHK~, VCHK+5
AVAV VCHK+2~, VCHK+3*, VCHK+4, VCHK+5*
AVAVER VCHK~, VCHK+4, VCHK+5
>> D AVA32P12+18*
DA AVA32P12+17~
DIC AVA32P12+17~, AVA32P12+18*
DIC(0 AVA32P12+18*
DIFQ SORRY+1!, VCHK+5!
DIFROM MAIL+1~
DUZ AVA32P12+5, AVA32P12+9, MAIL+6
DUZ(0 AVA32P12+7, AVA32P12+35
I SFDD+1~, SFDD+2*, SFDD+3*
IOM AVA32P12+10, AVA32P12+11, AVA32P12+21, AVA32P12+22, AVA32P12+23, AVA32P12+27, AVA32P12+37, SORRY+3, VCHK+4, VCHK+5
K SINGLE~, SINGLE+3, SINGLE+4
P SFDD+1~, SFDD+2*, SFDD+3
U AVA32P12+9, SFDD+2, SFDD+3
X AVA32P12+9*, AVA32P12+10, AVA32P12+18*, SORRY~, SORRY+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" AVA32P12+32*
>> XPDDIQ("XPZ2" AVA32P12+32*
>> XPDENV AVA32P12+29
>> XPDQUIT SORRY+2*, VCHK+5*
Y AVA32P12+20, SINGLE+1~, SINGLE+2*, SINGLE+4*
>> ZTQUEUED SORRY+3

Marked Items

Name Field # of Occurrence
$T( AVA32P12+11, 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