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

Package: IHS Accounts Receivable

Routine: BAREV810


Information

BAREV810 ; IHS/SD/LSL - ENVIRONMENT CHECK V1.8 PATCH 10; 12/24/2008

Source Information

Source file <BAREV810.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.
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.
SORRY(X) ;
INTROI ; Intro text during KIDS Install.
VCHK(BARPRE,BARVER,BARQUIT)

External References

Name Field # of Occurrence
IX^DIC BAREV810+47
$$DIR^XBDIR BAREV810+76
HELP^XBHELP BAREV810+67, BAREV810+73
$$CJ^XLFSTR BAREV810+14, BAREV810+15, BAREV810+21, BAREV810+30, BAREV810+39, BAREV810+49, BAREV810+50, BAREV810+51, BAREV810+61, BAREV810+64
, BAREV810+66, 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: BAREV810+6
Function Call: WRITE
  • Prompt: !,"DUZ(0) UNDEFINED OR NULL"
  • Line Location: BAREV810+10
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("Hello, "_$P(X,",",2)_" "_$P(X,","),IOM)
  • Line Location: BAREV810+14
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("Checking Environment for "_$P($T(+2),";",4)_" V "_$P($T(+2),";",3),IOM)
  • Line Location: BAREV810+15
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("Need at least XU v8.0 Patch 1011..... "_$S(BARXU=0:"NOT ",1:"")_"Present",IOM)
  • Line Location: BAREV810+21
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("Need at least XB v3.0 Patch 11..... "_$S(BARXB=0:"NOT ",1:"")_"Present",IOM)
  • Line Location: BAREV810+30
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: BAREV810+39
Function Call: WRITE
  • Prompt: !!,*7,*7,$$CJ^XLFSTR("You Have More Than One Entry In The",IOM)
  • Line Location: BAREV810+49
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("PACKAGE File with an ""BAR"" prefix.",IOM)
  • Line Location: BAREV810+50
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("One entry needs to be deleted.",IOM)
  • Line Location: BAREV810+51
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("FIX IT! Before Proceeding.",IOM),!!,*7,*7,*7
  • Line Location: BAREV810+64
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("ENVIRONMENT OK.",IOM)
  • Line Location: BAREV810+66
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:
    • BAREV810+47

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] BAREV810+48
^VA(200 - [#200] BAREV810+13

Label References

Name Line Occurrences
$$INSTALLD BAREV810+18, BAREV810+27, BAREV810+36, BAREV810+59
$$VCHK BAREV810+24, BAREV810+33
SORRY BAREV810+7, BAREV810+11, BAREV810+22, BAREV810+31, BAREV810+40, BAREV810+52, BAREV810+62, BAREV810+76, VCHK+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BAR BAREV810+57~, BAREV810+59*, BAREV810+60*, BAREV810+61, BAREV810+62
BARABM BAREV810+35~, BAREV810+36*, BAREV810+37*, BAREV810+38*, BAREV810+39, BAREV810+40
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 BAREV810+26~, BAREV810+27*, BAREV810+28*, BAREV810+30, BAREV810+31
BARXU BAREV810+17~, BAREV810+18*, BAREV810+19*, BAREV810+20*, BAREV810+21, BAREV810+22, BAREV810+29*
>> D BAREV810+46*
DA BAREV810+42~
DIC BAREV810+42~, BAREV810+44*
DIC(0 BAREV810+45*
DIFQ SORRY+1!, VCHK+5!
DUZ BAREV810+5, BAREV810+13
DUZ(0 BAREV810+9
I BAREV810+57~, BAREV810+58*, BAREV810+59, BAREV810+60, BAREV810+61
IOM BAREV810+14, BAREV810+15, BAREV810+21, BAREV810+30, BAREV810+39, BAREV810+49, BAREV810+50, BAREV810+51, BAREV810+61, BAREV810+64
, BAREV810+66, SORRY+3, VCHK+4
U BAREV810+13
X BAREV810+13*, BAREV810+14, BAREV810+43*, SORRY~, SORRY+2
>> XPDDIQ("XPZ1" BAREV810+72*
>> XPDDIQ("XPZ2" BAREV810+72*
>> XPDENV BAREV810+69
XPDQUIT BAREV810+4!, BAREV810+64, SORRY+2*, VCHK+5*
>> Y BAREV810+48

Marked Items

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