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

Package: M Transfer

Routine: BMXE01


Information

BMXE01 ; IHS/OIT/FJE - ENVIRONMENT CHECK FOR BMX 4.0 ; 03 Jun 2010 9:39 AM

Source Information

Source file <BMXE01.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 3 HOME^%ZIS  (CALL,CLOSE)^%ZISTCP  BMES^XPDUTL  
VA Fileman 3 FILE^DICN  DT^DICRW  ^DIE  
IHS VA Utilities 1 $$C^XBFUNC  

Entry Points

Name Comments DBIA/ICR reference
DNSERR
DNS1
SORRY ;
ENVOK ; If this is just an environ check, end here.
DNS ; MAKE SURE THERE IS A VALID DNS IP ADDRESS (OR A NULL VALUE) IN THE KERNEL SYSTEM PARAMETERS FILE

External References

Name Field # of Occurrence
HOME^%ZIS BMXE01+10
CALL^%ZISTCP DNS+6
CLOSE^%ZISTCP DNS+6, DNS1
FILE^DICN ENVOK+7
DT^DICRW BMXE01+10
^DIE ENVOK+9
$$C^XBFUNC BMXE01+12, BMXE01+13, BMXE01+14, BMXE01+17, BMXE01+21, DNS+2, DNS1+1, ENVOK+1, DNSERR, DNSERR+1
, DNSERR+2, SORRY+3, SORRY+4, SORRY+5, SORRY+6, SORRY+7
BMES^XPDUTL SORRY+9, SORRY+10, SORRY+11, SORRY+12, SORRY+13, SORRY+14

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"DUZ UNDEFINED OR 0."
  • Line Location: BMXE01+6
Function Call: WRITE
  • Prompt: !,"DUZ(0) UNDEFINED OR NULL."
  • Line Location: BMXE01+8
Function Call: WRITE
  • Prompt: !,$$C^XBFUNC("Who are you????")
  • Line Location: BMXE01+12
Function Call: WRITE
  • Prompt: !,$$C^XBFUNC("Hello, "_$P(X,",",2)_" "_$P(X,","))
  • Line Location: BMXE01+13
Function Call: WRITE
  • Prompt: !!,$$C^XBFUNC("Checking Environment for Install of Version "_$P($T(+2),";",3)_" of "_$P($T(+2),";",4)_".")
  • Line Location: BMXE01+14
Function Call: WRITE
  • Prompt: !!,$$C^XBFUNC("Need at least FileMan 22.....FileMan "_X_" Present")
  • Line Location: BMXE01+17
Function Call: WRITE
  • Prompt: !!,$$C^XBFUNC("Need at least Kernel 8.0.....Kernel "_X_" Present")
  • Line Location: BMXE01+21
Function Call: WRITE
  • Prompt: !!,$$C^XBFUNC("Checking Kernel system parameters. This may take 1 minute...")
  • Line Location: DNS+2
Function Call: WRITE
  • Prompt: !,$$C^XBFUNC("Kernel system parameters validated")
  • Line Location: DNS1+1
Function Call: WRITE
  • Prompt: !!,$$C^XBFUNC("ENVIRONMENT OK.")
  • Line Location: ENVOK+1
Function Call: WRITE
  • Prompt: !,$$C^XBFUNC("The DNS IP address in the KERNEL SYSTEM PARAMETERS file is invalid!!!")
  • Line Location: DNSERR+0
Function Call: WRITE
  • Prompt: !,$$C^XBFUNC("You must enter a valid IP in the DNS IP field (or null) before ")
  • Line Location: DNSERR+1
Function Call: WRITE
  • Prompt: !,$$C^XBFUNC("installing this package")
  • Line Location: DNSERR+2
Function Call: WRITE
  • Prompt: *7,!!!,$$C^XBFUNC("Sorry....something is wrong with your environment")
  • Line Location: SORRY+3
Function Call: WRITE
  • Prompt: !,$$C^XBFUNC("Aborting BMX Version 4.0 Install!")
  • Line Location: SORRY+4
Function Call: WRITE
  • Prompt: !,$$C^XBFUNC("Correct error and reinstall otherwise")
  • Line Location: SORRY+5
Function Call: WRITE
  • Prompt: !,$$C^XBFUNC("please print/capture this screen and notify")
  • Line Location: SORRY+6
Function Call: WRITE
  • Prompt: !,$$C^XBFUNC("the Help Desk at 888-830-7280")
  • Line Location: SORRY+7
Function Call: WRITE
  • Prompt: !!,LINE
  • Line Location: SORRY+8
Routine Call
  • %ZIS
  • Line Location:
    • BMXE01+10
Routine Call
  • DIE
  • Line Location:
    • ENVOK+9

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^BMXAPPL - [#90093.2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("VERSION" BMXE01+16
^DIC(9.4 - [#9.4] BMXE01+20
^VA(200 - [#200] BMXE01+11
^XTV(8989.3 - [#8989.3] DNS+3

Label References

Name Line Occurrences
DNS1 DNS+4
DNSERR DNS+5, DNS+6
SORRY BMXE01+6, BMXE01+8, BMXE01+12, BMXE01+18, BMXE01+22

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% DNS+1~
D0 ENVOK+7!
DA ENVOK+8*, ENVOK+9, ENVOK+10!
DD ENVOK+7!
>> DIC ENVOK+7*
>> DIC(0 ENVOK+7*
DIE ENVOK+9*, ENVOK+10!
DIFQ SORRY+1!
>> DLAYGO ENVOK+7*
DNS DNS+1~, DNS+3*, DNS+4, DNS+5, DNS+6
>> DR ENVOK+9*
DT ENVOK+9
DUZ BMXE01+6, BMXE01+11
DUZ(0 BMXE01+8
>> LINE BMXE01+3*, SORRY+8
POP DNS+1~, DNS+6
U BMXE01+11
>> X BMXE01+11*, BMXE01+12, BMXE01+13, BMXE01+16*, BMXE01+17, BMXE01+18, BMXE01+20*, BMXE01+21, BMXE01+22, ENVOK+7*
>> XPDABORT BMXE01+5*, SORRY+2*
>> XPDDIQ("XPZ1" ENVOK+5*
>> XPDDIQ("XPZ2" ENVOK+5*
>> XPDENV ENVOK+5, ENVOK+6
>> XPDNOQUE BMXE01+4*
>> XPX BMXE01+6*, BMXE01+8*, BMXE01+12*, BMXE01+18*, BMXE01+22*, SORRY+10
>> Y ENVOK+8

Marked Items

Name Field # of Occurrence
$T( BMXE01+14
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