Routine: RACTTK2

Call Graph Total: 18

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 ($$CREF,$$OREF)^DILF ^DIR RW^DIR2
Radiology Nuclear Medicine	7	DW^RACPTMSC ^RACTTK5 WHY1^RASTED WARNPRC^RAUTL XREF1^RAUTL2 CHGPRC^RAUTL21 EN^RAUTL8

Package

Total

Call Graph

$$EZBLD^DIALOG ^DIC 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

DW^RACPTMSC ^RACTTK5 WHY1^RASTED WARNPRC^RAUTL XREF1^RAUTL2 CHGPRC^RAUTL21 EN^RAUTL8

Entry Points

External References

Name	Field # of Occurrence
$$EZBLD^DIALOG	8+1, 13+1
^DIC	X6, X10
E^DIE0	I+1
^DIE17	RD
F^DIE17	1, 2, 3, 4, 5, 7, 8, 11, 12, 13 , 15, 18, 19, 20, 21, 22, 23, 24, 25, 26 , 27
FIREREC^DIE17	1, 2, 3, 4, 5, 7, 11, 12, 15, 18 , 19, 20, 21, 22, 23, 24, 25, 26
M^DIE17	T
N^DIE17	RP
OUT^DIE17	1, 2, 3, 4, 5, 7, 11, 12, 15, 18 , 19, 20, 21, 22, 23, 24, 25, 26
UNIQFERR^DIE17	Z
Z^DIE17	X
Z^DIE2	RD+1
^DIE3	T
AST^DIED	P
NOSCR^DIED	P
QQ^DIEQ	QS
$$CREF^DILF	C17F1
$$OREF^DILF	C17F1
^DIR	SET+2
RW^DIR2	O+1
DW^RACPTMSC	C17+4
^RACTTK5	27
WHY1^RASTED	X5
WARNPRC^RAUTL	X23
XREF1^RAUTL2	C6+2, C6S+2, C10+2, C10S+2
CHGPRC^RAUTL21	X22
EN^RAUTL8	X6, X10

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: !," Primary Interpreting Staff required for this division",$C(7),! Line Location: X11+0
Function Call: WRITE	Prompt: !,"... Deleting radiopharms ...",! Line Location: X26+0
Routine Call	DIALOG Line Location: 8+1 13+1
Routine Call	DIC Line Location: X6 X10
Routine Call	DIR Line Location: SET+2

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	X17
^DISV(	RD+2, Z*
^RA(72 - [#72]	X1
^RADPT - [#70]	DE, X2, C6+2, C6S+2, 8+4, M8, R8+1, C10+2, C10S+2, 13+4 , M13, R13+1, C17+2!, C17S+2*
^RARPT - [#74]	C6+2, C6S+2, C10+2, C10S+2

Label References

Name	Line Occurrences
$$KEYCHK	Z
13+1	R13+1
8+1	R8+1
@(	B, V
A	N, Z, Y, RP, 1, 2, 3, 4, 5, 7 , 11, 12, 15, 18, 19, 20, 21, 22, 23, 24 , 25, 26
B	QS
BEGIN	RACTTK2+1
C10F1	C10S
C10S	C10
C17F1	C17S
C17S	C17
C6F1	C6S
C6S	C6
D	RD, RD+1, P+1, QS
DE	RACTTK2+1, 1, 2, 3, 4, 5, 7, 8, R8, 11 , 12, 13, R13, 15, 18, 19, 20, 21, 22, 23 , 24, 25, 26
M13	13+3
M8	8+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
RE	6+3, 8+3, M8+1, 10+3, 13+3, M13+1, 17+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
X11	11
X12	12
X15	15
X18	18
X19	19
X2	2
X20	20
X21	21
X22	22
X23	23
X24	24
X25	25
X26	26
X3	3
X4	4
X5	5
X7	7
Z	P+1

Name	Field # of Occurrence
^(	RD+2, R, R+1
^("F"	SAVEVALS*
^(0	DE+1, R, R+1, C6+2, C6S+2, 8+3, 8+4, M8, R8+1, C10+2 , C10S+2, 13+3, 13+4, M13, R13+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, 8, 8+1, 8+3, 8+4, M8, R8+1, 13, 13+1 , 13+3, 13+4, M13, R13+1*
>> D0	DE, 8+4, M8, R8+1, 13+4, M13, R13+1
>> D1	DE, 8+4, M8, R8+1, 13+4, M13, R13+1
>> DA	DE, X2, C6+2, C6S+2, X6, 8+4, M8, R8+1, C10+2, C10S+2 , X10, 13+4, M13, R13+1, C17+2, C17S+2, X22
>> DA(1	X2, C6+2, C6S+2, C10+2, C10S+2, C17+2, C17S+2
>> DA(2	X2, C6+2, C6S+2, C10+2, C10S+2, C17+2, C17S+2
DB	DE!, C6!, C6S!, C10!, C10S!, C17!, C17S!
DB(	T, P, X, SET, SET+1
>> DC	RP, 8+1, M8, 13+1, M13
DDER	T, T+1!, SET+2
DE	DE!
DE(	O+2, RE, Z, Y, PR, RP, SAVEVALS, SAVEVALS+1, KEYCHK, 6+1* , 10+1, 17+1
DE(1	8!, 13!
DE(10	DE+1*, C10, C10+1
DE(13	M13*
DE(17	DE+1*, C17, C17+1, C17+3
DE(6	DE+1*, C6, C6+1
DE(8	M8*
DG	DE!, PR, R, R+1*, R+2, 1, 2, 3, 4, 5 , 7, 8, 11, 12, 13, 15, 18, 19, 20, 21 , 22, 23, 24, 25, 26, 27
DG(	Z*, C6S, C6S+1, C10S, C10S+1, C17S, C17S+1, C17S+3
>> DGO	8+1, 13+1
DIC	DE, P, C6+1, C6S+1, X6!, C10+1, C10S+1, X10!, C17+1, C17+3 , C17S+1, C17S+3
DIC("S"	T, Z!, X6, X10, X17*
DIC(0	P, 1, 2, 3, 4, 5, 7, 11, 12, 15 , 18, 19, 20, 21, 22, 23, 24, 25, 26*
>> DIE	DE*, P, C6+1, C6S+1, X6, C10+1, C10S+1, X10, C17+1, C17+3 , C17S+1, C17S+3, C17F1
>> DIEFIRE	1, 2, 3, 4, 5, 7, 11, 12, 15, 18 , 19, 20, 21, 22, 23, 24, 25, 26
>> DIEL	DE*
>> DIEZRXR(	C17F1, C17F1+1
>> DIEZTMP	SAVEVALS, SAVEVALS+1, SAVEVALS+2
>> DIFLD	N, T, D, SAVEVALS, SAVEVALS+1, SAVEVALS+2, 6, 8+1, 10, 13+1 , 17*
>> DIIENS	SAVEVALS, SAVEVALS+1, SAVEVALS+2, C17F1
DIQUIET	SET+1~*
DIR	SET~
DIR("V"	SET*
DIR(0	SET*
>> DIXR	C17F1+1*
>> DL	DE*, W
DLAYGO	P*, Z!
>> DLB	W, RD+2, Z, D, 6, 8+1, 10, 13+1, 17*
>> DNM	BEGIN*
>> DOW	8+1, 13+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, 2, 3* , 4, 5, C6S, C6S+1, 7, 8, 9, C10S, C10S+1, 11 , 12, 13, 14, 15, 16, C17S, C17S+1, C17S+3, 18, 19* , 20, 21, 22, 23, 24, 25, 26*
>> DQ(	A!, P+2, D*, PR
>> DSC(	8+3, 13+3
DTIME	TR
>> DTOUT	TR*
>> DU	DE, P, D, PR, SET, 6, 6+2, 8+2, 10, 10+2 , 13+2, 17, 17+2*
DUZ	RD+2, Z
>> DV	O+1, O+2, N, RD+2, T, P, P+1, Z, D, Y , PR, RP, I, 6, 8+1, 10, 13+1, 17*
>> DW	Z, D, SAVEVALS+1, KEYCHK, 1, 2, 3, 4, 5, 6 , 6+1, 7, 8+1, 10, 10+1, 11, 12, 13+1, 15, 17 , 17+1, 18, 19, 20, 21, 22, 23, 24, 25, 26*
>> DZ	QS*
>> RADA	C6+2, C6S+2, C10+2, C10S+2
RAKILL	C6+2!, C6S+2!, C10+2!, C10S+2!
>> RAMDV	X11
>> RANXT72	X1
>> RANXT72(	X1*
>> RAOPRC	X2*, X3, X20, X22
>> RAPRI	X3, X18, X20, X22
>> RAPRTSET	X5
RARAD	C6+2!, C6S+2!, C10+2!, C10S+2!
>> RAREM	X19, X21
RASET	C6+2!, C6S+2!, C10+2!, C10S+2!
>> RASK	X4, X15
>> RAWHICH	X24, X25
RAXREF	C6+2!, C6S+2!, C10+2!, C10S+2!
U	DE+1, TR, P, P+2, Z, D, R, R+1, SET, 1 , 2, X2, 3, 4, 5, C6+2, C6S+2, 7, 8+4, M8 , R8+1, C10+2, C10S+2, 11, 12, 13+4, M13, R13+1, 15, 18 , 19, 20, 21, 22, 23, 24, 25, 26
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, 5, C6+1, C6+2, C6S* , C6S+1, C6S+2, X6!, 7, X7, C10+1, C10+2, C10S, C10S+1, C10S+2 , X10!, 11, X11, 12, X12, 15, C17+1, C17+2, C17+3, C17S* , C17S+1, C17S+2, C17S+3, 18, X18, 19, 20, 21, 22, 23 , 24, 25, 26*
>> Y	O, O+1, O+2, P, Y, PR, R, R+1, R+2, SET+2 , 1, 2, 3, 4, X4, 5, X5, X6, 7, X7* , X10, 11, X11, 12, X12, 15, X15, 18, 19, 20* , X20, 21, 22, 23, 24, X24, 25, X25, 26*
>> Y(0	SET+2
YS	V!
>> ZTQUEUED	X, NKEY

Customize PDF page

Package: Radiology Nuclear Medicine

Routine: RACTTK2

Information

Source Information