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 |  Caller 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: RACTRG5

Package: Radiology Nuclear Medicine

Routine: RACTRG5


Information

RACTRG5 ; ;07/26/21

Source Information

Source file <RACTRG5.m>

Call Graph

Call Graph

Call Graph Total: 13

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  
($$GET1,$$SET)^DIQ  RW^DIR2  
Radiology Nuclear Medicine 3 ($$EN1,EN2)^RANMPT1  USER^RAUTL  ($$ASKPREG,$$PRSCR)^RAUTL8  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Radiology Nuclear Medicine 1 RACTRG2  

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
M1
R1
2
X2
3
4
X4
5
X5
6
M6
R6
7
8
X8
9
X9
10
X10
11
X11
12
X12
13
X13
14
X14
15
X15
16
X16
17
X17
18
C18
C18S
C18F1
X18
19
20
X20
21
X21
22
X22
23
24
M24
R24
25
X25
26
X26
27
X27
28
X28
29
X29
30
X30
31
X31
32
33

External References

Name Field # of Occurrence
$$EZBLD^DIALOG O+2, 1+1, 6+1, 24+1
$$LABEL^DIALOGZ 1+1, 6+1, 1824+1, 2931
E^DIE0 I+1, M1+3, M6+3, 18+5, M24+3
^DIE17 RD
1^DIE17 33
F^DIE17 245891011121314
15161720212224252627
2830
FIREREC^DIE17 245891011121314
15161720212225262728
30
M^DIE17 T
N^DIE17 RPM1+3, M6+3, 18+5, M24+3
OUT^DIE17 245891011121314
15161720212225262728
30
UNIQFERR^DIE17 Z
Z^DIE17 X
Z^DIE2 RD+1
^DIE3 T
AST^DIED P
NOSCR^DIED P
SET^DIED T
QQ^DIEQ QS
$$GET1^DIQ X27
$$SET^DIQ R+2
RW^DIR2 O+1
$$EN1^RANMPT1 X16
EN2^RANMPT1 X22
USER^RAUTL X4
$$ASKPREG^RAUTL8 X26
$$PRSCR^RAUTL8 X30

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
Function Call: WRITE
  • Prompt: !," PREGNANT AT TIME OF ORDER ENTRY: ",$$GET1^DIQ(75.1,$G(RAOIFN)_",",13)
  • Line Location: X27+0
Routine Call
  • DIALOG
  • Line Location:
    • O+2
    • 1+1
    • 6+1
    • 24+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RADPT - [#70] Classic Fileman Calls
^RAO(75.1 - [#75.1] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( RR+1
^DD("DD" R+2
^DD("KEY" - [#.31] N
^DISV( RD+2, Z*
^RA(79.2 - [#79.2] X9X10
^RADPT - [#70] DE1+4, M16+3, M624+3, M24
^RAMIS(71 - [#71] X12X14X20

Label References

Name Line Occurrences
$$KEYCHK Z
@( BV
A RENZYRPM1+3, R1+1, 245
M6+3, R6+1, 89101112131415
161718+5, 202122M24+3, R24+1, 2526
272830
B QS
BEGIN RACTRG5+1
C18F1 C18S
C18S C18
D RDRD+1, P+1, QS
DE RACTRG5+1, R1245R6891011
12131415161720212224
R242526272830
M1 1+3
M24 24+2
M6 6+2
N Y
NKEY N
O YRP
P T
PR REI+1
QS RDNKEY
R RR+1
RD YII+1, M1+4, M6+4, 18+6, M24+4
RE 1+3, 29+2, 31+1
RP PRRR+1
SAVEVALS Z
TR RE
V TP+1
W ORE
X NT+1, PY
X10 10
X11 11
X12 12
X13 13
X14 14
X15 15
X16 16
X17 17
X2 2
X20 20
X21 21
X22 22
X25 25
X26 26
X27 27
X28 28
X30 30
X4 4
X5 5
X8 8
X9 9
Z P+1, 18+6

Naked Globals

Name Field # of Occurrence
^( RD+2, RR+1
^("F" SAVEVALS*
^("PCOMM" DE+2
^(0 DE+1, RR+1, 1+3, 1+4, M16+2, 6+3, M624+2
24+3, M24

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*, 1*, 1+1, 1+3*, 1+4*, M1, 6*, 6+1, 6+2*
6+3*, M6, 24*, 24+1, 24+2*, 24+3*, M24
>> D0 DE1+4, M16+3, M624+3, M24
>> D1 DE1+4, M16+3, M624+3, M24
>> DA DEUNIQ1+4, M16+3, M624+3, M24
DB DE!, C18!, C18S!
DB( PXM1+3*, M6+3*, 18+5*, M24+3*
>> DC RP1+1*, M1*, 6+1*, M6*, 24+1*, M24*
DDER TT+1!
DE DE!
DE( O+2, REZYPRRPSAVEVALSSAVEVALS+1, KEYCHK, M1+3
M6+3, 18+1*, 18+5*, M24+3
DE(1 1!, M1*, 6!, 24!
DE(18 DE+1*, C18C18+1
DE(24 M24*
DE(29 DE+1*
DE(31 DE+2*
DE(6 M6*
DG DE!, PR*, R*, R+1*, R+2, 24589
10111213141516172021
22242526272830
DG( Z*, C18SC18S+1
>> DGO 1+1*, 6+1*, 24+1*
>> DIC DE*, P*, C18+1*, C18S+1*
DIC("S" Z!
>> DIC(0 P*, 2*, 4*, 5*, 8*, 9*, 10*, 11*, 12*, 13*
, 14*, 15*, 16*, 17*, 20*, 21*, 22*, 25*, 26*, 27*
, 28*, 30*
>> DIE DE*, PUNIQC18+1, C18S+1
>> DIEFIRE 245891011121314
15161720212225262728
30
>> DIEL DE*
>> DIEZTMP SAVEVALSSAVEVALS+1, SAVEVALS+2
>> DIFLD O+2, NUNIQDR+2, SAVEVALSSAVEVALS+1, SAVEVALS+2, 1+1*, 6+1*
, 18*, 24+1*, 29*, 31*
>> DIIENS SAVEVALSSAVEVALS+1, SAVEVALS+2
>> DL DE*, W
DLAYGO P*, Z!
>> DLB WRD+2, ZD1+1*, 6+1*, 18*, 24+1*, 29*, 31*
>> DNM BEGIN*
>> DOW 1+1*, 6+1*, 24+1*
>> DP DE*, O+2, NR+2, SAVEVALSSAVEVALS+1, SAVEVALS+2, 1+1, 6+1, 18
24+1, 2931
>> DQ O+2, A*, BREPP+2, VXDY
PRRPSAVEVALS, BEGIN*, M1+3, 2*, 3*, 4*, 5*, M6+3
, 7*, 8*, 9*, 10*, 11*, 12*, 13*, 14*, 15*, 16*
, 17*, 18+5, C18SC18S+1, 19*, 20*, 21*, 22*, 23*, 24*
M24+3, 25*, 26*, 27*, 28*, 30*, 32*
DQ( A!, P+2, D*, PR
>> DSC( 1+3, 6+2, 24+2
DTIME TR
>> DTOUT TR*
>> DU DE*, PDPR1+2*, 18*, 18+2*, 29*, 29+1*, 31*
DUZ RD+2, Z
>> DUZ("LANG" R+2
>> DUZ(0 TRRE
>> DV O+1, O+2, TRRENRD+2, TPP+1, UNIQ
ZDYPRRPI1+1*, M1+3, 6+1*, M6+3
, 18*, 18+5, 24+1*, M24+3, 29*, 31*
>> DW ZDSAVEVALS+1, KEYCHK, 1+1*, 2*, 4*, 5*, 6+1*, 8*
, 9*, 10*, 11*, 12*, 13*, 14*, 15*, 16*, 17*, 18*
18+1, 18+5, 20*, 21*, 22*, 24+1*, 25*, 26*, 27*, 28*
, 29*, 30*, 31*
>> DZ QS*
>> RACN X16
>> RACNI X22X30
RACOM X25*!
>> RADFN X16X22X30
>> RADTE X16
>> RADTI X22X30
>> RAFM M1+1
>> RAIEN702 X16*, X1718+3
>> RAIMGTY X9
>> RAIMGTYI X9*, X10
>> RAMDV X5
>> RANMFLG X8*, X10*, X11
>> RAOIFN X27
>> RAOPT("ADDEXAM" X28
>> RAPOP X4*
>> RAPRI X12X14X20
>> REM X13*, X15*, X21*
U DE+1, TRPP+2, ZDRR+1, 1+4, M1
245X56+3, M6891011
121314X14151617202122
24+3, M242526272830
X O+2!*, TR*, NRDRD+1, RD+2*, T, P*, P+1!, P+2*
, UNIQ!, ZX+1*, QS, Y*, PR*, R*, R+1*, R+2, RP*
I+1, NKEY*, M1+1*, M1+2, M1+3*, 2*, 4*, 5*, M6+1*, M6+2
M6+3*, 8*, 9*, 10*, 11*, 12*, 13*, 14*, 15*, 16*
, 17*, 18+3*, 18+4, 18+5*, 18+6, C18+1*, C18S*, C18S+1*, 20*, 21*
, 22*, M24+1*, M24+2, M24+3*, 25*, 26*, 27*, 28*, 30*, X31!
X31+1!
X("FIELD" O+2*
X("FILE" O+2*
>> Y OO+1, O+2, PY, PR*, R*, R+1*, R+2*, M1+2*
M1+3, 2*, X2*, 4*, X4*, 5*, X5*, M6+2*, M6+3, 8*
, 9*, 10*, 11*, X11*, 12*, X12*, 13*, 14*, X14*, 15*
, 16*, 17*, X17*, 18+4*, 18+5, 20*, X20*, 21*, 22*, M24+2*
M24+3, 25*, 26*, X26*, 27*, 28*, X28*, 30*, X30*
YS V!
>> ZTQUEUED XNKEY

Marked Items

Name Field # of Occurrence
$T(@(3) D
Info |  Source |  Call Graph |  Caller 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