Routine: BAREV822

Package	Total	Call Graph
Kernel	3	$$CJ^XLFSTR $$ADD^XPDMENU ($$PATCH,$$VERSION,BMES,MES)^XPDUTL
IHS Accounts Receivable	2	EN^BARADJR7 $$INSTALLD^BAREV822
IHS VA Utilities	2	$$DIR^XBDIR HELP^XBHELP
VA Fileman	2	IX^DIC ^DIE

Package

Total

Call Graph

Kernel

$$CJ^XLFSTR $$ADD^XPDMENU ($$PATCH,$$VERSION,BMES,MES)^XPDUTL

IHS Accounts Receivable

EN^BARADJR7 $$INSTALLD^BAREV822

IHS VA Utilities

$$DIR^XBDIR HELP^XBHELP

VA Fileman

IX^DIC ^DIE

Package	Total	Caller Graph
IHS Accounts Receivable	1	BAREV822

Package

Total

Caller Graph

IHS Accounts Receivable

BAREV822

Name	Comments	DBIA/ICR reference
INTROE	; Intro text during KIDS Environment check.
INSTALLD(BARNM,BARVR,BARPT)	;EP ;RLT
INTROI	; Intro text during KIDS Install.
SORRY(X)	;
VCHK(BARPRE,BARVER,BARQUIT)
POST	;EP - POST INSTALL
ZNODE	;EP

External References

Name	Field # of Occurrence
EN^BARADJR7	POST+20
$$INSTALLD^BAREV822	POST+1
IX^DIC	BAREV822+44
^DIE	POST+13
$$DIR^XBDIR	BAREV822+73
HELP^XBHELP	BAREV822+64, BAREV822+70
$$CJ^XLFSTR	BAREV822+13, BAREV822+14, BAREV822+20, BAREV822+36, BAREV822+46, BAREV822+47, BAREV822+48, BAREV822+58, BAREV822+61, BAREV822+63 , SORRY+3, VCHK+4
$$ADD^XPDMENU	POST+18
$$PATCH^XPDUTL	INSTALLD+6
$$VERSION^XPDUTL	VCHK+3, INSTALLD+3
BMES^XPDUTL	POST+22
MES^XPDUTL	POST+18

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"DUZ UNDEFINED OR 0" Line Location: BAREV822+5
Function Call: WRITE	Prompt: !,"DUZ(0) UNDEFINED OR NULL" Line Location: BAREV822+9
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR("Hello, "_$P(X,",",2)_" "_$P(X,","),IOM) Line Location: BAREV822+13
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR("Checking Environment for "_$P($T(+2),";",4)_" V "_$P($T(+2),";",3),IOM) Line Location: BAREV822+14
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR("Need at least XU v8.0 Patch 1011..... "_$S(BARXU=0:"NOT ",1:"")_"Present",IOM) Line Location: BAREV822+20
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR("Need at least Third Party Billing v2.6 Patch 4..... "_$S(BARABM=0:"NOT ",1:"")_"Present",IOM) Line Location: BAREV822+36
Function Call: WRITE	Prompt: !!,7,7,$$CJ^XLFSTR("You Have More Than One Entry In The",IOM) Line Location: BAREV822+46
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR("PACKAGE File with an ""BAR"" prefix.",IOM) Line Location: BAREV822+47
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR("One entry needs to be deleted.",IOM) Line Location: BAREV822+48
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR("FIX IT! Before Proceeding.",IOM),!!,7,7,*7 Line Location: BAREV822+61
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR("ENVIRONMENT OK.",IOM) Line Location: BAREV822+63
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	DIE Line Location: POST+13
Routine Call	DIC Line Location: BAREV822+44

FileNo	Call Tags
^DIC(9.4 - [#9.4]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^BAR(90052.03 - [#90052.03]	POST+5
^BAR(90052.06	POST+7, POST+8
^BARBL(	ZNODE+3
^DIC(9.4 - [#9.4]	BAREV822+45
^DIC(90053.05	ZNODE+6
^DIC(90053.08	ZNODE+9
^VA(200 - [#200]	BAREV822+12

Name	Line Occurrences
$$INSTALLD	BAREV822+17, BAREV822+26, BAREV822+33, BAREV822+56
$$VCHK	BAREV822+23, BAREV822+30
SORRY	BAREV822+6, BAREV822+10, BAREV822+21, BAREV822+37, BAREV822+49, BAREV822+59, BAREV822+73, VCHK+5
ZNODE	POST+21

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BAR	BAREV822+54~, BAREV822+56, BAREV822+57, BAREV822+58, BAREV822+59, ZNODE+11!
BAR("GL"	ZNODE+5, ZNODE+6, ZNODE+8, ZNODE+9
BARABM	BAREV822+32~, BAREV822+33, BAREV822+34, BAREV822+35*, BAREV822+36, BAREV822+37
BARNM	INSTALLD~, INSTALLD+3, INSTALLD+6, INSTALLD+8
>> BARP	POST+6, POST+7, POST+8, POST+9
BARPATCH	INSTALLD+1~, INSTALLD+6*, INSTALLD+7
BARPRE	VCHK~, VCHK+3, VCHK+4
BARPT	INSTALLD~, INSTALLD+6, INSTALLD+8
BARQUIT	VCHK~, VCHK+5
>> BARS	POST+8*, POST+9
BARV	VCHK+2~, VCHK+3*, VCHK+4, VCHK+5
BARVER	VCHK~, VCHK+4, VCHK+5
BARVNUM	INSTALLD+1~, INSTALLD+3*, INSTALLD+4, INSTALLD+8
BARVR	INSTALLD~, INSTALLD+6
BARXB	BAREV822+25~, BAREV822+26, BAREV822+27
BARXU	BAREV822+16~, BAREV822+17, BAREV822+18, BAREV822+19, BAREV822+20, BAREV822+21, BAREV822+28
>> D	BAREV822+43*
DA	BAREV822+39~, POST+9*
DIC	BAREV822+39~, BAREV822+41*
DIC(0	BAREV822+42*
>> DIE	POST+9*
DIFQ	SORRY+1!, VCHK+5!
>> DR	POST+10, POST+11, POST+12*
DUZ	BAREV822+4, BAREV822+12
DUZ(0	BAREV822+8
DUZ(2	ZNODE+1, ZNODE+2, ZNODE+3, ZNODE+10*
DUZHOLD	ZNODE+1*, ZNODE+10, ZNODE+11!
I	BAREV822+54~, BAREV822+55, BAREV822+56, BAREV822+57, BAREV822+58, POST+5
IOM	BAREV822+13, BAREV822+14, BAREV822+20, BAREV822+36, BAREV822+46, BAREV822+47, BAREV822+48, BAREV822+58, BAREV822+61, BAREV822+63 , SORRY+3, VCHK+4
>> LET(	POST+5*
>> LET(1	POST+10
>> LET(2	POST+10
>> LET(3	POST+11
>> LET(4	POST+11
U	BAREV822+12
X	BAREV822+12, BAREV822+13, BAREV822+40, SORRY~, SORRY+2
>> XPDDIQ("XPZ1"	BAREV822+69*
>> XPDDIQ("XPZ2"	BAREV822+69*
>> XPDENV	BAREV822+66
XPDQUIT	BAREV822+3!, BAREV822+61, SORRY+2, VCHK+5
>> Y	BAREV822+45

Customize PDF page

Package: IHS Accounts Receivable

Routine: BAREV822

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items