Routine: BCHRU1

Package	Total	Call Graph
VA Fileman	4	DD^%DT C^%DTC ^DIC ^DIR
IHS VA Utilities	1	^XBDBQUE

Package	Total	Caller Graph
IHS RPMS CHR System	5	BCH P UNDUP REPORT 1 CHR BCH P UNDUP REPORT 2 AGE BCH P UNDUP REPORT 4 TRIBE BCH P UNDUP REPORT 5 PROGRAM BCH P UNDUP REPORT GENDER

Entry Points

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7),$C(7),!!,"SITE NOT SET IN DUZ(2) - NOTIFY SITE MANAGER!!",!! Line Location: START+1
Function Call: WRITE	Prompt: !,$C(7),$C(7),"REPORT NUMBER MISSING" Line Location: START+2
Function Call: WRITE	Prompt: ! Line Location: BD+1
Function Call: WRITE	Prompt: ! Line Location: ED+1
Function Call: WRITE	Prompt: ! Line Location: PROG+1
Function Call: WRITE	Prompt: ! Line Location: CHRT+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,"******** UNDUPLICATED PATIENT REPORT NO. ",BCHRPT," ********" Line Location: INFORM+2
Function Call: WRITE	Prompt: !!,"This report will present an unduplicated count of patients seen by ",BCHCH,".",!! Line Location: INFORM+3
Routine Call	DIC Line Location: PROG1+1 CHR1+2
Routine Call	DIR Line Location: BD+1 ED+1 PROG+3 CHRT+3 REG+2

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

Name	Field # of Occurrence
BCHBD	BD+3*, ED+1, ED+4, XIT+1!
BCHBDD	XIT+1!
BCHBT	XIT+1!
BCHBTH	START+4*, XIT+1!
BCHC	XIT+1!
BCHCA	XIT+1!
BCHCC	XIT+1!
BCHCH	XIT+1!, X1+1, X2+1, 1+1, 2+1, 3+1, 4+1, 5+1*, INFORM+3
>> BCHCHR1	CHR1+4*
BCHCS	XIT+1!
BCHCT	XIT+1!
BCHDT	XIT+1!
BCHED	ED+3*, XIT+1!
BCHEDD	XIT+1!
BCHET	XIT+1!
BCHHA	XIT+1!
BCHJOB	START+4*, XIT+1!
BCHODAT	XIT+1!
BCHPG	XIT+1!
BCHPRG	PROG+2, PROG+5, PROG1+2*, XIT+1!
BCHPROB	XIT+1!
BCHPROBN	XIT+1!
BCHPROG	XIT+1!
BCHPROVT	CHRT+2!, CHRT+5*, CHRT+6
BCHQUIT	XIT+1!
BCHR	XIT+1!
BCHR0	XIT+1!
>> BCHREG	REG+1, REG+4
>> BCHREGN	REG+1, REG+4
BCHRPT	START+2, START+3, XIT+1!, INFORM+2
BCHSD	ED+4*, XIT+1!
>> BCHSUB	SUB+2, SUB+8
>> BCHSUB3	SUB+2*
>> BCHSUBT	X1+1, X2+1, 1+1, 2+1, 3+1, 4+1, 5+1*
BCHTOTA	XIT+1!
BCHTOTC	XIT+1!
BCHTOTS	XIT+1!
BCHTOTT	XIT+1!
BCHX	XIT+1!
DA	PROG1+1!, CHRT+3!, REG+2!
DD	PROG1+1!
DIC	PROG1+1!, CHR1+1!, CHR1+2
DIC("A"	PROG1+1, CHR1+2
DIC(0	PROG1+1, CHR1+2
DIR	BD+1!, ED+1!, PROG+3!, CHRT+3!, REG+2!
DIR("?"	PROG+3*
DIR("A"	BD+1, ED+1, PROG+3, CHRT+3, REG+2*
DIR("B"	ED+1, PROG+3, CHRT+3, REG+2
DIR(0	BD+1, ED+1, PROG+3, CHRT+3, REG+2*
>> DIRUT	BD+1, BD+2, ED+1, ED+2, PROG+4, CHRT+4, REG+3
DR	PROG1+1!
>> DUOUT	BD+1, ED+1
DUZ(2	START+1
IOF	INFORM+1
X	ED+4, PROG1+1!
>> X1	ED+4*
>> X2	ED+4*
>> XBNS	ZIS+1*
>> XBRC	ZIS+1*
>> XBRP	ZIS+1*
>> XBRX	ZIS+1*
Y	BD+3, ED+1*, ED+3, PROG+5, PROG1+1!, PROG1+2, CHRT+5, CHR1+3, CHR1+4, REG+4
Y(0	REG+4