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

Package: IHS Accounts Receivable

Routine: BAREV818


Information

BAREV817 ; IHS/SD/TMM - ENVIRONMENT CHECK V1.8 PATCH 17; 12/22/2009

Source Information

Source file <BAREV818.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
IHS VA Utilities 2 $$DIR^XBDIR  HELP^XBHELP  
Kernel 2 $$CJ^XLFSTR  ($$PATCH,$$VERSION)^XPDUTL  
VA Fileman 1 IX^DIC  

Entry Points

Name Comments DBIA/ICR reference
INTROE ; Intro text during KIDS Environment check.
INTROI ; Intro text during KIDS Install.
SORRY(X) ;
VCHK(BARPRE,BARVER,BARQUIT)
POST ;EP - POST INSTALL
INSTALLD(BARNM,BARVR,BARPT) ;EP ;RLT
; RLT - 04/05/05 - Per Don Jackson, modified this tag to use
; PATCH^XPDUTL. Removed the reverse $O, problem
; with XU patch numbers. VA (lower than 1000) and
; IHS patch numers (1000 and higher) not loaded
; in numerical order. No longer
; verifies that a lower version did not get
; reinstalled over a higher version.

External References

Name Field # of Occurrence
IX^DIC BAREV817+46
$$DIR^XBDIR BAREV817+78
HELP^XBHELP BAREV817+69, BAREV817+75
$$CJ^XLFSTR BAREV817+13, BAREV817+14, BAREV817+20, BAREV817+29, BAREV817+38, BAREV817+48, BAREV817+49, BAREV817+50, BAREV817+62, BAREV817+66
, BAREV817+68, SORRY+3, VCHK+4
$$PATCH^XPDUTL INSTALLD+13
$$VERSION^XPDUTL VCHK+3, INSTALLD+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"DUZ UNDEFINED OR 0"
  • Line Location: BAREV818+5
Function Call: WRITE
  • Prompt: !,"DUZ(0) UNDEFINED OR NULL"
  • Line Location: BAREV818+9
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("Hello, "_$P(X,",",2)_" "_$P(X,","),IOM)
  • Line Location: BAREV818+13
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("Checking Environment for "_$P($T(+2),";",4)_" V "_$P($T(+2),";",3),IOM)
  • Line Location: BAREV818+14
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("Need at least XU v8.0 Patch 1011..... "_$S(BARXU=0:"NOT ",1:"")_"Present",IOM)
  • Line Location: BAREV818+20
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("Need at least XB v3.0 Patch 11..... "_$S(BARXB=0:"NOT ",1:"")_"Present",IOM)
  • Line Location: BAREV818+29
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("Need at least Third Party Billing v2.5 Patch 13..... "_$S(BARABM=0:"NOT ",1:"")_"Present",IOM)
  • Line Location: BAREV818+38
Function Call: WRITE
  • Prompt: !!,*7,*7,$$CJ^XLFSTR("You Have More Than One Entry In The",IOM)
  • Line Location: BAREV818+48
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("PACKAGE File with an ""BAR"" prefix.",IOM)
  • Line Location: BAREV818+49
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("One entry needs to be deleted.",IOM)
  • Line Location: BAREV818+50
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("FIX IT! Before Proceeding.",IOM),!!,*7,*7,*7
  • Line Location: BAREV818+66
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("ENVIRONMENT OK.",IOM)
  • Line Location: BAREV818+68
Function Call: WRITE
  • Prompt: *7,!,$$CJ^XLFSTR("Sorry....FIX IT!",IOM)
  • Line Location: SORRY+3
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("Need at least "_BARPRE_" v "_BARVER_"....."_BARPRE_" v "_BARV_" Present",IOM)
  • Line Location: VCHK+4
Routine Call
  • DIC
  • Line Location:
    • BAREV817+46

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)
^DIC(9.4 - [#9.4] BAREV817+47
^VA(200 - [#200] BAREV817+12

Label References

Name Line Occurrences
$$INSTALLD BAREV817+17, BAREV817+26, BAREV817+35, BAREV817+59
$$VCHK BAREV817+23, BAREV817+32
SORRY BAREV817+6, BAREV817+10, BAREV817+21, BAREV817+30, BAREV817+39, BAREV817+51, BAREV817+64, BAREV817+78, VCHK+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BAR BAREV817+56~, BAREV817+59*, BAREV817+61*, BAREV817+62
BARABM BAREV817+34~, BAREV817+35*, BAREV817+36*, BAREV817+37*, BAREV817+38, BAREV817+39
BARNM INSTALLD~, INSTALLD+10, INSTALLD+13, INSTALLD+15
BARPATCH INSTALLD+8~, INSTALLD+13*, INSTALLD+14
BARPRE VCHK~, VCHK+3, VCHK+4
BARPT INSTALLD~, INSTALLD+13, INSTALLD+15
BARQ BAREV817+56~, BAREV817+61*, BAREV817+64
BARQUIT VCHK~, VCHK+5
BARV VCHK+2~, VCHK+3*, VCHK+4, VCHK+5
BARVER VCHK~, VCHK+4, VCHK+5
BARVNUM INSTALLD+8~, INSTALLD+10*, INSTALLD+11, INSTALLD+15
BARVR INSTALLD~, INSTALLD+13
BARXB BAREV817+25~, BAREV817+26*, BAREV817+27*, BAREV817+29, BAREV817+30
BARXU BAREV817+16~, BAREV817+17*, BAREV817+18*, BAREV817+19*, BAREV817+20, BAREV817+21, BAREV817+28*
>> D BAREV817+45*
DA BAREV817+41~
DIC BAREV817+41~, BAREV817+43*
DIC(0 BAREV817+44*
DIFQ SORRY+1!, VCHK+5!
DUZ BAREV817+4, BAREV817+12
DUZ(0 BAREV817+8
I BAREV817+56~, BAREV817+58*, BAREV817+59, BAREV817+61, BAREV817+62
IOM BAREV817+13, BAREV817+14, BAREV817+20, BAREV817+29, BAREV817+38, BAREV817+48, BAREV817+49, BAREV817+50, BAREV817+62, BAREV817+66
, BAREV817+68, SORRY+3, VCHK+4
U BAREV817+12
X BAREV817+12*, BAREV817+13, BAREV817+42*, SORRY~, SORRY+2
>> XPDDIQ("XPZ1" BAREV817+74*
>> XPDDIQ("XPZ2" BAREV817+74*
>> XPDENV BAREV817+71
XPDQUIT BAREV817+3!, BAREV817+66, SORRY+2*, VCHK+5*
>> Y BAREV817+47

Marked Items

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