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

Package: IHS Accounts Receivable

Routine: BAREV816


Information

BAREV816 ; IHS/SD/LSL - ENVIRONMENT CHECK V1.8 PATCH 16; 01/29/2010

Source Information

Source file <BAREV816.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 3 ^%ZTLOAD  $$CJ^XLFSTR  ($$PATCH,$$VERSION)^XPDUTL  
IHS VA Utilities 2 $$DIR^XBDIR  HELP^XBHELP  
VA Fileman 2 NOW^%DTC  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
NOW^%DTC POST+2
^%ZTLOAD POST+11
IX^DIC BAREV816+46
$$DIR^XBDIR BAREV816+75
HELP^XBHELP BAREV816+66, BAREV816+72
$$CJ^XLFSTR BAREV816+13, BAREV816+14, BAREV816+20, BAREV816+29, BAREV816+38, BAREV816+48, BAREV816+49, BAREV816+50, BAREV816+60, BAREV816+63
, BAREV816+65, 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: BAREV816+5
Function Call: WRITE
  • Prompt: !,"DUZ(0) UNDEFINED OR NULL"
  • Line Location: BAREV816+9
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("Hello, "_$P(X,",",2)_" "_$P(X,","),IOM)
  • Line Location: BAREV816+13
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("Checking Environment for "_$P($T(+2),";",4)_" V "_$P($T(+2),";",3),IOM)
  • Line Location: BAREV816+14
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("Need at least XU v8.0 Patch 1011..... "_$S(BARXU=0:"NOT ",1:"")_"Present",IOM)
  • Line Location: BAREV816+20
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("Need at least XB v3.0 Patch 11..... "_$S(BARXB=0:"NOT ",1:"")_"Present",IOM)
  • Line Location: BAREV816+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: BAREV816+38
Function Call: WRITE
  • Prompt: !!,*7,*7,$$CJ^XLFSTR("You Have More Than One Entry In The",IOM)
  • Line Location: BAREV816+48
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("PACKAGE File with an ""BAR"" prefix.",IOM)
  • Line Location: BAREV816+49
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("One entry needs to be deleted.",IOM)
  • Line Location: BAREV816+50
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("FIX IT! Before Proceeding.",IOM),!!,*7,*7,*7
  • Line Location: BAREV816+63
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("ENVIRONMENT OK.",IOM)
  • Line Location: BAREV816+65
Function Call: WRITE
  • Prompt: !!,?5,"*** TASK = ",ZTSK,!
  • Line Location: POST+13
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:
    • BAREV816+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] BAREV816+47
^VA(200 - [#200] BAREV816+12

Label References

Name Line Occurrences
$$INSTALLD BAREV816+17, BAREV816+26, BAREV816+35, BAREV816+58
$$VCHK BAREV816+23, BAREV816+32
SORRY BAREV816+6, BAREV816+10, BAREV816+21, BAREV816+30, BAREV816+39, BAREV816+51, BAREV816+61, BAREV816+75, VCHK+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % POST+7
>> %H POST+3, POST+4
BAR BAREV816+56~, BAREV816+58*, BAREV816+59*, BAREV816+60, BAREV816+61
BARABM BAREV816+34~, BAREV816+35*, BAREV816+36*, BAREV816+37*, BAREV816+38, BAREV816+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
>> BARTMP1 POST+3*, POST+6
>> BARTMP2 POST+4*, POST+6
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 BAREV816+25~, BAREV816+26*, BAREV816+27*, BAREV816+29, BAREV816+30
BARXU BAREV816+16~, BAREV816+17*, BAREV816+18*, BAREV816+19*, BAREV816+20, BAREV816+21, BAREV816+28*
>> D BAREV816+45*
DA BAREV816+41~
DIC BAREV816+41~, BAREV816+43*
DIC(0 BAREV816+44*
DIFQ SORRY+1!, VCHK+5!
DUZ BAREV816+4, BAREV816+12
DUZ(0 BAREV816+8
I BAREV816+56~, BAREV816+57*, BAREV816+58, BAREV816+59, BAREV816+60
IOM BAREV816+13, BAREV816+14, BAREV816+20, BAREV816+29, BAREV816+38, BAREV816+48, BAREV816+49, BAREV816+50, BAREV816+60, BAREV816+63
, BAREV816+65, SORRY+3, VCHK+4
U BAREV816+12
X BAREV816+12*, BAREV816+13, BAREV816+42*, SORRY~, SORRY+2
>> XPDDIQ("XPZ1" BAREV816+71*
>> XPDDIQ("XPZ2" BAREV816+71*
>> XPDENV BAREV816+68
XPDQUIT BAREV816+3!, BAREV816+63, SORRY+2*, VCHK+5*
>> Y BAREV816+47
>> ZTDESC POST+7*
>> ZTDTH POST+6*
>> ZTIO POST+8*
>> ZTPRI POST+9*
>> ZTRTN POST+1*
ZTSK POST+10!, POST+13

Marked Items

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