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

Package: IHS Accounts Receivable

Routine: BAREV187


Information

BAREV187 ; IHS/SD/LSL - ENVIRONMENT CHECK V1.8 PATCH 7; 09/17/2008

Source Information

Source file <BAREV187.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.
P7 ;DATA REMOVED FROM FILES TO PREVENT OVERRIDES
INTROI ; Intro text during KIDS Install.
SORRY(X) ;
VCHK(BARPRE,BARVER,BARQUIT)
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 BAREV187+46
$$DIR^XBDIR P7+21
HELP^XBHELP P7+12, P7+18
$$CJ^XLFSTR BAREV187+13, BAREV187+14, BAREV187+20, BAREV187+29, BAREV187+38, BAREV187+48, BAREV187+49, BAREV187+50, P7+6, P7+9
, P7+11, 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: BAREV187+5
Function Call: WRITE
  • Prompt: !,"DUZ(0) UNDEFINED OR NULL."
  • Line Location: BAREV187+9
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("Hello, "_$P(X,",",2)_" "_$P(X,","),IOM)
  • Line Location: BAREV187+13
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("Checking Environment for "_$P($T(+2),";",4)_" V "_$P($T(+2),";",3),IOM)
  • Line Location: BAREV187+14
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("Need at least XU v8.0 Patch 1011..... "_$S(BARXU=0:"NOT ",1:"")_"Present",IOM)
  • Line Location: BAREV187+20
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("Need at least XB v3.0 Patch 11..... "_$S(BARXB=0:"NOT ",1:"")_"Present",IOM)
  • Line Location: BAREV187+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: BAREV187+38
Function Call: WRITE
  • Prompt: !!,*7,*7,$$CJ^XLFSTR("You Have More Than One Entry In The",IOM)
  • Line Location: BAREV187+48
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("PACKAGE File with an ""BAR"" prefix.",IOM)
  • Line Location: BAREV187+49
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("One entry needs to be deleted.",IOM)
  • Line Location: BAREV187+50
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("FIX IT! Before Proceeding.",IOM),!!,*7,*7,*7
  • Line Location: P7+9
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("ENVIRONMENT OK.",IOM)
  • Line Location: P7+11
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:
    • BAREV187+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] BAREV187+47
^VA(200 - [#200] BAREV187+12

Label References

Name Line Occurrences
$$INSTALLD BAREV187+17, BAREV187+26, BAREV187+35, P7+4
$$VCHK BAREV187+23, BAREV187+32
SORRY BAREV187+6, BAREV187+10, BAREV187+21, BAREV187+30, BAREV187+39, BAREV187+51, P7+7, P7+21, VCHK+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BAR P7+3~, P7+4*, P7+5*, P7+6, P7+7
BARABM BAREV187+34~, BAREV187+35*, BAREV187+36*, BAREV187+37*, BAREV187+38, BAREV187+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
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 BAREV187+25~, BAREV187+26*, BAREV187+27*, BAREV187+29, BAREV187+30
BARXU BAREV187+16~, BAREV187+17*, BAREV187+18*, BAREV187+19*, BAREV187+20, BAREV187+21, BAREV187+28*
>> D BAREV187+45*
DA BAREV187+41~
DIC BAREV187+41~, BAREV187+43*
DIC(0 BAREV187+44*
DIFQ SORRY+1!, VCHK+5!
DUZ BAREV187+4, BAREV187+12
DUZ(0 BAREV187+8
IOM BAREV187+13, BAREV187+14, BAREV187+20, BAREV187+29, BAREV187+38, BAREV187+48, BAREV187+49, BAREV187+50, P7+6, P7+9
, P7+11, SORRY+3, VCHK+4
U BAREV187+12
X BAREV187+12*, BAREV187+13, BAREV187+42*, SORRY~, SORRY+2
>> XPDDIQ("XPZ1" P7+17*
>> XPDDIQ("XPZ2" P7+17*
>> XPDENV P7+14
>> XPDQUIT P7+9, SORRY+2*, VCHK+5*
>> Y BAREV187+47

Marked Items

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