Routine: RACTRG5

Information

RACTRG5 ; ;07/06/13

Call Graph

Call Graph Total: 13

Package	Total	Call Graph
VA Fileman	10	$$EZBLD^DIALOG ^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	2	SETDEFS^RACPTMSC ^RACTRG8
Registration	1	ADM^VADPT2

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
Radiology Nuclear Medicine	1	RACTRG2

Entry Points

Name	Comments	DBIA/ICR reference
R4
28
DE
29
X26
M4
X10
M1
X28
X11
X25
X9
20
X20
R1
PR
1
BEGIN
SET
RP
21
22
23
TR
C9
RD
RE
3
2
5
4
7
6
X2
8
X22
X6
X7
KEYCHK()
26
A
24
X30
B
D
25
I
27
C9F1
13
O
N
15
P
X19
R
X24
T
W
V
Y
X
Z
X14
X16
X17
11
10
QS
12
C9S
14
17
16
19
18
31
30
9
NKEY
X29
X13
SAVEVALS

External References

Name	Field # of Occurrence
$$EZBLD^DIALOG	1+1, 4+1
^DIC	X19, X24
E^DIE0	I+1, M1+3, 9+5, 10+4, 11+4
^DIE17	RD
F^DIE17	1, 2, 6, 7, 10, 14, 17, 20, 22, 25 , 26, 28, 29, 30, 31
FIREREC^DIE17	2, 6, 7, 14, 17, 20, 22, 25, 26, 28 , 29, 30
M^DIE17	T
N^DIE17	RP, M1+3, 9+5, 10+4, 11+4
OUT^DIE17	2, 6, 7, 14, 17, 20, 22, 25, 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
^DIR	SET+2
RW^DIR2	O+1
SETDEFS^RACPTMSC	X6
^RACTRG8	31
ADM^VADPT2	X13

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,"Patient not an inpatient at registration time.",! Line Location: X13+0
Function Call: WRITE	Prompt: !?5,"Ward: ",RAWARD," Service: ",RASER," Bedsection: ",RABED Line Location: X29+0
Routine Call	DIALOG Line Location: 1+1 4+1
Routine Call	DIC Line Location: X19 X24
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
^DISV(	RD+2, Z*
^RADPT - [#70]	DE, 1+4, M1, 4+4, M4, R4+1
^RADPT("AO"	C9+2!, C9S+2*
^SC - [#44]	X25

Label References

Name	Line Occurrences
$$KEYCHK	Z
4+1	R4+1
@(	B, V
A	N, Z, Y, RP, M1+3, R1+1, 2, 6, 7, 9+5 , 10+4, 11+4, 14, 17, 20, 22, 25, 26, 28, 29 , 30
B	QS
BEGIN	RACTRG5+1
C9F1	C9S
C9S	C9
D	RD, RD+1, P+1, QS
DE	RACTRG5+1, 1, R1, 2, R4, 6, 7, 10, 14, 17 , 20, 22, 25, 26, 28, 29, 30
M1	1+3
M4	4+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, M1+4, 9+6, 10+5, 11+5
RE	1+3, 4+3, M4+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
X14	14
X17	17
X2	2
X20	20
X22	22
X25	25
X26	26
X28	28
X29	29
X30	30
X6	6
X7	7
Y	13+4, 16+3, 19+4, 24+4
Z	P+1, 9+6, 10+5, 11+5

Naked Globals

Name	Field # of Occurrence
^(	RD+2, R, R+1
^("F"	SAVEVALS*
^("R"	DE+2
^(0	DE+1, R, R+1, 1+3, 1+4, M1, 4+3, 4+4, M4, R4+1
^(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, 1, 1+1, 1+3, 1+4, M1, 4, 4+1, 4+3 , 4+4, M4, R4+1
>> D0	DE, 1+4, M1, 4+4, M4, R4+1
>> D1	DE, 1+4, M1, 4+4, M4, R4+1
>> DA	DE, 1+4, M1, 4+4, M4, R4+1, C9+2, C9S+2
>> DA(1	C9+2, C9S+2, X13
>> DA(2	C9+2, C9S+2, X13
DB	DE!, C9!, C9S!
DB(	T, P, X, SET, SET+1, M1+3, 9+5, 10+4, 11+4
>> DC	RP, 1+1, M1, 4+1, M4
DDER	T, T+1!, SET+2
DE	DE!
DE(	O+2, RE, Z, Y, PR, RP, SAVEVALS, SAVEVALS+1, KEYCHK, M1+3 , 9+1, 9+5, 10+4, 11+4
DE(1	1!, M1*, 4!
DE(10	DE+1*
DE(11	DE+1*
DE(13	DE+1*
DE(16	DE+2*
DE(19	DE+1*
DE(24	DE+1*
DE(4	M4*
DE(9	DE+1*, C9, C9+1
>> DFN	X13*
DG	DE!, PR, R, R+1*, R+2, 1, 2, 6, 7, 10 , 14, 17, 20, 22, 25, 26, 28, 29, 30, 31
DG(	Z*, C9S, C9S+1
>> DGO	1+1, 4+1
DIC	DE, P, C9+1, C9S+1, X19!, X24!
DIC("S"	T, Z!, X19, X24
DIC(0	P, 2, 6, 7, 14, 17, 20, 22, 25, 26 , 28, 29, 30*
>> DIE	DE*, P, C9+1, C9S+1, X19, X24
>> DIEFIRE	2, 6, 7, 14, 17, 20, 22, 25, 26, 28 , 29, 30
>> DIEL	DE*
>> DIEZTMP	SAVEVALS, SAVEVALS+1, SAVEVALS+2
>> DIFLD	N, T, D, SAVEVALS, SAVEVALS+1, SAVEVALS+2, 1+1, 4+1, 9, 10 , 11, 13, 16, 19, 24*
>> 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+1, 4+1, 9, 10, 11, 13 , 16, 19, 24*
>> DNM	BEGIN*
>> DOW	1+1, 4+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, M1+3, 2 , 3, 5, 6, 7, 8, 9+5, C9S, C9S+1, 10, 10+4 , 11+4, 12, 14, 15, 17, 18, 20, 21, 22, 23* , 25, 26, 27, 28, 29, 30
>> DQ(	A!, P+2, D*, PR
>> DSC(	1+3, 4+3
DTIME	TR
>> DTOUT	TR*
>> DU	DE, P, D, PR, SET, 1+2, 4+2, 9, 9+2, 10 , 10+1, 11, 11+1, 13, 13+1, 16, 19, 19+1, 24, 24+1
DUZ	RD+2, Z
>> DV	O+1, O+2, N, RD+2, T, P, P+1, Z, D, Y , PR, RP, I, 1+1, M1+3, 4+1, 9, 9+5, 10, 10+4 , 11, 11+4, 13, 16, 19, 24*
>> DW	Z, D, SAVEVALS+1, KEYCHK, 1+1, 2, 4+1, 6, 7, 9 , 9+1, 9+5, 10, 10+4, 11, 11+4, 13, 14, 16, 17 , 19, 20, 22, 24, 25, 26, 28, 29, 30*
>> DZ	QS*
>> RABED	X28*, X29
>> RACAT	13+2
>> RACLNC	24+2, X25*
>> RACNI	11+2
>> RAMOD	M1+1
>> RAOIFN	9+3
>> RAPIFN	10+2
>> RAPX(	11+2
>> RARSH	16+1
>> RASER	X28*, X29
>> RASHA	19+2
>> RAWARD	X17, X22, X28*, X29, X30
RAX	X14*!
>> REM	X7*
U	DE+1, DE+2, TR, P, P+2, Z, D, R, R+1, SET , 1+4, M1, 2, 4+4, M4, R4+1, 6, 7, 11+2, 14 , 17, 20, 22, 25, X25, 26, 28, 29, 30
>> VADMVT	X13
>> VAINDT	X13*
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, M1+1, M1+2, M1+3, 2, 6, 7, 9+3, 9+4 , 9+5, 9+6, C9+1, C9+2, C9S, C9S+1, C9S+2, 10+2, 10+3, 10+4 , 10+5, 11+2, 11+3, 11+4, 11+5, 13+2, 13+3, X13!, 14, X14 , 16+1, 16+2, X16!, X16+1!, 17, 19+2, 19+3, X19!, 20, 22 , 24+2, 24+3, X24!, 25, X25, 26, 28, 29, 30*
>> Y	O, O+1, O+2, P, Y, PR, R, R+1, R+2, SET+2 , M1+2, M1+3, 2, X2, 6, 7, 9+4, 9+5, 10+3, 10+4 , 11+3, 11+4, 13+3, 14, X14, 16+2, 17, X17, 19+3, X19 , 20, X20, 22, X22, 24+3, X24, 25, 26, X26, 28 , 29, 30, X30*
>> Y(0	SET+2
YS	V!
>> ZTQUEUED	X, NKEY

Marked Items

Name	Field # of Occurrence
$T(@(3)	D
$T(SETDEFS^RACPTMSC	X6

Customize PDF page

Package: Radiology Nuclear Medicine

Routine: RACTRG5

Information

Source Information

Call Graph

Call Graph Total: 13

Caller Graph

Caller Graph Total: 1

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