Routine: BMCRR16

Package	Total	Call Graph
VA Fileman	3	C^%DTC ^DIC ^DIR
Referred Care Information System	2	DONE^BMCRLP2 ZIS^BMCRUTL
IHS Patient	1	KILL^AUPNPAT
IHS VA Utilities	1	^XBDBQUE
Kernel	1	$$FMTE^XLFDT

Package

Total

Call Graph

VA Fileman

C^%DTC ^DIC ^DIR

Referred Care Information System

DONE^BMCRLP2 ZIS^BMCRUTL

IHS Patient

KILL^AUPNPAT

IHS VA Utilities

^XBDBQUE

Kernel

$$FMTE^XLFDT

Package	Total	Caller Graph
Referred Care Information System	1	BMC RPT-IN HOUSE BY CLINIC

Package

Total

Caller Graph

Referred Care Information System

BMC RPT-IN HOUSE BY CLINIC

Entry Points

Name	Comments	DBIA/ICR reference
BD	;get beginning date
HEAD	;
END	;
ZIS	;call to XBDBQUE
HEAD1	;
BROWSE	;
ED	;get ending date
PRINT	;EP called from xbdbque
PROVIDER	;
R1	;
START	;
HEAD2	;
XIT	;EP
GETCLIN	;
CLIN	;
DONE	;
PROCR	;
PROC	;EP called from xbdbque
D	;DATE RANGE

Name	Field # of Occurrence
C^%DTC	ED+4
KILL^AUPNPAT	XIT+3
DONE^BMCRLP2	DONE+2
ZIS^BMCRUTL	ZIS+1
^DIC	GETCLIN+1
^DIR	BD+1, ED+1, CLIN+1, HEAD+1
^XBDBQUE	ZIS+6, BROWSE+2
$$FMTE^XLFDT	HEAD2+2, HEAD2+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"This report will tally all in-house referrals by clinic referred to.",! Line Location: START+2
Function Call: WRITE	Prompt: "Report will include both Primary and Secondary Referrals.",!! Line Location: START+3
Function Call: WRITE	Prompt: ! Line Location: BD+1
Function Call: WRITE	Prompt: ! Line Location: ED+1
Function Call: WRITE	Prompt: !!,"No IN-HOUSE REFERRALS",! Line Location: PRINT+3
Function Call: WRITE	Prompt: !!,BMCCLIN Line Location: PROVIDER+2
Function Call: WRITE	Prompt: !!,"Total Secondary Referrals = ",$S(BMCSRTOT="":0,1:BMCSRTOT) Line Location: PROVIDER+9
Function Call: WRITE	Prompt: !,"Total Primary Referrals = ",$S(BMCPRTOT="":0,1:BMCPRTOT) Line Location: PROVIDER+10
Function Call: WRITE	Prompt: !,"Total for ",BMCCLIN,?50,$J(BMCSTOT,5),! Line Location: PROVIDER+11
Function Call: WRITE	Prompt: ! Line Location: HEAD+1
Function Call: WRITE	Prompt: !?55,$$FMTE^XLFDT(DT),?72,"Page ",BMCPG,! Line Location: HEAD2+2
Function Call: WRITE	Prompt: ?20,"IN-HOUSE REFERRALS BY CLINIC",! Line Location: HEAD2+3
Function Call: WRITE	Prompt: ?14,"REFERRAL DATE RANGE: ",$$FMTE^XLFDT(BMCBD)," to ",$$FMTE^XLFDT(BMCED) Line Location: HEAD2+4
Function Call: WRITE	Prompt: !!,"CLINIC REFERRED TO",?20,"PROVIDER REFERRED FROM",?50,"NUMBER" Line Location: HEAD2+5
Function Call: WRITE	Prompt: !,$TR($J(" ",80)," ","-") Line Location: HEAD2+6
Routine Call	DIC Line Location: GETCLIN+1
Routine Call	DIR Line Location: BD+1 ED+1 CLIN+1 HEAD+1

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^BMCREF - [#90001]	R1+1, PROCR+5
^BMCREF("B"	PROC+2, PROC+3, R1+1
^DIC(40.7 - [#40.7]	PROCR+3
^VA(200 - [#200]	PROCR+4
^XTMP("BMCRR16"	PROCR+6, PROCR+7, PRINT+3, PRINT+4, DONE+1!, PROVIDER+3, PROVIDER+5, PROVIDER+6, PROVIDER+7

Name	Line Occurrences
@(	PRINT+1
BD	ED+2
BROWSE	ZIS+4
CLIN	CLIN+3
D	CLIN+2
DONE	PRINT+3
GETCLIN	CLIN+3
HEAD	PROVIDER+1, PROVIDER+4, PROVIDER+8
PROCR	R1+1
PROVIDER	PRINT+4
R1	PROC+3
XIT	BD+2, ZIS+2, ZIS+3, ZIS+4, ZIS+7

Name	Field # of Occurrence
^(	PROCR+6, PROCR+7, PROVIDER+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BMCBD	BD+3*, ED+1, ED+4, XIT+1!, HEAD2+4
BMCBT	XIT+1!, PROC+1*
BMCBTH	START+1*, XIT+1!, PROCR+6, PROCR+7, PRINT+3, PRINT+4, DONE+1, PROVIDER+3, PROVIDER+5, PROVIDER+6 , PROVIDER+7
BMCCLIN	CLIN+1, CLIN+3, XIT+1!, GETCLIN+3, PROCR+1, PRINT+4*, PROVIDER+2, PROVIDER+3, PROVIDER+5, PROVIDER+6 , PROVIDER+7, PROVIDER+11
BMCED	ED+3*, XIT+1!, PROC+3, HEAD2+4
BMCET	XIT+1!, PROC+2, END+1
BMCJOB	START+1*, XIT+1!, PROCR+6, PROCR+7, PRINT+3, PRINT+4, DONE+1, PROVIDER+3, PROVIDER+5, PROVIDER+6 , PROVIDER+7
BMCODAT	XIT+1!, PROC+2, PROC+3, R1+1
>> BMCOPT	ZIS+4
BMCPG	XIT+1!, PRINT+1, HEAD2+1, HEAD2+2
BMCPROV	XIT+1!, PROVIDER+3*, PROVIDER+5
BMCPRTOT	XIT+2!, PROVIDER+2, PROVIDER+7, PROVIDER+10
BMCQUIT	ZIS+2, ZIS+3, XIT+1!, PRINT+2, PRINT+4, PROVIDER+1, PROVIDER+3, PROVIDER+4, PROVIDER+8, HEAD+1*
BMCREF	XIT+1!, R1+1*, PROCR+5
BMCRREC	XIT+1!, R1+1*, PROCR+1, PROCR+2
BMCSD	ED+4*, XIT+1!, PROC+2, PROC+3
BMCSRTOT	XIT+2!, PROVIDER+2, PROVIDER+6, PROVIDER+9
BMCSTOT	XIT+1!, PROVIDER+2, PROVIDER+5, PROVIDER+11
>> C	PROCR+2, PROCR+3, PROCR+6, PROCR+7
D	XIT+1!
DA	CLIN+1!
DFN	XIT+1!, R1+1*
DIC	XIT+1!, GETCLIN+1*!
DIC(0	GETCLIN+1*
DIR	BD+1!, ED+1!, CLIN+1!, HEAD+1!
DIR("A"	BD+1, ED+1, CLIN+1*
DIR("B"	CLIN+1*
DIR(0	BD+1, ED+1, CLIN+1, HEAD+1
DIRUT	BD+1, BD+2, ED+1, ED+2, CLIN+2, ZIS+2, XIT+1!
DT	HEAD2+2
DTOUT	XIT+1!, HEAD+1
DUOUT	BD+1, ED+1, XIT+1!
IO	HEAD+1
IO(0	HEAD+1
IOF	HEAD1+1
IOSL	PROVIDER+1, PROVIDER+4, PROVIDER+8
IOST	PRINT+1, HEAD+1
P	XIT+1!, PROCR+2, PROCR+4, PROCR+6
>> R	PROCR+5*, PROCR+7
U	R1+1, PROCR+1, PROCR+2, PROCR+3, PROCR+4, PROCR+5
>> X	ED+4
X1	ED+4*, XIT+1!
X2	ED+4*, XIT+1!
>> XBIOP	BROWSE+2*
>> XBNS	ZIS+5, BROWSE+2
>> XBRC	ZIS+5, BROWSE+2
>> XBRP	ZIS+5, BROWSE+1
>> XBRX	ZIS+5, BROWSE+2
>> Y	BD+3, ED+3, CLIN+3, GETCLIN+2, GETCLIN+3, HEAD+1

Customize PDF page

Package: Referred Care Information System

Routine: BMCRR16

Information

Source Information

Call Graph

Call Graph Total: 8

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

Naked Globals

Local Variables

Legend: