Routine: BCHRP11

Package	Total	Call Graph
VA Fileman	1	^DIR

Package

Total

Call Graph

^DIR

Package	Total	Caller Graph
IHS RPMS CHR System	1	BCHRP1

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
HEADER	;EP
HEADER1	;

Name	Field # of Occurrence
^DIR	HEADER+2

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: HEADER+2
Function Call: WRITE	Prompt: ?($S(BCHRTYPE="B":16,1:38)),"******** CONFIDENTIAL PATIENT INFORMATION ********",! Line Location: HEADER1+2
Function Call: WRITE	Prompt: ?(BCHCW-$L($P(^DIC(4,DUZ(2),0),U))/2),$P(^DIC(4,DUZ(2),0),U),?($S(BCHCW=132:120,1:72)),"Page ",BCHPG Line Location: HEADER1+3
Function Call: WRITE	Prompt: !?(BCHCW-$L(BCHTEXT)/2),BCHTEXT,! Line Location: HEADER1+5
Function Call: WRITE	Prompt: ?(BCHCW-$L(BCHTEXT)/2),BCHTEXT,! Line Location: HEADER1+7
Function Call: WRITE	Prompt: !?((BCHCW-BCHLENG)/2),BCHSORV,": ",BCHRSRT,! Line Location: HEADER1+8
Function Call: WRITE	Prompt: $TR($J(" ",BCHCW)," ","=") Line Location: HEADER1+9
Function Call: WRITE	Prompt: !," DATE",?11,"CHR",?15,"PATIENT NAME",?38,"LOC",?44,"TT",?49,"ASSESSMENTS - POVS" Line Location: HEADER1+11
Function Call: WRITE	Prompt: !," DATE",?11,"CHR",?15,"PATIENT NAME",?38,"LOC",?44,"TT",?49,"ASSESSMENTS - POVS",?86,"REF BY",?96,"REF TO",?105,"EVAL",?110,"TRV",?116,"# SERVED" Line Location: HEADER1+12
Function Call: WRITE	Prompt: !,$TR($J(" ",BCHCW)," ","-") Line Location: HEADER1+14
Routine Call	DIR Line Location: HEADER+2

Name	Line Occurrences (* Changed, ! Killed)
^DIC(4 - [#4]	HEADER1+3

Name	Line Occurrences
HEADER1	HEADER+1

Name	Field # of Occurrence
>> BCHBDD	HEADER1+6
>> BCHCW	HEADER1+3, HEADER1+5, HEADER1+7, HEADER1+8, HEADER1+9, HEADER1+14
>> BCHEDD	HEADER1+6
>> BCHLENG	HEADER1+8*
>> BCHPG	HEADER+1, HEADER1+1*, HEADER1+3
>> BCHQUIT	HEADER+2*
>> BCHRSRT	HEADER1+8
>> BCHRTYPE	HEADER1+2, HEADER1+11
>> BCHSORV	HEADER1+8
>> BCHSPAG	HEADER1+8
>> BCHSRTR	HEADER1+8
>> BCHTEXT	HEADER1+4, HEADER1+5, HEADER1+6, HEADER1+7
DIR	HEADER+2!
DIR(0	HEADER+2*
>> DTOUT	HEADER+2
DUZ(2	HEADER1+3
IO	HEADER+2
IO(0	HEADER+2
IOF	HEADER1+1
IOST	HEADER+2
U	HEADER1+3
>> Y	HEADER+2

Information