Routine: BARRPRAC

Package	Total	Call Graph
IHS Accounts Receivable	8	^BARDBQUE ($$CDT,$$DATE)^BARDUTL (CHK,DT)^BARRHD (LOOP,PAZ)^BARRUTL $$IHS^BARUFUT INIT^BARUTL ^BARVKL0 $$VALI^BARVPM
VA Fileman	2	$$GET1^DIQ ^DIR
IHS VA Utilities	1	^XBFMK

Package

Total

Call Graph

IHS Accounts Receivable

^BARDBQUE ($$CDT,$$DATE)^BARDUTL (CHK,DT)^BARRHD (LOOP,PAZ)^BARRUTL $$IHS^BARUFUT INIT^BARUTL ^BARVKL0 $$VALI^BARVPM

VA Fileman

$$GET1^DIQ ^DIR

IHS VA Utilities

^XBFMK

Package	Total	Caller Graph
IHS Accounts Receivable	1	BAR A123 REIMB ACT REPORT

Package

Total

Caller Graph

IHS Accounts Receivable

BAR A123 REIMB ACT REPORT

Name	Comments	DBIA/ICR reference
SETHDR	; ; Build header array
DATES	; ; Ask Date Range
EN	; EP
COMPUTE	; EP
DTTYP	;EP
XIT	;
PRINT	;
DATA	; EP

External References

Name	Field # of Occurrence
^BARDBQUE	EN+16
$$CDT^BARDUTL	DATA+7, DATA+14
$$DATE^BARDUTL	DATES+4, DATES+6
CHK^BARRHD	SETHDR+16
DT^BARRHD	SETHDR+5
LOOP^BARRUTL	COMPUTE+3, COMPUTE+7
PAZ^BARRUTL	EN+17
$$IHS^BARUFUT	COMPUTE+7
INIT^BARUTL	EN+3
^BARVKL0	XIT+1
$$VALI^BARVPM	DATA+3, DATA+16
$$GET1^DIQ	DATA+4, DATA+11, DATA+18, DATA+22
^DIR	DTTYP+4
^XBFMK	DTTYP+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!," ============ Entry of "_BARDTYP_" Range =============",! Line Location: DATES+3
Function Call: WRITE	Prompt: ! Line Location: DATES+7
Function Call: WRITE	Prompt: !,"BILL#^A/R ACCT^APPROVAL DATE^APPROVING OFFICAL^BILL AMOUNT^CURRENT BILL AMOUNT^DATE OF SERVICE^INSURER TYPE^STATUS FIELD^VISIT LOCATION" Line Location: PRINT+1
Routine Call	DIR Line Location: DTTYP+4

FileNo	Call Tags
^VA(200 - [#200]	GET1^DIQ
^BARBL(2906 - [#90050.01]	GET1^DIQ
^BARAC(2906 - [#90050.02]	GET1^DIQ
^AUTTINTY - [#9999999.181]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^ABMDBILL(	DATA+10
^AUTTINTY("C"	DATA+17
^BARBL(	COMPUTE+7, DATA+1, DATA+14, DATA+19, DATA+20
^DIC(4 - [#4]	SETHDR+9, SETHDR+12
^TMP($J	COMPUTE+2!, DATA+24*, PRINT+3, PRINT+4

Name	Line Occurrences
DATES	EN+9, DATES+7, DATES+8
DTTYP	EN+7
SETHDR	EN+11
XIT	EN+10

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BAR	EN+1!, DATA+1, DATA+14, DATA+19, DATA+20, DATA+22
BAR("CONJ"	SETHDR+15*
BAR("HD"	SETHDR+4, SETHDR+7
BAR("LOC"	EN+6*, SETHDR+10, COMPUTE+3
BAR("LVL"	SETHDR+3, SETHDR+6, SETHDR+7
BAR("OPT"	SETHDR+2*
BAR("PRIVACY"	EN+5*
BAR("SUBR"	COMPUTE+1*
BAR("TXT"	SETHDR+8, SETHDR+9, SETHDR+11, SETHDR+12, SETHDR+13, SETHDR+14
>> BAR0	DATA+1*, DATA+2, DATA+4, DATA+6, DATA+7, DATA+8, DATA+9, DATA+12, DATA+13, DATA+15
>> BARACCT	DATA+4, DATA+5, DATA+23
>> BARAPPDT	DATA+7*, DATA+23
>> BARAPPR	DATA+10, DATA+11, DATA+23
>> BARB	PRINT+2, PRINT+3, PRINT+4
>> BARBAMT	DATA+12*, DATA+23
>> BARBILLN	DATA+6*, DATA+23, DATA+24
>> BARCBAMT	DATA+13*, DATA+23
>> BARDONE	EN+2, EN+8, DTTYP+6
>> BARDOS	DATA+14*, DATA+23
>> BARDTYP	DATES+2*, DATES+3
>> BARDUZ2	COMPUTE+4, COMPUTE+8, DATA+8, DATA+10
>> BAREND	DATES+6*, DATES+7, DATES+8, DATES+12
>> BARIEN	DATA+9*, DATA+10
>> BARITIEN	DATA+17*, DATA+18
>> BARITYP	DATA+3, DATA+4, DATA+5, DATA+16, DATA+17, DATA+18*, DATA+23
>> BARP("RTN"	EN+4*
>> BARQ("NS"	EN+14*
>> BARQ("RC"	EN+12*
>> BARQ("RP"	EN+13*
>> BARQ("RX"	EN+15*
>> BARREC	DATA+23*, DATA+24
>> BARSIEN	DATA+19*, DATA+20, DATA+21
>> BARSTART	EN+10, DATES+4*, DATES+5, DATES+8, DATES+11
>> BARSTAT	DATA+20, DATA+21, DATA+23
>> BARUSR	EN+3
>> BARVLOC	DATA+22*, DATA+23
BARY	EN+1!
BARY("DT"	DTTYP+7, DATES+2, DATES+11, DATES+12*
BARY("LOC"	SETHDR+9
>> D0	DATA+2, DATA+15
DIR	DTTYP+5!
DIR("A"	DTTYP+3*
DIR(0	DTTYP+2*
>> DTOUT	DTTYP+6
>> DUOUT	DTTYP+6
DUZ(2	SETHDR+12, COMPUTE+4, COMPUTE+5, COMPUTE+7, COMPUTE+8*, DATA+1, DATA+14, DATA+19, DATA+20
U	SETHDR+9, SETHDR+12, DATA+2, DATA+4, DATA+6, DATA+7, DATA+8, DATA+9, DATA+10, DATA+12 , DATA+13, DATA+14, DATA+15, DATA+20, DATA+23
>> Y	DTTYP+7

Customize PDF page

Package: IHS Accounts Receivable

Routine: BARRPRAC

Information

Source Information

Call Graph

Call Graph Total: 11

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: