Routine: BCHRC9

Package	Total	Call Graph
VA Fileman	4	DD^%DT C^%DTC ^DIC ^DIR
IHS RPMS CHR System	1	XTMP^BCHUTIL
IHS VA Utilities	1	^XBDBQUE

Package	Total	Caller Graph
IHS RPMS CHR System	2	BCH P CHR REPORT 9 BCH P CHRIS II REPORT 9

Entry Points

Name	Comments	DBIA/ICR reference
BD	;get beginning date
PROG1	;enter program
ZIS	;CALL TO XBDBQUE
ERR
PROCESS	;
ED	;get ending date
INFORM	;
GETDATES	;
XIT	;
EOJ	;
PROG	;IHS/CMI/LAB - added program screen
D1	;
PROC	;EP - PROCESS REFERRAL REPORT
REG	;
D	; Run by date of service

External References

Name	Field # of Occurrence
DD^%DT	ED+1
C^%DTC	ED+4, D+1
XTMP^BCHUTIL	PROC+1
^DIC	PROG1+1
^DIR	BD+1, ED+1, PROG+2, REG+2
^XBDBQUE	ZIS+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7),$C(7),!!,"SITE NOT SET IN DUZ(2) - NOTIFY SITE MANAGER!!",!! Line Location: BCHRC9+4
Function Call: WRITE	Prompt: ! Line Location: BD+1
Function Call: WRITE	Prompt: ! Line Location: ED+1
Function Call: WRITE	Prompt: $C(7),$C(7),!,"Must be a valid date and be Today or earlier. Time not allowed!" Line Location: ERR+0
Function Call: WRITE	Prompt: !?20,"******** CHR REPORT NO. 9 ********" Line Location: INFORM+2
Function Call: WRITE	Prompt: !!?28,"DATA SUMMARY BY PROVIDER",!!,"You must enter the time frame for the report.",! Line Location: INFORM+3
Routine Call	DIC Line Location: PROG1+1
Routine Call	DIR Line Location: BD+1 ED+1 PROG+2 REG+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^BCHTPROG - [#90002.51]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^BCHR - [#90002]	D1+1, PROCESS+2
^BCHR("B"	D+2, D1+1
^BCHRPROB - [#90002.01]	PROCESS+13, PROCESS+15, PROCESS+17, PROCESS+21
^BCHRPROB("AD"	PROCESS+12
^BCHTSERV - [#90002.54]	PROCESS+15
^DPT - [#2]	PROCESS+7
^VA(200 - [#200]	PROCESS+10
^XTMP("BCHRC9"	PROC+3, PROCESS+11, PROCESS+14, PROCESS+17, PROCESS+19, PROCESS+21, PROCESS+23, PROCESS+25, PROCESS+26, PROCESS+28

Label References

Name	Line Occurrences
BD	ED+2, PROG+3
D	PROC+4
D1	D+2
EOJ	PROC+4
INFORM	BCHRC9+6
PROCESS	D1+1
PROG	PROG1+1, REG+3
REG	PROG+4
XIT	BD+2, ZIS+3

Naked Globals

Name	Field # of Occurrence
^(0	D1+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BCHBD	BD+3*, ED+1, ED+4, XIT+1!, D+1
BCHBDD	XIT+1!
BCHBT	XIT+1!, PROC+2*, PROC+3, PROCESS+11, PROCESS+14, PROCESS+17, PROCESS+19, PROCESS+21, PROCESS+23, PROCESS+25 , PROCESS+26, PROCESS+28
BCHBTH	BCHRC9+5, XIT+1!, PROC+2
BCHDT	XIT+1!
BCHED	ED+3*, XIT+1!, D+2
BCHEDD	XIT+1!
>> BCHET	EOJ+1*
BCHJOB	BCHRC9+5, XIT+1!, PROC+2, PROC+3, PROCESS+11, PROCESS+14, PROCESS+17, PROCESS+19, PROCESS+21, PROCESS+23 , PROCESS+25, PROCESS+26, PROCESS+28
BCHNAME	XIT+1!, PROCESS+10*, PROCESS+11, PROCESS+14, PROCESS+17, PROCESS+19, PROCESS+21, PROCESS+23, PROCESS+25, PROCESS+28
>> BCHNRPAT	PROCESS+2, PROCESS+5, PROCESS+6
BCHODAT	XIT+1!, D+2*, D1+1
>> BCHPAT	PROCESS+1*, PROCESS+4, PROCESS+6, PROCESS+7
BCHPRG	PROG+1, PROG+4, PROG1+2*, XIT+1!, PROCESS+9
>> BCHPROG	PROCESS+8*, PROCESS+9
BCHQUIT	XIT+1!
BCHR	XIT+1!, D1+1*, PROCESS+2, PROCESS+12
BCHR0	XIT+1!, D1+1*, PROCESS+1, PROCESS+8, PROCESS+10, PROCESS+19, PROCESS+23, PROCESS+25, PROCESS+26, PROCESS+27
>> BCHRCNT	D1+1*
>> BCHREG	REG+1, REG+4, PROCESS+4, PROCESS+5
>> BCHREGN	REG+1, REG+4
BCHSD	ED+4, XIT+1!, D+1, D+2
>> C	PROCESS+10, PROCESS+12, PROCESS+19, PROCESS+23
DA	PROG1+1!, REG+2!
DD	PROG1+1!
DIC	PROG1+1!*
DIC("A"	PROG1+1*
DIC(0	PROG1+1*
DIR	BD+1!, ED+1!, PROG+2!, REG+2!
DIR("?"	PROG+2*
DIR("A"	BD+1, ED+1, PROG+2, REG+2
DIR("B"	ED+1, PROG+2, REG+2*
DIR(0	BD+1, ED+1, PROG+2, REG+2
>> DIRUT	BD+1, BD+2, ED+1, ED+2, PROG+3, REG+3
DR	PROG1+1!
>> DUOUT	BD+1, ED+1
DUZ(2	BCHRC9+4
IOF	INFORM+1
N	XIT+1!, PROCESS+27*, PROCESS+28
P	XIT+1!
S	XIT+1!, PROCESS+15*
U	D1+1, PROCESS+1, PROCESS+2, PROCESS+8, PROCESS+10, PROCESS+13, PROCESS+14, PROCESS+15, PROCESS+17, PROCESS+19 , PROCESS+21, PROCESS+23, PROCESS+25, PROCESS+26, PROCESS+27, PROCESS+28
V	XIT+1!
X	ED+4, PROG1+1!, XIT+1!, XIT+2!, D+1, PROCESS+12*, PROCESS+13, PROCESS+15, PROCESS+17, PROCESS+21
>> X1	ED+4, D+1
>> X2	ED+4, D+1
>> XBNS	ZIS+1*
>> XBRC	ZIS+1*
>> XBRP	ZIS+1*
>> XBRX	ZIS+1*
Y	BD+3, ED+1, ED+3, PROG+4, PROG1+1!, PROG1+2, REG+4, XIT+2!, PROCESS+15, PROCESS+16
Y(0	REG+4

Customize PDF page

Package: IHS RPMS CHR System

Routine: BCHRC9

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: