Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: RACTRG8

Package: Radiology Nuclear Medicine

Routine: RACTRG8


Information

RACTRG8 ; ;07/26/21

Source Information

Source file <RACTRG8.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
VA FileMan 10 $$EZBLD^DIALOG  $$LABEL^DIALOGZ  E^DIE0  (,1,F,FIREREC,M,N,OUT,UNIQFERR,Z)^DIE17  Z^DIE2  ^DIE3  (AST,NOSCR,SET)^DIED  QQ^DIEQ  
$$SET^DIQ  RW^DIR2  
Radiology Nuclear Medicine 1 $$GETTCOM^RAUTL11  

Entry Points

Name Comments DBIA/ICR reference
DE
W
O
TR
A
B
RE
N
RD
T
P
V
UNIQ
Z
X
QS
D
Y
PR
R
RP
I
SAVEVALS
NKEY
KEYCHK()
BEGIN
1
X1
2
X2
3
X3
4
X4
5
X5
6
X6
7
X7
8
9
X9
10

External References

Name Field # of Occurrence
$$EZBLD^DIALOG O+2
$$LABEL^DIALOGZ 1, 2, 4, 6
E^DIE0 I+1, 1+4, 2+4, 6+2
^DIE17 RD
1^DIE17 10
F^DIE17 3, 5, 7, 9
FIREREC^DIE17 3, 5, 7, 9
M^DIE17 T
N^DIE17 RP, 1+4, 2+4, 6+2
OUT^DIE17 3, 5, 7, 9
UNIQFERR^DIE17 Z
Z^DIE17 X
Z^DIE2 RD+1
^DIE3 T
AST^DIED P
NOSCR^DIED P
SET^DIED T
QQ^DIEQ QS
$$SET^DIQ R+2
RW^DIR2 O+1
$$GETTCOM^RAUTL11 X3

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: " ("_$$EZBLD^DIALOG(710,.X)_")"
  • Line Location: O+2
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: TR+0
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: TR+0
Function Call: WRITE
  • Prompt: " "_X
  • Line Location: RD+2
Routine Call
  • DIALOG
  • Line Location:
    • O+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( R, R+1
^DD("DD" R+2
^DD("KEY" - [#.31] N
^DISV( RD+2, Z*
^RADPT - [#70] DE, X7!

Label References

Name Line Occurrences
$$KEYCHK Z
@( B, V
A RE, N, Z, Y, RP, 1+4, 2+4, 3, 5, 6+2
, 7, 9
B QS
BEGIN RACTRG8+1
D RD, RD+1, P+1, QS
DE RACTRG8+1, 3, 5, 7, 9
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, 1+5, 2+5, 6+3
RP PR, R, R+1
SAVEVALS Z
TR RE
V T, P+1
W O, RE
X N, T+1, P, Y
X3 3
X5 5
X7 7
X9 9
Y 4+3
Z P+1, 2+5

Naked Globals

Name Field # of Occurrence
^( RD+2, R, R+1
^("F" SAVEVALS*
^("TCOM" DE+2
^(0 DE+1, R, R+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% DE+1*, DE+2*, UNIQ!*, R+2*
%( UNIQ!
%(0 UNIQ
%Z DE+1*, DE+2*, DE+3!
>> D N, D*
>> D0 DE
>> D1 DE
>> D2 DE
>> DA DE, UNIQ, X7
DB DE!
DB( P, X, 1+4*, 2+4*, 6+2*
>> DC RP
DDER T, T+1!
DE DE!
DE( O+2, RE, Z, Y, PR, RP, SAVEVALS, SAVEVALS+1, KEYCHK, 1+4
, 2+4*, 6+2
DE(1 DE+1*
DE(2 DE+1*
DE(4 DE+2*
DE(6 DE+2*
DG DE!, PR*, R*, R+1*, R+2, 3, 5, 7, 9
DG( Z*
>> DIC DE*, P*
>> DIC("S" Z!
>> DIC(0 P*, 3*, 5*, 7*, 9*
>> DIE DE*, P, UNIQ
>> DIEFIRE 3, 5, 7, 9
>> DIEL DE*
>> DIEZTMP SAVEVALS, SAVEVALS+1, SAVEVALS+2
>> DIFLD O+2, N, UNIQ, D, R+2, SAVEVALS, SAVEVALS+1, SAVEVALS+2, 1*, 2*
, 4*, 6*
>> DIIENS SAVEVALS, SAVEVALS+1, SAVEVALS+2
>> DL DE*, W
DLAYGO P*, Z!
>> DLB W, RD+2, Z, D, 1*, 2*, 4*, 6*
>> DNM BEGIN*
>> DP DE*, O+2, N, R+2, SAVEVALS, SAVEVALS+1, SAVEVALS+2, 1, 2, 4
, 6
>> DQ O+2, A*, B, RE, P, P+2, V, X, D, Y
, PR, RP, SAVEVALS, BEGIN*, 1+4, 2+4, 3*, 5*, 6+2, 7*
, 8*, 9*
>> DQ( A!, P+2, D*, PR
DTIME TR
>> DTOUT TR*
>> DU DE*, P, D, PR, 1*, 1+1*, 2*, 2+1*, 4*, 6*
DUZ RD+2, Z
DUZ("LANG" R+2
DUZ(0 TR, RE
>> DV O+1, O+2, TR, RE, N, RD+2, T, P, P+1, UNIQ
, Z, D, Y, PR, RP, I, 1*, 1+4, 2*, 2+4
, 4*, 6*, 6+2
>> DW Z, D, SAVEVALS+1, KEYCHK, 1*, 2*, 2+4, 3*, 4*, 5*
, 6*, 7*, 9*
>> DZ QS*
>> RACNI X3, X7
>> RADFN X3, X7
>> RADTI X3, X7
>> RADUZ 2+2
>> RAFIN X9*
RATCXX X3*, 4+1, X5, X9!
U DE+1, TR, P, P+2, Z, D, R, R+1, 3, 5
, 7, 9
X O+2!*, TR*, N, RD, RD+1, RD+2*, T, P*, P+1!, P+2*
, UNIQ!, Z, X+1*, QS, Y*, PR*, R*, R+1*, R+2, RP*
, I+1, NKEY*, 1+2*, 1+3, 1+4*, 2+2*, 2+3, 2+4*, 2+5, 3*
, 4+1*, 4+2, X4!, X4+1!, 5*, X5, 6+2*, X6!, X6+1!, 7*
, 9*
X("FIELD" O+2*
X("FILE" O+2*
>> Y O, O+1, O+2, P, Y, PR*, R*, R+1*, R+2*, 1+3*
, 1+4, 2+3*, 2+4, 3*, 4+2*, 5*, X5*, 6+1*, 6+2, 7*
, 9*
YS V!
>> ZTQUEUED X, NKEY

Marked Items

Name Field # of Occurrence
$T(@(3) D
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All