Routine: BRARPT4

Package	Total	Call Graph
VA Fileman	2	^%DT ^DIR
Kernel	1	^%ZISC
Radiology Nuclear Medicine	1	D^RAUTL

Package	Total	Caller Graph
IHS Mods To Radiology Nuclear Medicine	1	BRARPT3

Entry Points

Name	Comments	DBIA/ICR reference
HD2	;---> SUBHEADER
TOT	;
EXIT	;
PRINT	;
LINE	;---> PRINT A LINE OF PATIENT DATA.
HD	;---> HEADER
SUB	;

External References

Name	Field # of Occurrence
^%DT	HD+8
^%ZISC	EXIT+3
^DIR	EXIT+2, HD+2
D^RAUTL	HD+7, HD+8, HD+9

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: EXIT+2
Function Call: WRITE	Prompt: ?31,$E(R,4,7),$E(R,2,3),"-",$P(X,U) Line Location: LINE+6
Function Call: WRITE	Prompt: ?43,$E($P(^RA(78.4,K,0),U),1,20) Line Location: LINE+7
Function Call: WRITE	Prompt: ?65,$J($P(X,U,3),4) Line Location: LINE+8
Function Call: WRITE	Prompt: ?75,$J($P(X,U,4),4) Line Location: LINE+9
Function Call: WRITE	Prompt: ?12," * FILM USAGE BY TECHNOLOGIST AND PROCEDURE *" Line Location: HD+4
Function Call: WRITE	Prompt: ?70,"Page: ",RAPAGE Line Location: HD+5
Function Call: WRITE	Prompt: !!?1,"Division: ",$P(^DIC(4,N,0),U),?52,"For period: " Line Location: HD+6
Function Call: WRITE	Prompt: ?64,Y,?76,"to" Line Location: HD+7
Function Call: WRITE	Prompt: !?1,"Run Date: ",Y Line Location: HD+8
Function Call: WRITE	Prompt: ?64,Y Line Location: HD+9
Function Call: WRITE	Prompt: ! Line Location: HD+10
Function Call: WRITE	Prompt: "-" Line Location: HD+10
Function Call: WRITE	Prompt: !,"Chart#",?10,"Patient",?31,"Date-Case#",?43,"Films: Size" Line Location: HD+11
Function Call: WRITE	Prompt: ?64,"Total",?73,"Retakes" Line Location: HD+12
Function Call: WRITE	Prompt: ! Line Location: HD+13
Function Call: WRITE	Prompt: "-" Line Location: HD+13
Function Call: WRITE	Prompt: !!?4,"TECHNOLOGIST: ",$E(O,1,19),?40,"PROCEDURE: ",P Line Location: HD2+2
Function Call: WRITE	Prompt: !?4 Line Location: HD2+3
Function Call: WRITE	Prompt: "-" Line Location: HD2+3
Function Call: WRITE	Prompt: ?40 Line Location: HD2+4
Function Call: WRITE	Prompt: "-" Line Location: HD2+4
Function Call: WRITE	Prompt: !?37,"Totals for this procedure: ",?65,$J(T,4),?75,$J(S,4) Line Location: SUB+2
Function Call: WRITE	Prompt: ! Line Location: TOT+2
Function Call: WRITE	Prompt: "*" Line Location: TOT+2
Function Call: WRITE	Prompt: !,"TECHNOLOGIST: ",$E(O,1,22) Line Location: TOT+3
Function Call: WRITE	Prompt: ?39,"Total Films and Retakes: ",?65,$J(W,4),?75,$J(V,4) Line Location: TOT+4
Function Call: WRITE	Prompt: ! Line Location: TOT+5
Function Call: WRITE	Prompt: "*" Line Location: TOT+5
Routine Call	DIR Line Location: EXIT+2 HD+2

Name	Line Occurrences (* Changed, ! Killed)
^DIC(4 - [#4]	HD+6
^RA(78.4 - [#78.4]	LINE+7
^TMP($J	PRINT+6, PRINT+7, PRINT+9, PRINT+11, PRINT+12, PRINT+13, PRINT+14

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	HD+8*!
>> BRAY	PRINT+1, PRINT+7, PRINT+9, PRINT+11, PRINT+12, PRINT+13, EXIT+2, LINE+2, HD+2, HD2+1
>> DIR(0	EXIT+2, HD+2
>> I	HD+10, HD+13, HD2+3, HD2+4, TOT+2, TOT+5
IO	PRINT+1
IO("S"	EXIT+2
IOF	EXIT+1, HD+3
IOSL	LINE+2, HD2+1, TOT+1
IOST	EXIT+1, EXIT+2, HD+2, HD+3
K	PRINT+5~, PRINT+13*, PRINT+14, LINE+7
L	PRINT+5~, LINE+4, LINE+5
N	PRINT+5~, PRINT+6*, PRINT+7, PRINT+9, PRINT+11, PRINT+12, PRINT+13, PRINT+14, HD+6
O	PRINT+5~, PRINT+7*, PRINT+9, PRINT+11, PRINT+12, PRINT+13, PRINT+14, HD2+2, HD2+3, TOT+3
P	PRINT+5~, PRINT+8, PRINT+9, PRINT+11, PRINT+12, PRINT+13, PRINT+14, HD2+2, HD2+4
Q	PRINT+5~, PRINT+10, PRINT+11, PRINT+12, PRINT+13, PRINT+14, LINE+4, LINE+5
R	PRINT+5~, PRINT+12*, PRINT+13, PRINT+14, LINE+6
>> RABEGDT	HD+7
>> RAENDDT	HD+9
>> RAEX	LINE+3, SUB+1
>> RAPAGE	PRINT+1, HD+2, HD+3, HD+5
S	PRINT+5~, PRINT+10, LINE+1, SUB+2, SUB+3
T	PRINT+5~, PRINT+10, LINE+1, SUB+2, SUB+3
U	LINE+1, LINE+4, LINE+6, LINE+7, LINE+8, LINE+9, HD+6
V	PRINT+5~, PRINT+8, SUB+3, TOT+4
W	PRINT+5~, PRINT+8, SUB+3, TOT+4
X	PRINT+5~, PRINT+14, LINE+1, LINE+4, LINE+6, LINE+8, LINE+9, HD+1~, HD+8
Y	HD+1~, HD+2, HD+7, HD+8, HD+9

Customize PDF page

Package: IHS Mods To Radiology Nuclear Medicine

Routine: BRARPT4

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Name	Line Occurrences
HD	PRINT+7, HD2+1, TOT+1
HD2	PRINT+9, LINE+2
LINE	PRINT+14
SUB	PRINT+11
TOT	PRINT+9