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: RACTOE

Package: Radiology Nuclear Medicine

Routine: RACTOE


Information

RACTOE ; GENERATED FROM 'RA ORDER EXAM' INPUT TEMPLATE(#1453), FILE 75.1;07/06/13

Source Information

Source file <RACTOE.m>

Call Graph

Call Graph Total: 15

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  
$$GETTMP^DIKC1  ^DIR  RW^DIR2  
Radiology Nuclear Medicine 4 ^RACTOE3  EN2^RAPRI  $$ITYPE^RASITE  ORDPRC^RAUTL2  

Entry Points

Name Comments DBIA/ICR reference
V
X29
X28
X
X25
X27
X26
X21
24
25
26
27
20
21
22
23
28
29
RD
RE
4
8
X30
D
C2F1
P
T
2
PR
BEGIN
R19
3
7
C2S
O
M23
W
RP
32
31
30
Y
SET
X9
6
X2
C2
X1
X7
X4
X5
B
N
R
X3
Z
11
10
13
12
15
14
17
16
19
18
NKEY
M19
DE
TR
1
5
9
KEYCHK()
A
I
X18
X10
X11
X13
X14
X16
X17
QS
R23
SAVEVALS

External References

Name Field # of Occurrence
$$EZBLD^DIALOG 19+1, 23+1
^DIC X2, X11
E^DIE0 I+1, M19+3, 25+4
^DIE17 RD
F^DIE17 1, 3, 4, 5, 7, 9, 10, 11, 13, 14
, 16, 17, 18, 21, 26, 28, 29, 30, 32
FIREREC^DIE17 1, 3, 4, 5, 7, 9, 10, 13, 14, 16
, 17, 18, 21, 26, 28, 29, 30
M^DIE17 T
N^DIE17 RP, M19+3, 25+4
OUT^DIE17 1, 3, 4, 5, 7, 9, 10, 13, 14, 16
, 17, 18, 21, 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
$$GETTMP^DIKC1 BEGIN+1
^DIR SET+2
RW^DIR2 O+1
^RACTOE3 32
EN2^RAPRI X9
$$ITYPE^RASITE X4, X18
ORDPRC^RAUTL2 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),"Variables RACAT,RADFN,RADIV,RALIFN and RAPIFN must be defined!"
  • Line Location: X1+0
Function Call: WRITE
  • Prompt: !?3,$C(7),"A 'detailed' procedure or a 'series' of procedures is required!"
  • Line Location: X7+0
Function Call: WRITE
  • Prompt: !!?3,$C(7),^("HIS"),!
  • Line Location: X29+0
Routine Call
  • DIALOG
  • Line Location:
    • 19+1
    • 23+1
Routine Call
  • DIC
  • Line Location:
    • X2
    • X11
Routine Call
  • DIR
  • Line Location:
    • SET+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RAO(75.1 - [#75.1] 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(1453 BEGIN+2
^DISV( RD+2, Z*
^RA(79 - [#79] X5, X29
^RAMIS(71 - [#71] 2+3, X5, X9, X10
^RAMIS(71.2 - [#71.2] X17, X18
^RAO(75.1 - [#75.1] DE, C2+2!, C2S+2*, 19+4, M19, 23+4, M23, R23+1, X30*
^TMP($J X30

Label References

Name Line Occurrences
$$KEYCHK Z
23+1 R23+1
@( B, V
A N, Z, Y, RP, 1, 3, 4, 5, 7, 9
, 10, 13, 14, 16, 17, 18, M19+3, R19+1, 21, 25+4
, 26, 28, 29, 30
B QS
BEGIN RACTOE+1
C2F1 C2S
C2S C2
D RD, RD+1, P+1, QS
DE RACTOE+1, 1, 3, 4, 5, 7, 9, 10, 11, 13
, 14, 16, 17, 18, R19, 21, R23, 26, 28, 29
, 30
M19 19+3
M23 23+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, M19+4, 25+5
RE 11+2, 19+3, 23+3, M23+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
X1 1
X10 10
X13 13
X14 14
X16 16
X17 17
X18 18
X21 21
X26 26
X28 28
X29 29
X3 3
X30 30
X4 4
X5 5
X7 7
X9 9
Y 2+5, 27+3
Z P+1, 25+5

Naked Globals

Name Field # of Occurrence
^( DE+2, RD+2, R, R+1, X5
^("F" SAVEVALS*
^("HIS" X29
^(0 DE+1, R, R+1, 2+3, C2+2, C2S+2, 19+3, 19+4, M19, 23+3
, 23+4, M23, R23+1, X30
^(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*, 19*, 19+1, 19+3*, 19+4*, M19, 23*, 23+1, 23+3*
, 23+4*, M23, R23+1*
>> D0 BEGIN+3*
>> DA DE, BEGIN+3, C2+2, C2S+2, 19+4, M19, 23+4, M23, R23+1, X30
DB DE!, C2!, C2S!
DB( T, P, X, SET, SET+1, M19+3*, 25+4*
>> DC RP, 19+1*, M19*, 23+1*, M23*
DDER T, T+1!, SET+2
DE DE!
DE( O+2, RE, Z, Y, PR, RP, SAVEVALS, SAVEVALS+1, KEYCHK, 2+1*
, M19+3, 25+4*
DE(1 19!, 23!
DE(11 DE+1*
DE(19 M19*
DE(2 DE+1*, C2, C2+1
DE(23 M23*
DE(25 DE+1*
DE(27 DE+2*
DG DE!, PR*, R*, R+1*, R+2, 1, 3, 4, 5, 7
, 9, 10, 11, 13, 14, 16, 17, 18, 21, 26
, 28, 29, 30, 32
DG( Z*, C2S, C2S+1
>> DGO 19+1*, 23+1*
DIC DE*, P*, C2+1*, C2S+1*, X2!*, X11!*
DIC("S" T, Z!, X2*, X11*
DIC(0 P*, 1*, 3*, 4*, 5*, 7*, 9*, 10*, 13*, 14*
, 16*, 17*, 18*, 21*, 26*, 28*, 29*, 30*
>> DICRREC BEGIN+2*
>> DIE DE*, P, C2+1, C2S+1, X2, X11
DIEBADK BEGIN+1!
DIEFIRE BEGIN+1!, 1, 3, 4, 5, 7, 9, 10, 13, 14
, 16, 17, 18, 21, 26, 28, 29, 30
>> 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, 2*, 11*, 19+1*, 23+1*
, 25*, 27*
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, 2*, 11*, 19+1*, 23+1*, 25*, 27*
>> DNM BEGIN*
>> DOW 19+1*, 23+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*, C2S, C2S+1
, 3*, 4*, 5*, 6*, 7*, 8*, 9*, 10*, 11*, 12*
, 13*, 14*, 15*, 16*, 17*, 18*, M19+3, 20*, 21*, 22*
, 24*, 25+4, 26*, 28*, 29*, 30*, 31*
>> DQ( A!, P+2, D*, PR
>> DSC( 19+3, 23+3
DTIME TR, BEGIN+3*
>> DTOUT TR*
>> DU DE*, P, D, PR, SET, 2*, 2+2*, 11*, 11+1*, 19+2*
, 23+2*, 25*, 25+1*, 27*
DUZ RD+2, Z
>> DV O+1, O+2, N, RD+2, T, P, P+1, Z, D, Y
, PR, RP, I, 2*, 11*, 19+1*, M19+3, 23+1*, 25*, 25+4
, 27*
>> DW Z, D, SAVEVALS+1, KEYCHK, 1*, 2*, 2+1, 3*, 4*, 5*
, 7*, 9*, 10*, 11*, 13*, 14*, 16*, 17*, 18*, 19+1*
, 21*, 23+1*, 25*, 25+4, 26*, 27*, 28*, 29*, 30*
>> DZ QS*
>> RACAT X1
RACOMENT X26*!, X28*!
>> RADFN X1
>> RADIV X1, X5, X29
>> RAI X14*, X16*, X17, M19+1, X21, X30*
>> RAIMAG X4*, 25+2
>> RALIFN X1
>> RAMOD X13
>> RAMOD( X17, M19+1, X21!
>> RAMOD(0 X16
>> RAMODPRO X17*, X18
>> RAPIFN X1
>> RAPRI 2+3, X3*, X4, X5, X9, X10, X18
>> RAREAST 27+1
U DE+1, DE+2, TR, P, P+2, Z, D, R, R+1, SET
, BEGIN+3*, 1, 2+3, C2+2, C2S+2, 3, 4, 5, 7, 9
, 10, 13, 14, 16, 17, 18, 19+4, M19, 21, 23+4
, M23, R23+1, 25+2, 26, 28, 29, 30
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*, 2+4, C2+1*, C2+2, C2S*, C2S+1*, C2S+2
, X2*!, 3*, X3, 4*, 5*, 7*, 9*, 10*, X11*!, 13*
, 14*, 16*, 17*, 18*, M19+1*, M19+2, M19+3*, 21*, 25+2*, 25+3
, 25+4*, 25+5, 26*, 27+1*, 27+2, X27!, X27+1!, 28*, 29*, 30*
>> Y O, O+1, O+2, P, Y, PR*, R*, R+1*, R+2*, SET+2
, 1*, X1*, 2+4*, X2, 3*, 4*, 5*, X5*, 7*, X7*
, 9*, 10*, X10*, X11, 13*, X13*, 14*, 16*, X16*, 17*
, 18*, X18*, M19+2*, M19+3, 21*, X21*, 25+3*, 25+4, 26*, 27+2*
, 28*, 29*, 30*
>> Y(0 SET+2
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