Routine: BRARPT2

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

Package

Total

Call Graph

VA Fileman

^%DT ^DIR

Kernel

^%ZISC

Radiology Nuclear Medicine

D^RAUTL

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

Package

Total

Caller Graph

IHS Mods To Radiology Nuclear Medicine

BRARPT1

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

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: !,$P(X,U,2),?10,$E(Q,1,20) Line Location: LINE+2
Function Call: WRITE	Prompt: ?31,$E(R,4,7),$E(R,2,3),"-",$P(X,U) Line Location: LINE+3
Function Call: WRITE	Prompt: ?43,$E($P(X,U,3),1,4) Line Location: LINE+4
Function Call: WRITE	Prompt: ?49,$E($P(X,U,4),1,31) Line Location: LINE+5
Function Call: WRITE	Prompt: ?8," * EXAM ROSTER BY RADIOLOGIST, PROCEDURE, DIAG CODE *" 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,"Status" Line Location: HD+11
Function Call: WRITE	Prompt: ?53,"Diagnostic Code" 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,"RADIOLOGIST: ",O,?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
Routine Call	DIR Line Location: EXIT+2 HD+2

Name	Line Occurrences (* Changed, ! Killed)
^DIC(4 - [#4]	HD+6
^TMP($J	PRINT+4, PRINT+5, PRINT+7, PRINT+8, PRINT+9, PRINT+10

Name	Line Occurrences
HD	PRINT+5, HD2+1
HD2	PRINT+7, LINE+1
LINE	PRINT+10

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	HD+8*!
>> BRAY	PRINT+1, PRINT+4, PRINT+5, PRINT+7, PRINT+8, PRINT+9, EXIT+2, LINE+1, HD+2, HD2+1
>> DIR(0	EXIT+2, HD+2
>> I	HD+10, HD+13, HD2+3, HD2+4
IO	PRINT+1
IO("S"	EXIT+2
IOF	EXIT+1, HD+3
IOSL	LINE+1, HD2+1
IOST	EXIT+1, EXIT+2, HD+2, HD+3
N	PRINT+3~, PRINT+4*, PRINT+5, PRINT+7, PRINT+8, PRINT+9, PRINT+10, HD+6
O	PRINT+3~, PRINT+5*, PRINT+7, PRINT+8, PRINT+9, PRINT+10, HD2+2, HD2+3
P	PRINT+3~, PRINT+6, PRINT+7, PRINT+8, PRINT+9, PRINT+10, HD2+2, HD2+4
Q	PRINT+3~, PRINT+8*, PRINT+9, PRINT+10, LINE+2
R	PRINT+3~, PRINT+9*, PRINT+10, LINE+3
>> RABEGDT	HD+7
>> RAENDDT	HD+9
>> RAPAGE	PRINT+1, HD+2, HD+3, HD+5
U	LINE+2, LINE+3, LINE+4, LINE+5, HD+6
X	PRINT+3~, PRINT+10, LINE+2, LINE+3, LINE+4, LINE+5, 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: BRARPT2

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: