Routine: RACTTK17

Package	Total	Call Graph
VA Fileman	12	^%DT ^DIC E^DIE0 (,1,F,FIREREC,M,N,OUT,UNIQFERR,Z)^DIE17 Z^DIE2 ^DIE3 (AST,NOSCR)^DIED QQ^DIEQ $$EXTERNAL^DILFD $$GET1^DIQ ^DIR RW^DIR2
Kernel	1	($$FMADD,$$FMTE)^XLFDT
Radiology Nuclear Medicine	1	$$VOL^RADD1

Package	Total	Caller Graph
Radiology Nuclear Medicine	1	RACTTK16

Entry Points

Name	Comments	DBIA/ICR reference
DE
X10
26
X11
X25
X24
20
X21
X20
X23
PR
1
BEGIN
SET
RP
21
22
23
TR
X8
RD
RE
3
2
5
4
7
6
9
X3
X1
X7
KEYCHK()
X5
A
24
B
D
25
I
27
13
O
N
P
R
T
W
V
Y
X
X12
Z
X14
X16
X17
11
10
QS
12
15
14
17
16
19
18
NKEY
X4
8
X13
SAVEVALS

External References

Name	Field # of Occurrence
^%DT	X4
^DIC	X5, X8, X14, X21
E^DIE0	I+1
^DIE17	RD
1^DIE17	27
F^DIE17	3, 7, 10, 12, 13, 16, 20, 23
FIREREC^DIE17	3, 7, 10, 12, 13, 16, 20, 23
M^DIE17	T
N^DIE17	RP
OUT^DIE17	3, 7, 10, 12, 13, 16, 20, 23
UNIQFERR^DIE17	Z
Z^DIE17	X
Z^DIE2	RD+1
^DIE3	T
AST^DIED	P
NOSCR^DIED	P
QQ^DIEQ	QS
$$EXTERNAL^DILFD	25+2
$$GET1^DIQ	11+2, 14+2
^DIR	SET+2
RW^DIR2	O+1
$$VOL^RADD1	X24
$$FMADD^XLFDT	X4
$$FMTE^XLFDT	4+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: W Line Location: W+0
Function Call: WRITE	Prompt: !?DL+DL-2,DLB_": " Line Location: W+0
Function Call: WRITE	Prompt: W Line Location: O+0
Function Call: WRITE	Prompt: Y Line Location: O+0
Function Call: WRITE	Prompt: !?9 Condition for execution: $X>45 Line Location: O+0
Function Call: WRITE	Prompt: " (No Editing)" Line Location: O+2
Function Call: READ	Timeout: DTIME Variable: X Line Location: TR+0
Function Call: WRITE	Prompt: $C(7) Line Location: TR+0
Function Call: WRITE	Prompt: " "_X Line Location: RD+2
Routine Call	DIC Line Location: X5 X8 X14 X21
Routine Call	DIR Line Location: SET+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^RADPTN - [#70.2]	Classic Fileman Calls
71.08	EXTERNAL^DILFD
^RAMIS(71.6 - [#71.6]	GET1^DIQ
^RAMIS(71.7 - [#71.7]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(	T, R, R+1
^DD("DD"	R+2
^DD("KEY" - [#.31]	N
^DISV(	RD+2, Z*
^RADPTN - [#70.2]	DE, X4, X16
^RAMIS(71 - [#71]	X7
^RAMIS(71.6 - [#71.6]	X13, X16
^VA(200 - [#200]	5+2

Label References

Name	Line Occurrences
$$KEYCHK	Z
@(	B, V
A	N, Z, Y, RP, 3, 7, 10, 12, 13, 16 , 20, 23
B	QS
BEGIN	RACTTK17+1
D	RD, RD+1, P+1, QS
DE	RACTTK17+1, 3, 7, 10, 12, 13, 16, 20, 23
N	Y
NKEY	N
O	Y, RP
P	T
PR	RE, I+1
QS	RD, NKEY
R	R, R+1
RD	Y, I, I+1
RE	1+1, 8+2, 17+1, 21+2, 24+2
RP	PR, R, R+1
SAVEVALS	Z
SET	T
TR	RE
V	T, P+1
W	O, RE
X	N, T+1, P, Y
X10	10
X12	12
X13	13
X16	16
X20	20
X23	23
X3	3
X7	7
Y	4+3, 5+4, 11+4, 14+4, 25+4
Z	P+1

Naked Globals

Name	Field # of Occurrence
^(	RD+2, R, R+1
^("F"	SAVEVALS*
^("SITX"	DE+3
^(0	DE+1, R, R+1, X4
^(12.1	T

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	DE+1, DE+2, DE+3, T, R+2, SET+2*
>> %DT	X4*
>> %DT(0	X4*!
%Z	DE+1, DE+2, DE+3, DE+4!
>> D	N, D*
>> D0	DE, X4
>> D1	X4
>> DA	DE, X16
>> DA(1	X16
DB	DE!
DB(	T, P, X, SET, SET+1
>> DC	RP
DDER	T, T+1!, SET+2
DE	DE!
DE(	O+2, RE, Z, Y, PR, RP, SAVEVALS, SAVEVALS+1, KEYCHK
DE(1	DE+1*
DE(11	DE+1*
DE(14	DE+1*
DE(17	DE+3*
DE(21	DE+1*
DE(24	DE+2*
DE(25	DE+2*
DE(4	DE+1*
DE(5	DE+1*
DE(8	DE+1*
DG	DE!, PR, R, R+1*, R+2, 3, 7, 10, 12, 13 , 16, 20, 23
DG(	Z*
DIC	DE, P, X5!, X8!, X14!, X21!
DIC("S"	T, Z!, X5, X8, X14, X21
DIC(0	P, 3, 7, 10, 12, 13, 16, 20, 23*
>> DIE	DE*, P, X5, X8, X14, X21
>> DIEFIRE	3, 7, 10, 12, 13, 16, 20, 23
>> DIEL	DE*
>> DIEZTMP	SAVEVALS, SAVEVALS+1, SAVEVALS+2
>> DIFLD	N, T, D, SAVEVALS, SAVEVALS+1, SAVEVALS+2, 1, 4, 5, 8 , 11, 14, 17, 21, 24, 25
>> DIIENS	SAVEVALS, SAVEVALS+1, SAVEVALS+2
DIQUIET	SET+1~*
DIR	SET~
DIR("V"	SET*
DIR(0	SET*
>> DL	DE*, W
DLAYGO	P*, Z!
>> DLB	W, RD+2, Z, D, 1, 4, 5, 8, 11, 14 , 17, 21, 24, 25
>> DNM	BEGIN*
>> DP	DE*, N, T, SAVEVALS, SAVEVALS+1, SAVEVALS+2
>> DQ	O+2, A, B, RE, T, P, P+2, V, X, D , Y, PR, RP, SET, SET+1, SAVEVALS, BEGIN, 2, 3, 6* , 7, 9, 10, 12, 13, 15, 16, 18, 19, 20 , 22, 23, 26*
>> DQ(	A!, P+2, D*, PR
>> DQ(24	24+1*
DTIME	TR
>> DTOUT	TR*
>> DU	DE, P, D, PR, SET, 1, 4, 5, 5+1, 8 , 8+1, 11, 11+1, 14, 14+1, 17, 21, 21+1, 24, 25 , 25+1*
DUZ	RD+2, Z, 5+2
>> DV	O+1, O+2, N, RD+2, T, P, P+1, Z, D, Y , PR, RP, I, 1, 4, 5, 8, 11, 14, 17* , 21, 24, 25*
>> DW	Z, D, SAVEVALS+1, KEYCHK, 1, 3, 4, 5, 7, 8 , 10, 11, 12, 13, 14, 16, 17, 20, 21, 23 , 24, 25
>> DZ	QS*
>> RADIOPH	11+2, 14+2, 25+2
>> RANM702	4+1, X7
>> RANXT72(	X3, X10, X20, X23
>> RAPRI	X7
>> RAR1	X12*, X13, X16
U	DE+1, DE+2, DE+3, TR, P, P+2, Z, D, R, R+1 , SET, 3, 7, 10, 12, 13, 16, 20, 23
X	O+2, TR, N, RD, RD+1, RD+2, T, P, P+1!, P+2* , Z, X+1, QS, Y, PR, R, R+1, R+2, RP, I+1 , SET+2, NKEY, X1!, 3, 4+1, 4+2, X4!, 5+2, 5+3, X5! , 7, X8!, 10, 11+2, 11+3, 12, X12, 13, 14+2, 14+3 , X14!, 16, X17!, X17+1!, 20, X21!, 23, X24!, X24+1!, 25+2* , 25+3
>> Y	O, O+1, O+2, P, Y, PR, R, R+1, R+2, SET+2 , 3, X3, 4+2, X4, 5+3, X5, 7, X7, X8, 10* , X10, 11+3, 12, 13, X13, 14+3, X14, 16, X16, 20* , X20, X21, 23, X23, 25+3
>> Y(0	SET+2
YS	V!
>> ZTQUEUED	X, NKEY

Marked Items

Name	Field # of Occurrence
$T(@(3)	D

Customize PDF page

Package: Radiology Nuclear Medicine

Routine: RACTTK17

Information

Source Information

Call Graph

Call Graph Total: 14

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items