Routine: RACTEX17

Package	Total	Call Graph
VA Fileman	10	^%DT ^DIC E^DIE0 (,F,FIREREC,M,N,OUT,UNIQFERR,Z)^DIE17 Z^DIE2 ^DIE3 (AST,NOSCR)^DIED QQ^DIEQ ^DIR RW^DIR2
Radiology Nuclear Medicine	3	^RACTEX18 WARN^RANMED1 $$VALDOS^RASTREQN
Kernel	1	$$FMADD^XLFDT

Entry Points

Name	Comments	DBIA/ICR reference
42
X29
X28
X
X25
X24
X27
X21
X22
24
25
26
27
20
21
22
23
28
29
RD
RE
4
8
X32
X33
X30
X31
X36
D
X35
X38
X39
P
T
2
X42
X40
PR
BEGIN
3
7
O
W
RP
39
38
33
32
31
30
37
36
35
34
Y
SET
X9
6
X2
X3
C1
X1
X6
X7
X4
X5
B
N
R
V
Z
11
10
13
12
15
14
17
16
19
18
NKEY
C1F1
DE
X37
44
TR
43
40
41
1
5
9
KEYCHK()
A
I
X18
X19
X10
X11
X13
X15
X16
X17
QS
C1S
SAVEVALS

External References

Name	Field # of Occurrence
^%DT	X22
^DIC	X25
E^DIE0	I+1
^DIE17	RD
F^DIE17	2, 3, 4, 5, 6, 7, 9, 10, 11, 13 , 15, 16, 17, 18, 19, 21, 24, 27, 28, 30 , 31, 32, 33, 35, 36, 37, 38, 39, 40, 42 , 44
FIREREC^DIE17	2, 3, 4, 5, 6, 7, 9, 10, 11, 13 , 15, 16, 18, 19, 21, 24, 27, 28, 30, 31 , 32, 33, 35, 36, 37, 38, 39, 40, 42
M^DIE17	T
N^DIE17	RP
OUT^DIE17	2, 3, 4, 5, 6, 7, 9, 10, 11, 13 , 15, 16, 18, 19, 21, 24, 27, 28, 30, 31 , 32, 33, 35, 36, 37, 38, 39, 40, 42
UNIQFERR^DIE17	Z
Z^DIE17	X
Z^DIE2	RD+1
^DIE3	T
AST^DIED	P
NOSCR^DIED	P
QQ^DIEQ	QS
^DIR	SET+2
RW^DIR2	O+1
^RACTEX18	44
WARN^RANMED1	X35
$$VALDOS^RASTREQN	X19
$$FMADD^XLFDT	X22

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: ! Line Location: X37+0
Routine Call	DIC Line Location: X25
Routine Call	DIR Line Location: SET+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^RADPTN - [#70.2]	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.21	X17, X29
^DISV(	RD+2, Z*
^RADPTN - [#70.2]	DE, C1+2!, C1S+2*, X22
^RAMIS(71 - [#71]	X9, X11, X42

Label References

Name	Line Occurrences
$$KEYCHK	Z
2	1+3
@(	B, V
A	N, Z, Y, RP, 2, 3, 4, 5, 6, 7 , 9, 10, 11, 13, 15, 16, 18, 19, 21, 24 , 27, 28, 30, 31, 32, 33, 35, 36, 37, 38 , 39, 40, 42
B	QS, BEGIN
BEGIN	RACTEX17+1
C1F1	C1S
C1S	C1
D	RD, RD+1, P+1, QS
DE	RACTEX17+1, 2, 3, 4, 5, 6, 7, 9, 10, 11 , 13, 15, 16, 17, 18, 19, 21, 24, 27, 28 , 30, 31, 32, 33, 35, 36, 37, 38, 39, 40 , 42
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+3, 17+1, 22+1, 25+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
X11	11
X13	13
X15	15
X16	16
X18	18
X19	19
X2	2
X21	21
X24	24
X27	27
X28	28
X3	3
X30	30
X31	31
X32	32
X33	33
X35	35
X36	36
X37	37
X38	38
X39	39
X4	4
X40	40
X42	42
X5	5
X6	6
X7	7
X9	9
Y	29+3
Z	P+1

Naked Globals

Name	Field # of Occurrence
^(	RD+2, R, R+1
^("F"	SAVEVALS*
^(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*
>> %DT	X22*
>> %DT(0	X22*!
%Z	DE+1*, DE+2!
>> D	N, D*, BEGIN, 1+3
>> D0	DE, X3, X22
>> DA	DE, C1+2, C1S+2, X6
>> DA(1	C1+2, C1S+2
DB	DE!, C1!, C1S!
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, 1+1*
DE(1	DE+1*, C1, C1+1
DE(17	DE+1*
DE(22	DE+1*
DE(25	DE+1*
DE(29	DE+1*
DG	DE!, PR, R, R+1*, R+2, 2, 3, 4, 5, 6 , 7, 9, 10, 11, 13, 15, 16, 17, 18, 19 , 21, 24, 27, 28, 30, 31, 32, 33, 35, 36 , 37, 38, 39, 40, 42, 44
DG(	Z*, C1S, C1S+1
DIC	DE, P, C1+1, C1S+1, X25!*
DIC("S"	T, Z!, X25*
DIC(0	P, 2, 3, 4, 5, 6, 7, 9, 10, 11 , 13, 15, 16, 18, 19, 21, 24, 27, 28, 30 , 31, 32, 33, 35, 36, 37, 38, 39, 40, 42
>> DIE	DE*, P, C1+1, C1S+1, X5, X6, X25
>> DIEFIRE	2, 3, 4, 5, 6, 7, 9, 10, 11, 13 , 15, 16, 18, 19, 21, 24, 27, 28, 30, 31 , 32, 33, 35, 36, 37, 38, 39, 40, 42
>> DIEL	DE*
>> DIEZTMP	SAVEVALS, SAVEVALS+1, SAVEVALS+2
>> DIFLD	N, T, D, SAVEVALS, SAVEVALS+1, SAVEVALS+2, 1, 17, 22, 25 , 29*
>> 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, 17, 22, 25, 29*
>> 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+3, C1S, C1S+1 , 2, 3, 4, 5, 6, 7, 8, 9, 10, 11* , 12, 13, 14, 15, 16, 17, 18, 19, 20, 21 , 23, 24, 26, 27, 28, 30, 31, 32, 33, 34 , 35, 36, 37, 38, 39, 40, 41, 42, 43*
>> DQ(	A!, P+2, D*, PR
DTIME	TR
>> DTOUT	TR*
>> DU	DE, P, D, PR, SET, 1, 1+2, 17, 22, 25 , 25+1, 29
DUZ	RD+2, Z
>> DV	O+1, O+2, N, RD+2, T, P, P+1, Z, D, Y , PR, RP, I, 1, 17, 22, 25, 29*
>> DW	Z, D, SAVEVALS+1, KEYCHK, 1, 1+1, 2, 3, 4, 5* , 6, 7, 9, 10, 11, 13, 15, 16, 17, 18 , 19, 21, 22, 24, 25, 27, 28, 29, 30, 31 , 32, 33, 35, 36, 37, 38, 39, 40, 42*
>> DZ	QS*
>> RA00	X6*, X7, X13, X21, X24
>> RAASK	X36, X38, X39, X42*
>> RADIOPH	X9, X10, X11, X15, X16, X27, X28
>> RADOSE	X9, X30
>> RADRAWN	X9, X18, X19, 29+1
>> RAHI	X9, X11, X15, X16, X19, X27, X28, X32
>> RALOW	X9, X11, X15, X16, X19, X27, X28, X31
>> RAPRI	X9, X11, X42
>> RAPSDRUG	X2*, X9
>> RAREM	X4, X40
>> RASKMEDS	X9*
U	DE+1, TR, P, P+2, Z, D, R, R+1, SET, 2 , 3, 4, 5, 6, 7, 9, 10, 11, X11, 13 , X13, 15, X15, 16, X16, 18, 19, 21, X21, 24 , X24, 27, X27, 28, X28, 30, 31, 32, 33, 35 , 36, 37, 38, 39, 40, 42, X42
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, C1+1, C1+2, C1S, C1S+1, C1S+2, 2, X2, 3* , 4, 5, 6, 7, 9, 10, 11, 13, 15, 16 , X17!, 18, X18, 19, 21, X22!, 24, X25!, 27, 28 , 29+1, 29+2, X29!, 30, X30, 31, X31, 32, X32, 33* , 35, 36, 37, 38, 39, 40, 42*
>> Y	O, O+1, O+2, P, Y, PR, R, R+1, R+2, SET+2 , 2, 3, X3, 4, 5, X5, 6, 7, X7, 9 , 10, X10, 11, 13, X13, 15, 16, 18, 19, X19 , 21, X21, X22, 24, X24, X25, 27, 28, 29+2, 30 , 31, X31, 32, X32, 33, X33, 35, 36, 37, 38 , 39, X39, 40, 42, X42*
>> 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: RACTEX17

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