Routine: RACTEX

Information

RACTEX ; GENERATED FROM 'RA EXAM EDIT' INPUT TEMPLATE(#1445), FILE 70;05/20/15

Call Graph

Call Graph Total: 11

Package	Total	Call Graph
VA Fileman	10	$$EZBLD^DIALOG E^DIE0 (,0,F,FIREREC,M,N,OUT,UNIQFERR,Z)^DIE17 Z^DIE2 ^DIE3 (AST,NOSCR)^DIED QQ^DIEQ $$GETTMP^DIKC1 ^DIR RW^DIR2
Radiology Nuclear Medicine	1	USER^RAUTL

Entry Points

Name	Comments	DBIA/ICR reference
DE
M3
PR
1
BEGIN
SET
RP
TR
RD
RE
3
2
5
4
6
X2
X1
KEYCHK()
X5
A
B
D
R3
I
O
N
P
R
T
W
V
Y
X
Z
QS
NKEY
SAVEVALS

External References

Name	Field # of Occurrence
$$EZBLD^DIALOG	3+1
E^DIE0	I+1, M3+3
^DIE17	RD
0^DIE17	6
F^DIE17	1, 2, 5
FIREREC^DIE17	1, 2, 5
M^DIE17	T
N^DIE17	RP, M3+3
OUT^DIE17	1, 2, 5
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
USER^RAUTL	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),"You must have the variables for 'Case Number','Exam Date' and",!?3,"'Rad/Nuc Med Division' defined to continue!" Line Location: X1+0
Routine Call	DIALOG Line Location: 3+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
^DIE(1445	BEGIN+2
^DISV(	RD+2, Z*
^RADPT - [#70]	DE, 3+3, M3

Label References

Name	Line Occurrences
$$KEYCHK	Z
@(	B, V
A	N, Z, Y, RP, 1, 2, M3+3, R3+1, 5
B	QS
BEGIN	RACTEX+1
D	RD, RD+1, P+1, QS
DE	RACTEX+1, 1, 2, R3, 5
M3	3+2
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, M3+4
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
X2	2
X5	5
Z	P+1

Naked Globals

Name	Field # of Occurrence
^(	RD+2, R, R+1
^("F"	SAVEVALS*
^(0	R, R+1, 3+2, 3+3, M3
^(12.1	T

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	T, R+2, SET+2
%Z	DE+1!
>> D	N, D, 3, 3+1, 3+2, 3+3, M3
>> D0	BEGIN+3*
>> DA	DE, BEGIN+3, 3+3, M3
DB	DE!
DB(	T, P, X, SET, SET+1, M3+3*
>> DC	RP, 3+1, M3
DDER	T, T+1!, SET+2
DE	DE!
DE(	O+2, RE, Z, Y, PR, RP, SAVEVALS, SAVEVALS+1, KEYCHK, M3+3
DE(1	3!
DE(3	M3*
DG	DE!, PR, R, R+1*, R+2, 1, 2, 5
DG(	Z*
>> DGO	3+1*
>> DIC	DE, P
>> DIC("S"	T, Z!
>> DIC(0	P, 1, 2, 5
>> DICRREC	BEGIN+2*
>> DIE	DE*, P
DIEBADK	BEGIN+1!
DIEFIRE	BEGIN+1!, 1, 2, 5
>> 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, 3+1*
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, 3+1*
>> DNM	BEGIN*
>> DOW	3+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, M3+3 , 4, 5
>> DQ(	A!, P+2, D*, PR
>> DSC(	3+2
DTIME	TR, BEGIN+3*
>> DTOUT	TR*
>> DU	DE*, P, D, PR, SET
DUZ	RD+2, Z
>> DV	O+1, O+2, N, RD+2, T, P, P+1, Z, D, Y , PR, RP, I, 3+1*, M3+3
>> DW	Z, D, SAVEVALS+1, KEYCHK, 1, 2, 3+1, 5
>> DZ	QS*
RA0	X5!
RACAT	X5!
>> RACN	X1
>> RADTE	X1, M3+1
RAI	X5!
RAIEN702	X5!
>> RAMDV	X1
RANUZD1	X5!
RAOIFN	X5!
>> RAPOP	X2*
>> RAQUICK	X1
RAR	X5!
RAY	X5!
U	TR, P, P+2, Z, D, R, R+1, SET, BEGIN+3*, 1 , 2, 3+3, M3, 5
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, M3+1, M3+2, M3+3, 5*
>> Y	O, O+1, O+2, P, Y, PR, R, R+1, R+2, SET+2 , 1, X1, 2, X2, M3+2, M3+3, 5
>> 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: RACTEX

Information

Source Information

Call Graph

Call Graph Total: 11

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