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 |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ACHS31E1

Package: Contract Health Management Information System

Routine: ACHS31E1


Information

ACHS31E1 ;IHS/OIT/FCJ - ACHS 3.1 PATCH ENV CHECK ;

Source Information

Source file <ACHS31E1.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
Kernel 4 HOME^%ZIS  ENDR^%ZISS  $$CJ^XLFSTR  $$VERSION^XPDUTL  
VA Fileman 3 (,IX)^DIC  $$GET1^DIQ  ^DIR  
IHS VA Utilities 2 $$DIR^XBDIR  HELP^XBHELP  

Caller Graph

Caller Graph Total: 8

Package Total Caller Graph
Contract Health Management Information System 8 ACHS3116  ACHS3118  ACHS3122  ACHS3123  ACHS3124  ACHS3125  ACHS3126  ACHS3127  

Entry Points

Name Comments DBIA/ICR reference
INTROE ; Intro text during KIDS Environment check.
INSTALLD(ACHS) ;EP; Determine if patch ACHS was installed, where ACHS is
; the name of the INSTALL. E.g "AVA*93.2*12".
CHK ;
INTROI ; Intro text during KIDS Install.
AR ;
SORRY(X) ;
VCHK(ACHSPRE,ACHSVER,ACHSQUIT,ACHSCOMP) ; Check versions needed.
;

External References

Name Field # of Occurrence
HOME^%ZIS ACHS31E1+6
ENDR^%ZISS ACHS31E1+17
^DIC INSTALLD+11, INSTALLD+15
IX^DIC CHK+14, INSTALLD+7
$$GET1^DIQ ACHS31E1+11
^DIR AR+5
$$DIR^XBDIR CHK+23, CHK+24
HELP^XBHELP CHK+22, CHK+24
$$CJ^XLFSTR ACHS31E1+12, ACHS31E1+13, CHK+16, CHK+17, CHK+20, CHK+21, SORRY+3, VCHK+4, INSTALLD+18, INSTALLD+19
$$VERSION^XPDUTL VCHK+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"DUZ UNDEFINED OR 0."
  • Line Location: ACHS31E1+7
Function Call: WRITE
  • Prompt: !,"DUZ(0) UNDEFINED OR NULL."
  • Line Location: ACHS31E1+8
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("Hello, "_$P(X,",",2)_" "_$P(X,","),IOM)
  • Line Location: ACHS31E1+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: ACHS31E1+13
Function Call: WRITE
  • Prompt: !,"User stopped environment check."
  • Line Location: AR+6
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR(IORVON_"You must install it, Before Proceeding."_IORVOFF,IOM),!!,*7,*7,*7
  • Line Location: CHK+20
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("ENVIRONMENT OK.",IOM)
  • Line Location: CHK+21
Function Call: WRITE
  • Prompt: *7,!,$$CJ^XLFSTR("Sorry....FIX IT!",IOM)
  • Line Location: SORRY+3
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("Need "_$S(ACHSCOMP="<":"at least ",1:"")_ACHSPRE_" v "_ACHSVER_"....."_ACHSPRE_" v "_ACHSV_" Present",IOM)
  • Line Location: VCHK+4
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("Need at least "_ACHS_"....."_ACHS_" Present",IOM)
  • Line Location: INSTALLD+18
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("Need at least "_ACHS_".....",IOM)
  • Line Location: INSTALLD+19
Routine Call
  • %ZIS
  • Line Location:
    • ACHS31E1+6
Routine Call
  • DIC
  • Line Location:
    • INSTALLD+11
    • INSTALLD+15
Routine Call
  • DIR
  • Line Location:
    • AR+5
Routine Call
  • DIC
  • Line Location:
    • CHK+14
    • INSTALLD+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^DIC(9.4 - [#9.4] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(9.4 - [#9.4] CHK+15

Label References

Name Line Occurrences
$$INSTALLD CHK+1, CHK+3, CHK+4, CHK+5, CHK+6, CHK+9
$$VCHK CHK+2, CHK+7, CHK+10
SORRY ACHS31E1+7, ACHS31E1+8, ACHS31E1+9, CHK+9, CHK+18, CHK+23, CHK+24, VCHK+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACHS INSTALLD~, INSTALLD+5, INSTALLD+10, INSTALLD+14, INSTALLD+17, INSTALLD+18, INSTALLD+19
>> ACHSAR AR+2*, AR+7*, CHK+8
ACHSCOMP VCHK~, VCHK+4, VCHK+5
ACHSPRE VCHK~, VCHK+3, VCHK+4
ACHSQUIT VCHK~, VCHK+5
ACHSV VCHK+2~, VCHK+3*, VCHK+4, VCHK+5
ACHSVER VCHK~, VCHK+4, VCHK+5
>> BMCQUIT CHK+9*
>> D CHK+13*, INSTALLD+6*
DA CHK+12~
DIC CHK+12~, CHK+13*, INSTALLD+3~, INSTALLD+6*, INSTALLD+10*, INSTALLD+14*, INSTALLD+16
DIC(0 CHK+13*, INSTALLD+6*
DIFQ SORRY+1!
>> DIR("?" AR+4*
>> DIR("A" AR+3*
>> DIR("B" AR+3*
>> DIR(0 AR+3*
>> DIRUT AR+6
>> DTOUT AR+6
>> DUOUT AR+6
DUZ ACHS31E1+7, ACHS31E1+11
DUZ(0 ACHS31E1+8, ACHS31E1+9
IOM ACHS31E1+6, ACHS31E1+12, ACHS31E1+13, CHK+16, CHK+17, CHK+20, CHK+21, SORRY+3, VCHK+4, INSTALLD+18
, INSTALLD+19
IORVOFF ACHS31E1+15~, CHK+17, CHK+20
IORVON ACHS31E1+15~, CHK+17, CHK+20
>> P INSTALLD+16*, INSTALLD+17
X ACHS31E1+11*, ACHS31E1+12, ACHS31E1+16*, CHK+13*, SORRY~, SORRY+2, INSTALLD+3~, INSTALLD+5*, INSTALLD+10*, INSTALLD+14*
, INSTALLD+16
>> XPDDIQ("XPZ1" CHK+24*
>> XPDDIQ("XPZ2" CHK+24*
>> XPDENV CHK+24
>> XPDQUIT CHK+1*, CHK+3*, CHK+4*, CHK+5*, CHK+6*, CHK+20, SORRY+2*
Y AR+7, CHK+15, INSTALLD+3~, INSTALLD+8, INSTALLD+10, INSTALLD+12, INSTALLD+14, INSTALLD+16*, INSTALLD+17*, INSTALLD+18
, INSTALLD+19, INSTALLD+20
>> ZTQUEUED ACHS31E1+9

Marked Items

Name Field # of Occurrence
$T( ACHS31E1+13
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 |  Local Variables |  Marked Items |  All