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

Package: Contract Health Management Information System

Routine: ACHS31E


Information

ACHS31E ;IHS/OIT/FCJ - ACHS 3.1 PATCH 13 ENV CHECK ; JUL 10,2008

Source Information

Source file <ACHS31E.m>

Call Graph

Call Graph Total: 8

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

Entry Points

Name Comments DBIA/ICR reference
VCHK(ACHSPRE,ACHSVER,ACHSQUIT,ACHSCOMP) ; Check versions needed.
;
INTROI ; Intro text during KIDS Install.
SORRY(X) ;
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".

External References

Name Field # of Occurrence
HOME^%ZIS ACHS31E+5
ENDR^%ZISS ACHS31E+16
^DIC INSTALLD+11, INSTALLD+15
IX^DIC ACHS31E+30, INSTALLD+7
$$GET1^DIQ ACHS31E+10
$$DIR^XBDIR ACHS31E+39, ACHS31E+40
HELP^XBHELP ACHS31E+38, ACHS31E+40
$$CJ^XLFSTR ACHS31E+11, ACHS31E+12, ACHS31E+20, ACHS31E+32, ACHS31E+33, ACHS31E+36, ACHS31E+37, SORRY+3, VCHK+4
$$VERSION^XPDUTL VCHK+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"DUZ UNDEFINED OR 0."
  • Line Location: ACHS31E+6
Function Call: WRITE
  • Prompt: !,"DUZ(0) UNDEFINED OR NULL."
  • Line Location: ACHS31E+7
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("Hello, "_$P(X,",",2)_" "_$P(X,","),IOM)
  • Line Location: ACHS31E+11
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: ACHS31E+12
Function Call: WRITE
  • Prompt: !?16,"Need atleast AUT 98.1*20.....Present"
  • Line Location: ACHS31E+22
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR(IORVON_"You must FIX IT, Before Proceeding."_IORVOFF,IOM),!!,*7,*7,*7
  • Line Location: ACHS31E+36
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("ENVIRONMENT OK.",IOM)
  • Line Location: ACHS31E+37
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
Routine Call
  • %ZIS
  • Line Location:
    • ACHS31E+5
Routine Call
  • DIC
  • Line Location:
    • INSTALLD+11
    • INSTALLD+15
Routine Call
  • DIC
  • Line Location:
    • ACHS31E+30
    • 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] ACHS31E+31

Label References

Name Line Occurrences
$$INSTALLD ACHS31E+19
$$VCHK ACHS31E+18, ACHS31E+23, ACHS31E+24, ACHS31E+25, ACHS31E+26
SORRY ACHS31E+6, ACHS31E+7, ACHS31E+8, ACHS31E+34, ACHS31E+39, ACHS31E+40, VCHK+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACHS INSTALLD~, INSTALLD+5, INSTALLD+10, INSTALLD+14
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
>> D ACHS31E+29*, INSTALLD+6*
DA ACHS31E+28~
DIC ACHS31E+28~, ACHS31E+29*, INSTALLD+3~, INSTALLD+6*, INSTALLD+10*, INSTALLD+14*
DIC(0 ACHS31E+29*, INSTALLD+6*
DIFQ SORRY+1!
DUZ ACHS31E+6, ACHS31E+10
DUZ(0 ACHS31E+7, ACHS31E+8
IOM ACHS31E+5, ACHS31E+11, ACHS31E+12, ACHS31E+20, ACHS31E+32, ACHS31E+33, ACHS31E+36, ACHS31E+37, SORRY+3, VCHK+4
IORVOFF ACHS31E+14~, ACHS31E+20, ACHS31E+33, ACHS31E+36
IORVON ACHS31E+14~, ACHS31E+33, ACHS31E+36
X ACHS31E+10*, ACHS31E+11, ACHS31E+15*, ACHS31E+29*, SORRY~, SORRY+2, INSTALLD+3~, INSTALLD+5*, INSTALLD+10*, INSTALLD+14*
>> XPDDIQ("XPZ1" ACHS31E+40*
>> XPDDIQ("XPZ2" ACHS31E+40*
>> XPDENV ACHS31E+40
>> XPDQUIT ACHS31E+21*, ACHS31E+36, SORRY+2*
Y ACHS31E+31, INSTALLD+3~, INSTALLD+8, INSTALLD+10, INSTALLD+12, INSTALLD+14, INSTALLD+16
>> ZTQUEUED ACHS31E+8

Marked Items

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