Routine: RACTEX2

Package	Total	Call Graph
VA Fileman	9	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	5	$$FUTC^RACPTCSV DW^RACPTMSC ^RACTEX3 WARNPRC^RAUTL CHGPRC^RAUTL21

Entry Points

Name	Comments	DBIA/ICR reference
C16S
X29
X28
X
X25
X24
X27
X20
X23
X22
24
25
26
27
20
21
22
23
28
29
RD
RE
4
8
11
C6F1
D
C24
P
T
C24S
2
NKEY
PR
BEGIN
3
7
O
W
RP
30
Y
SET
C6S
C24F1
X8
X9
6
X2
X3
X1
X6
C6
X4
B
N
R
V
Z
C16F1
10
13
12
15
14
17
16
19
18
X7
DE
C16
TR
1
5
9
KEYCHK()
A
I
X18
X19
X10
X11
X12
X13
X14
X15
X16
QS
SAVEVALS

External References

Name	Field # of Occurrence
E^DIE0	I+1, 16+4, 24+4
^DIE17	RD
F^DIE17	1, 2, 3, 4, 7, 8, 9, 10, 11, 12 , 13, 14, 15, 16, 18, 19, 20, 22, 23, 24 , 25, 27, 28, 29, 30
FIREREC^DIE17	1, 2, 3, 4, 7, 8, 9, 10, 11, 12 , 13, 14, 15, 18, 19, 20, 22, 23, 25, 27 , 28, 29
M^DIE17	T
N^DIE17	RP, 16+4, 24+4
OUT^DIE17	1, 2, 3, 4, 7, 8, 9, 10, 11, 12 , 13, 14, 15, 18, 19, 20, 22, 23, 25, 27 , 28, 29
UNIQFERR^DIE17	Z
Z^DIE17	X
Z^DIE2	RD+1
^DIE3	T
AST^DIED	P
NOSCR^DIED	P
QQ^DIEQ	QS
$$CREF^DILF	C6F1, C24F1
$$OREF^DILF	C6F1, C24F1
^DIR	SET+2
RW^DIR2	O+1
$$FUTC^RACPTCSV	X27
DW^RACPTMSC	C6+4, C24+4
^RACTEX3	30
WARNPRC^RAUTL	X12
CHGPRC^RAUTL21	X11

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 radiopharms ...",! Line Location: X15+0
Function Call: WRITE	Prompt: !,"... Deleting Medications ...",! Line Location: X19+0
Function Call: WRITE	Prompt: !?3,$C(7),"A 'detailed' procedure or a 'series' of procedures is required!" Line Location: X23+0
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	X6, X24
^DISV(	RD+2, Z*
^RA(79.2 - [#79.2]	X2
^RADPT - [#70]	DE, X2, X3, X4, C6+2!, C6S+2, X20!, C24+2!, C24S+2
^RAMIS(71 - [#71]	X22, X29

Label References

Name	Line Occurrences
$$KEYCHK	Z
@(	B, V
A	N, Z, Y, RP, 1, 2, 3, 4, 7, 8 , 9, 10, 11, 12, 13, 14, 15, 16+4, 18, 19 , 20, 22, 23, 24+4, 25, 27, 28, 29
B	QS
BEGIN	RACTEX2+1
C16F1	C16S
C16S	C16
C24F1	C24S
C24S	C24
C6F1	C6S
C6S	C6
D	RD, RD+1, P+1, QS
DE	RACTEX2+1, 1, 2, 3, 4, 7, 8, 9, 10, 11 , 12, 13, 14, 15, 16, 18, 19, 20, 22, 23 , 24, 25, 27, 28, 29
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, 16+5, 24+5
RE	6+3
RP	PR, R, R+1
SAVEVALS	Z
SET	T
TR	RE
V	T, P+1
W	O, RE
X	N, T+1, P, Y
X1	1
X10	10
X11	11
X12	12
X13	13
X14	14
X15	15
X18	18
X19	19
X2	2
X20	20
X22	22
X23	23
X25	25
X27	27
X28	28
X29	29
X3	3
X4	4
X7	7
X8	8
X9	9
Z	P+1

Naked Globals

Name	Field # of Occurrence
^(	RD+2, R, R+1
^("F"	SAVEVALS*
^("R"	X4
^(0	DE+1, R, R+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*
>> D0	DE
>> D1	DE
>> DA	DE, X3, X4, C6+2, C6S+2, X11, X20, C24+2, C24S+2
>> DA(1	X2, X3, X4, C6+2, C6S+2, X20, C24+2, C24S+2
>> DA(2	X2, X3, X4, C6+2, C6S+2, X20, C24+2, C24S+2
DB	DE!, C6!, C6S!, C16!, C16S!, C24!, C24S!
DB(	T, P, X, SET, SET+1, 16+4, 24+4
>> DC	RP
DDER	T, T+1!, SET+2
DE	DE!
DE(	O+2, RE, Z, Y, PR, RP, SAVEVALS, SAVEVALS+1, KEYCHK, 6+1* , 16+1, 16+4, 24+1, 24+4
DE(16	DE+1*, C16, C16+1
DE(24	DE+1*, C24, C24+1, C24+3
DE(6	DE+1*, C6, C6+1, C6+3
DG	DE!, PR, R, R+1*, R+2, 1, 2, 3, 4, 7 , 8, 9, 10, 11, 12, 13, 14, 15, 16, 18 , 19, 20, 22, 23, 24, 25, 27, 28, 29, 30
DG(	Z*, C6S, C6S+1, C6S+3, C16S, C16S+1, C24S, C24S+1, C24S+3
>> DIC	DE, P, C6+1, C6+3, C6S+1, C6S+3, C16+1, C16S+1, C24+1, C24+3 , C24S+1, C24S+3
>> DIC("S"	T, Z!, X6, X24
>> DIC(0	P, 1, 2, 3, 4, 7, 8, 9, 10, 11 , 12, 13, 14, 15, 18, 19, 20, 22, 23, 25 , 27, 28, 29*
>> DIE	DE*, P, C6+1, C6+3, C6S+1, C6S+3, C6F1, C16+1, C16S+1, C24+1 , C24+3, C24S+1, C24S+3, C24F1
>> DIEFIRE	1, 2, 3, 4, 7, 8, 9, 10, 11, 12 , 13, 14, 15, 18, 19, 20, 22, 23, 25, 27 , 28, 29
>> DIEL	DE*
>> DIEZRXR(	C6F1, C6F1+1, C24F1, C24F1+1
>> DIEZTMP	SAVEVALS, SAVEVALS+1, SAVEVALS+2
>> DIFLD	N, T, D, SAVEVALS, SAVEVALS+1, SAVEVALS+2, 6, 16, 24*
>> DIIENS	SAVEVALS, SAVEVALS+1, SAVEVALS+2, C6F1, C24F1
DIQUIET	SET+1~*
DIR	SET~
DIR("V"	SET*
DIR(0	SET*
>> DIXR	C6F1+1, C24F1+1
>> DL	DE*, W
DLAYGO	P*, Z!
>> DLB	W, RD+2, Z, D, 6, 16, 24*
>> 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, 1, 2, 3* , 4, 5, C6S, C6S+1, C6S+3, 7, 8, 9, 10, 11* , 12, 13, 14, 15, 16, 16+4, C16S, C16S+1, 17, 18* , 19, 20, 21, 22, 23, 24, 24+4, C24S, C24S+1, C24S+3 , 25, 26, 27, 28, 29*
>> DQ(	A!, P+2, D*, PR
DTIME	TR
>> DTOUT	TR*
>> DU	DE, P, D, PR, SET, 6, 6+2, 16, 16+2, 24 , 24+2*
DUZ	RD+2, Z
>> DV	O+1, O+2, N, RD+2, T, P, P+1, Z, D, Y , PR, RP, I, 6, 16, 16+4, 24*, 24+4
>> DW	Z, D, SAVEVALS+1, KEYCHK, 1, 2, 3, 4, 6, 6+1 , 7, 8, 9, 10, 11, 12, 13, 14, 15, 16* , 16+1, 18, 19, 20, 22, 23, 24, 24+1, 25, 27 , 28, 29
>> DZ	QS*
>> RA0(	X3*
>> RA0(2	X9, X11
>> RAI	X3*
>> RAMDV	X22
>> RANUZD1	X2*
>> RAPRI	X7*, X9, X11, X22, X29
>> RAR	X4*
>> RAREM	X1, X8, X10, X28
>> RAWHICH	X13, X14, X18
>> RAY	X3*
>> RAZCM	X29*
U	DE+1, TR, P, P+2, Z, D, R, R+1, SET, 1 , 2, 3, X3, 4, 7, 8, 9, 10, 11, 12 , 13, 14, 15, 18, 19, 20, 22, X22, 23, 25 , 27, 28, 29
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, 2, 3, 4, C6+1, C6+2, C6+3, C6S* , C6S+1, C6S+2, C6S+3, 7, X7, 8, 9, 10, 11, 12 , 13, 14, 15, 16+4, C16+1, C16S, C16S+1, 18, 19, 20 , 22, 23, 24+4, C24+1, C24+2, C24+3, C24S, C24S+1, C24S+2, C24S+3 , 25, 27, 28, 29
>> Y	O, O+1, O+2, P, Y, PR, R, R+1, R+2, SET+2 , 1, 2, 3, 4, 7, 8, 9, X9, 10, 11 , 12, 13, X13, 14, X14, 15, 16+3, 16+4, 18, X18* , 19, 20, 22, X22, 23, 24+3, 24+4, 25, X25, 27* , X27, 28, 29*
>> 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: RACTEX2

Information

Source Information

Call Graph

Call Graph Total: 14

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