Routine: RACTTK5

Package	Total	Call Graph
VA Fileman	10	$$EZBLD^DIALOG E^DIE0 (,F,FIREREC,M,N,OUT,UNIQFERR,Z)^DIE17 Z^DIE2 ^DIE3 (AST,NOSCR)^DIED QQ^DIEQ ($$CREF,$$OREF)^DILF ^DIR RW^DIR2
Radiology Nuclear Medicine	4	$$FUTC^RACPTCSV (DISCMOD,DW)^RACPTMSC ^RACTTK8 ($$PRGCM,STUFCM70,UPXCM)^RAMAINU

Package	Total	Caller Graph
Radiology Nuclear Medicine	1	RACTTK2

Entry Points

Name	Comments	DBIA/ICR reference
C9S
28
DE
29
X26
X10
26
X28
X9
20
X21
X23
PR
1
BEGIN
SET
RP
21
22
R20
C9
TR
X8
R24
RD
RE
3
2
5
4
7
6
9
X3
C1
X1
M24
X7
KEYCHK()
X5
A
24
B
D
25
I
27
C9F1
M20
13
O
N
X18
P
X19
R
T
W
V
Y
X
X12
Z
X14
X15
X16
X17
11
10
QS
12
15
14
17
16
19
18
23
NKEY
X4
C1S
8
C1F1
X13
SAVEVALS

External References

Name	Field # of Occurrence
$$EZBLD^DIALOG	20+1, 24+1
E^DIE0	I+1, 1+4, 9+4
^DIE17	RD
F^DIE17	1, 3, 4, 5, 7, 8, 9, 10, 12, 13 , 14, 15, 16, 17, 18, 19, 21, 23, 26, 28 , 29
FIREREC^DIE17	3, 4, 5, 7, 8, 10, 12, 13, 14, 16 , 17, 18, 19, 21, 23, 26, 28
M^DIE17	T
N^DIE17	RP, 1+4, 9+4
OUT^DIE17	3, 4, 5, 7, 8, 10, 12, 13, 14, 16 , 17, 18, 19, 21, 23, 26, 28
UNIQFERR^DIE17	Z
Z^DIE17	X
Z^DIE2	RD+1
^DIE3	T
AST^DIED	P
NOSCR^DIED	P
QQ^DIEQ	QS
$$CREF^DILF	C9F1
$$OREF^DILF	C9F1
^DIR	SET+2
RW^DIR2	O+1
$$FUTC^RACPTCSV	X12
DISCMOD^RACPTMSC	X28
DW^RACPTMSC	C9+4
^RACTTK8	29
$$PRGCM^RAMAINU	X17
STUFCM70^RAMAINU	X18
UPXCM^RAMAINU	X21

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
Function Call: WRITE	Prompt: !,"... Deleting medications ...",! Line Location: X4+0
Function Call: WRITE	Prompt: !?3,$C(7),"A 'detailed' procedure or a 'series' of procedures is required!" Line Location: X8+0
Routine Call	DIALOG Line Location: 20+1 24+1
Routine Call	DIR Line Location: SET+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^RADPT - [#70]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(	T, R, R+1
^DD("DD"	R+2
^DD("KEY" - [#.31]	N
^DD(70.03	X9
^DISV(	RD+2, Z*
^RADPT - [#70]	DE, X5!, C9+2!, C9S+2*, X18, 20+4, M20, R20+1, X21, 24+4 , M24, R24+1
^RAMIS(71 - [#71]	X7, X14

Label References

Name	Line Occurrences
$$KEYCHK	Z
20+1	R20+1
24+1	R24+1
@(	B, V
A	N, Z, Y, RP, 1+4, 3, 4, 5, 7, 8 , 9+4, 10, 12, 13, 14, 16, 17, 18, 19, 21 , 23, 26, 28
B	QS
BEGIN	RACTTK5+1
C1F1	C1S
C1S	C1
C9F1	C9S
C9S	C9
D	RD, RD+1, P+1, QS
DE	RACTTK5+1, 1, 3, 4, 5, 7, 8, 9, 10, 12 , 13, 14, 15, 16, 17, 18, 19, R20, 21, 23 , R24, 26, 28
M20	20+3
M24	24+3
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, 1+5, 9+5
RE	20+3, M20+1, 24+3, M24+1
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
X14	14
X16	16
X17	17
X18	18
X19	19
X21	21
X23	23
X26	26
X28	28
X3	3
X4	4
X5	5
X7	7
X8	8
Y	15+4
Z	P+1

Naked Globals

Name	Field # of Occurrence
^(	RD+2, R, R+1
^("F"	SAVEVALS*
^(0	DE+1, R, R+1, 20+3, 20+4, M20, R20+1, 24+3, 24+4, M24 , R24+1
^(12.1	T

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	DE+1, T, R+2, SET+2*
%Z	DE+1*, DE+2!
>> D	N, D, 20, 20+1, 20+3, 20+4, M20, R20+1, 24, 24+1 , 24+3, 24+4, M24, R24+1*
>> D0	DE, 20+4, M20, R20+1, 24+4, M24, R24+1
>> D1	DE, 20+4, M20, R20+1, 24+4, M24, R24+1
>> DA	DE, X5, C9+2, C9S+2, X17, X18, 20+4, M20, R20+1, X21 , 24+4, M24, R24+1
>> DA(1	X5, C9+2, C9S+2, X18, X21
>> DA(2	X5, C9+2, C9S+2, X18, X21
DB	DE!, C1!, C1S!, C9!, C9S!
DB(	T, P, X, SET, SET+1, 1+4, 9+4
>> DC	RP, 20+1, M20, 24+1, M24
DDER	T, T+1!, SET+2
DE	DE!
DE(	O+2, RE, Z, Y, PR, RP, SAVEVALS, SAVEVALS+1, KEYCHK, 1+1* , 1+4, 9+1*, 9+4
DE(1	DE+1*, C1, C1+1, 20!, 24!
DE(15	DE+1*
DE(20	M20*
DE(24	M24*
DE(9	DE+1*, C9, C9+1, C9+3
DG	DE!, PR, R, R+1*, R+2, 1, 3, 4, 5, 7 , 8, 9, 10, 12, 13, 14, 15, 16, 17, 18 , 19, 21, 23, 26, 28, 29
DG(	Z*, C1S, C1S+1, C9S, C9S+1, C9S+3
>> DGO	20+1, 24+1
>> DIC	DE, P, C1+1, C1S+1, C9+1, C9+3, C9S+1, C9S+3
>> DIC("S"	T, Z!, X9*
>> DIC(0	P, 3, 4, 5, 7, 8, 10, 12, 13, 14 , 16, 17, 18, 19, 21, 23, 26, 28
>> DIE	DE*, P, C1+1, C1S+1, C9+1, C9+3, C9S+1, C9S+3, C9F1
>> DIEFIRE	3, 4, 5, 7, 8, 10, 12, 13, 14, 16 , 17, 18, 19, 21, 23, 26, 28
>> DIEL	DE*
>> DIEZRXR(	C9F1, C9F1+1
>> DIEZTMP	SAVEVALS, SAVEVALS+1, SAVEVALS+2
>> DIFLD	N, T, D, SAVEVALS, SAVEVALS+1, SAVEVALS+2, 1, 9, 15, 20+1 , 24+1*
>> DIIENS	SAVEVALS, SAVEVALS+1, SAVEVALS+2, C9F1
DIQUIET	SET+1~*
DIR	SET~
DIR("V"	SET*
DIR(0	SET*
>> DIXR	C9F1+1*
>> DL	DE*, W
DLAYGO	P*, Z!
>> DLB	W, RD+2, Z, D, 1, 9, 15, 20+1, 24+1*
>> DNM	BEGIN*
>> DOW	20+1, 24+1
>> 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, 1, 1+4, C1S , C1S+1, 2, 3, 4, 5, 6, 7, 8, 9, 9+4 , C9S, C9S+1, C9S+3, 10, 11, 12, 13, 14, 15, 16 , 17, 18, 19, 21, 22, 23, 25, 26, 27, 28
>> DQ(	A!, P+2, D*, PR
>> DSC(	20+3, 24+3
DTIME	TR
>> DTOUT	TR*
>> DU	DE, P, D, PR, SET, 1, 1+2, 9, 9+2, 15 , 15+1, 20+2, 24+2*
DUZ	RD+2, Z
>> DV	O+1, O+2, N, RD+2, T, P, P+1, Z, D, Y , PR, RP, I, 1, 1+4, 9, 9+4, 15, 20+1, 24+1*
>> DW	Z, D, SAVEVALS+1, KEYCHK, 1, 1+1, 3, 4, 5, 7* , 8, 9, 9+1, 10, 12, 13, 14, 15, 16, 17* , 18, 19, 20+1, 21, 23, 24+1, 26, 28
>> DZ	QS*
>> RAMDV	X7
>> RAPRI	X7, X14, X18
>> RAREM	X13*
>> RASK	X23, X26
>> RAWHICH	X3
>> RAZCM	X14*, 15+2
>> RAZCM(0	X16*, X17, X18
U	DE+1, TR, P, P+2, Z, D, R, R+1, SET, 3 , 4, 5, 7, X7, 8, 10, 12, 13, 14, 16 , 17, 18, 19, 20+4, M20, R20+1, 21, 23, 24+4, M24 , R24+1, 26, 28
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, 1+4, C1+1, C1S, C1S+1, 3, 4, 5, 7 , 8, 9+4, C9+1, C9+2, C9+3, C9S, C9S+1, C9S+2, C9S+3, 10 , 12, 13, 14, 15+2, 15+3, 16, X16, 17, 18, 19 , X19, 21, 23, 26, 28*
>> Y	O, O+1, O+2, P, Y, PR, R, R+1, R+2, SET+2 , 1+3, 1+4, 3, X3, 4, 5, 7, X7, 8, 9+3* , 9+4, 10, X10, 12, X12, 13, 14, 15+3, 16, 17* , X17, 18, 19, 21, 23, X23, 26, X26, 28*
>> Y(0	SET+2
YS	V!
>> ZTQUEUED	X, NKEY

Marked Items

Name	Field # of Occurrence
$T(@(3)	D
$T(DISCMOD^RACPTMSC	X28

Customize PDF page

Package: Radiology Nuclear Medicine

Routine: RACTTK5

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