Routine: RACTOE

Package	Total	Call Graph
VA Fileman	11	$$EZBLD^DIALOG ^DIC E^DIE0 (,F,FIREREC,M,N,OUT,UNIQFERR,Z)^DIE17 Z^DIE2 ^DIE3 (AST,NOSCR)^DIED QQ^DIEQ $$GETTMP^DIKC1 ^DIR RW^DIR2
Radiology Nuclear Medicine	4	^RACTOE3 EN2^RAPRI $$ITYPE^RASITE ORDPRC^RAUTL2

Entry Points

Name	Comments	DBIA/ICR reference
V
X29
X28
X
X25
X27
X26
X21
24
25
26
27
20
21
22
23
28
29
RD
RE
4
8
X30
D
C2F1
P
T
2
PR
BEGIN
R19
3
7
C2S
O
M23
W
RP
32
31
30
Y
SET
X9
6
X2
C2
X1
X7
X4
X5
B
N
R
X3
Z
11
10
13
12
15
14
17
16
19
18
NKEY
M19
DE
TR
1
5
9
KEYCHK()
A
I
X18
X10
X11
X13
X14
X16
X17
QS
R23
SAVEVALS

External References

Name	Field # of Occurrence
$$EZBLD^DIALOG	19+1, 23+1
^DIC	X2, X11
E^DIE0	I+1, M19+3, 25+4
^DIE17	RD
F^DIE17	1, 3, 4, 5, 7, 9, 10, 11, 13, 14 , 16, 17, 18, 21, 26, 28, 29, 30, 32
FIREREC^DIE17	1, 3, 4, 5, 7, 9, 10, 13, 14, 16 , 17, 18, 21, 26, 28, 29, 30
M^DIE17	T
N^DIE17	RP, M19+3, 25+4
OUT^DIE17	1, 3, 4, 5, 7, 9, 10, 13, 14, 16 , 17, 18, 21, 26, 28, 29, 30
UNIQFERR^DIE17	Z
Z^DIE17	X
Z^DIE2	RD+1
^DIE3	T
AST^DIED	P
NOSCR^DIED	P
QQ^DIEQ	QS
$$GETTMP^DIKC1	BEGIN+1
^DIR	SET+2
RW^DIR2	O+1
^RACTOE3	32
EN2^RAPRI	X9
$$ITYPE^RASITE	X4, X18
ORDPRC^RAUTL2	X2

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: !?3,$C(7),"Variables RACAT,RADFN,RADIV,RALIFN and RAPIFN must be defined!" Line Location: X1+0
Function Call: WRITE	Prompt: !?3,$C(7),"A 'detailed' procedure or a 'series' of procedures is required!" Line Location: X7+0
Function Call: WRITE	Prompt: !!?3,$C(7),^("HIS"),! Line Location: X29+0
Routine Call	DIALOG Line Location: 19+1 23+1
Routine Call	DIC Line Location: X2 X11
Routine Call	DIR Line Location: SET+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^RAO(75.1 - [#75.1]	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
^DIE(1453	BEGIN+2
^DISV(	RD+2, Z*
^RA(79 - [#79]	X5, X29
^RAMIS(71 - [#71]	2+3, X5, X9, X10
^RAMIS(71.2 - [#71.2]	X17, X18
^RAO(75.1 - [#75.1]	DE, C2+2!, C2S+2, 19+4, M19, 23+4, M23, R23+1, X30
^TMP($J	X30

Label References

Name	Line Occurrences
$$KEYCHK	Z
23+1	R23+1
@(	B, V
A	N, Z, Y, RP, 1, 3, 4, 5, 7, 9 , 10, 13, 14, 16, 17, 18, M19+3, R19+1, 21, 25+4 , 26, 28, 29, 30
B	QS
BEGIN	RACTOE+1
C2F1	C2S
C2S	C2
D	RD, RD+1, P+1, QS
DE	RACTOE+1, 1, 3, 4, 5, 7, 9, 10, 11, 13 , 14, 16, 17, 18, R19, 21, R23, 26, 28, 29 , 30
M19	19+3
M23	23+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, M19+4, 25+5
RE	11+2, 19+3, 23+3, M23+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
X1	1
X10	10
X13	13
X14	14
X16	16
X17	17
X18	18
X21	21
X26	26
X28	28
X29	29
X3	3
X30	30
X4	4
X5	5
X7	7
X9	9
Y	2+5, 27+3
Z	P+1, 25+5

Naked Globals

Name	Field # of Occurrence
^(	DE+2, RD+2, R, R+1, X5
^("F"	SAVEVALS*
^("HIS"	X29
^(0	DE+1, R, R+1, 2+3, C2+2, C2S+2, 19+3, 19+4, M19, 23+3 , 23+4, M23, R23+1, X30
^(12.1	T

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	DE+1, DE+2, T, R+2, SET+2
%Z	DE+1, DE+2, DE+3!
>> D	N, D, 19, 19+1, 19+3, 19+4, M19, 23, 23+1, 23+3 , 23+4, M23, R23+1
>> D0	BEGIN+3*
>> DA	DE, BEGIN+3, C2+2, C2S+2, 19+4, M19, 23+4, M23, R23+1, X30
DB	DE!, C2!, C2S!
DB(	T, P, X, SET, SET+1, M19+3, 25+4
>> DC	RP, 19+1, M19, 23+1, M23
DDER	T, T+1!, SET+2
DE	DE!
DE(	O+2, RE, Z, Y, PR, RP, SAVEVALS, SAVEVALS+1, KEYCHK, 2+1* , M19+3, 25+4*
DE(1	19!, 23!
DE(11	DE+1*
DE(19	M19*
DE(2	DE+1*, C2, C2+1
DE(23	M23*
DE(25	DE+1*
DE(27	DE+2*
DG	DE!, PR, R, R+1*, R+2, 1, 3, 4, 5, 7 , 9, 10, 11, 13, 14, 16, 17, 18, 21, 26 , 28, 29, 30, 32
DG(	Z*, C2S, C2S+1
>> DGO	19+1, 23+1
DIC	DE, P, C2+1, C2S+1, X2!, X11!
DIC("S"	T, Z!, X2, X11
DIC(0	P, 1, 3, 4, 5, 7, 9, 10, 13, 14 , 16, 17, 18, 21, 26, 28, 29, 30
>> DICRREC	BEGIN+2*
>> DIE	DE*, P, C2+1, C2S+1, X2, X11
DIEBADK	BEGIN+1!
DIEFIRE	BEGIN+1!, 1, 3, 4, 5, 7, 9, 10, 13, 14 , 16, 17, 18, 21, 26, 28, 29, 30
>> DIEL	DE*
>> DIEZ	BEGIN+3*
DIEZAR	BEGIN+1~, BEGIN+2*
DIEZRXR	BEGIN+1~
DIEZTMP	SAVEVALS, SAVEVALS+1, SAVEVALS+2, BEGIN+1~*
>> DIFLD	N, T, D, SAVEVALS, SAVEVALS+1, SAVEVALS+2, 2, 11, 19+1, 23+1 , 25, 27
DIIENS	SAVEVALS, SAVEVALS+1, SAVEVALS+2, BEGIN+1~, BEGIN+3*
DIQUIET	SET+1~*
DIR	SET~
DIR("V"	SET*
DIR(0	SET*
DIXR	BEGIN+1~
>> DL	DE*, W
DLAYGO	P*, Z!
>> DLB	W, RD+2, Z, D, 2, 11, 19+1, 23+1, 25, 27
>> DNM	BEGIN*
>> DOW	19+1, 23+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, C2S, C2S+1 , 3, 4, 5, 6, 7, 8, 9, 10, 11, 12* , 13, 14, 15, 16, 17, 18, M19+3, 20, 21, 22* , 24, 25+4, 26, 28, 29, 30, 31
>> DQ(	A!, P+2, D*, PR
>> DSC(	19+3, 23+3
DTIME	TR, BEGIN+3*
>> DTOUT	TR*
>> DU	DE, P, D, PR, SET, 2, 2+2, 11, 11+1, 19+2 , 23+2, 25, 25+1, 27
DUZ	RD+2, Z
>> DV	O+1, O+2, N, RD+2, T, P, P+1, Z, D, Y , PR, RP, I, 2, 11, 19+1, M19+3, 23+1, 25, 25+4 , 27
>> DW	Z, D, SAVEVALS+1, KEYCHK, 1, 2, 2+1, 3, 4, 5* , 7, 9, 10, 11, 13, 14, 16, 17, 18, 19+1 , 21, 23+1, 25, 25+4, 26, 27, 28, 29, 30
>> DZ	QS*
>> RACAT	X1
RACOMENT	X26!, X28!
>> RADFN	X1
>> RADIV	X1, X5, X29
>> RAI	X14, X16, X17, M19+1, X21, X30*
>> RAIMAG	X4*, 25+2
>> RALIFN	X1
>> RAMOD	X13
>> RAMOD(	X17, M19+1, X21!
>> RAMOD(0	X16
>> RAMODPRO	X17*, X18
>> RAPIFN	X1
>> RAPRI	2+3, X3*, X4, X5, X9, X10, X18
>> RAREAST	27+1
U	DE+1, DE+2, TR, P, P+2, Z, D, R, R+1, SET , BEGIN+3*, 1, 2+3, C2+2, C2S+2, 3, 4, 5, 7, 9 , 10, 13, 14, 16, 17, 18, 19+4, M19, 21, 23+4 , M23, R23+1, 25+2, 26, 28, 29, 30
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, 2+4, C2+1, C2+2, C2S, C2S+1, C2S+2 , X2!, 3, X3, 4, 5, 7, 9, 10, X11!, 13 , 14, 16, 17, 18, M19+1, M19+2, M19+3, 21, 25+2, 25+3 , 25+4, 25+5, 26, 27+1, 27+2, X27!, X27+1!, 28, 29, 30
>> Y	O, O+1, O+2, P, Y, PR, R, R+1, R+2, SET+2 , 1, X1, 2+4, X2, 3, 4, 5, X5, 7, X7* , 9, 10, X10, X11, 13, X13, 14, 16, X16, 17* , 18, X18, M19+2, M19+3, 21, X21, 25+3, 25+4, 26, 27+2 , 28, 29, 30*
>> 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: RACTOE

Information

Source Information

Call Graph

Call Graph Total: 15

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