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

Package: IHS Accounts Receivable

Routine: BAREV172


Information

BAREV172 ; IHS/SD/LSL - ENVIRONMENT CHECK V1.7 Patch 2 ;

Source Information

Source file <BAREV172.m>

Call Graph

Call Graph Total: 5

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

Entry Points

Name Comments DBIA/ICR reference
INTROE ; Intro text during KIDS Environment check.
SORRY(X) ;
INTROI ; Intro text during KIDS Install.
VCHK(BARPRE,BARVER,BARQUIT)

External References

Name Field # of Occurrence
IX^DIC BAREV172+24
$$DIR^XBDIR BAREV172+44
HELP^XBHELP BAREV172+35, BAREV172+41
$$CJ^XLFSTR BAREV172+12, BAREV172+13, BAREV172+26, BAREV172+27, BAREV172+28, BAREV172+32, BAREV172+34, SORRY+3, VCHK+4
$$VERSION^XPDUTL VCHK+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"DUZ UNDEFINED OR 0."
  • Line Location: BAREV172+4
Function Call: WRITE
  • Prompt: !,"DUZ(0) UNDEFINED OR NULL."
  • Line Location: BAREV172+8
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("Hello, "_$P(X,",",2)_" "_$P(X,","),IOM)
  • Line Location: BAREV172+12
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("Checking Environment for "_$P($T(+2),";",4)_" V "_$P($T(+2),";",3)_" Patch "_$P($T(+2),"**",2),IOM)
  • Line Location: BAREV172+13
Function Call: WRITE
  • Prompt: !!,*7,*7,$$CJ^XLFSTR("You Have More Than One Entry In The",IOM)
  • Line Location: BAREV172+26
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("PACKAGE File with an ""BAR"" prefix.",IOM)
  • Line Location: BAREV172+27
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("One entry needs to be deleted.",IOM)
  • Line Location: BAREV172+28
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("FIX IT! Before Proceeding.",IOM),!!,*7,*7,*7
  • Line Location: BAREV172+32
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("ENVIRONMENT OK.",IOM)
  • Line Location: BAREV172+34
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:
    • BAREV172+24

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] BAREV172+25
^VA(200 - [#200] BAREV172+11

Label References

Name Line Occurrences
$$VCHK BAREV172+15, BAREV172+16, BAREV172+17
SORRY BAREV172+5, BAREV172+9, BAREV172+29, BAREV172+44, VCHK+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BARPRE VCHK~, VCHK+3, VCHK+4
BARQUIT VCHK~, VCHK+5
BARV VCHK+2~, VCHK+3*, VCHK+4, VCHK+5
BARVER VCHK~, VCHK+4, VCHK+5
>> D BAREV172+23*
DA BAREV172+19~
DIC BAREV172+19~, BAREV172+21*
DIC(0 BAREV172+22*
DIFQ SORRY+1!, VCHK+5!
DUZ BAREV172+3, BAREV172+11
DUZ(0 BAREV172+7
IOM BAREV172+12, BAREV172+13, BAREV172+26, BAREV172+27, BAREV172+28, BAREV172+32, BAREV172+34, SORRY+3, VCHK+4
U BAREV172+11
X BAREV172+11*, BAREV172+12, BAREV172+20*, SORRY~, SORRY+2
>> XPDDIQ("XPZ1" BAREV172+40*
>> XPDDIQ("XPZ2" BAREV172+40*
>> XPDENV BAREV172+37
>> XPDQUIT BAREV172+32, SORRY+2*, VCHK+5*
>> Y BAREV172+25

Marked Items

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