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

Package: Radiology Nuclear Medicine

Routine: RACTVR


Information

RACTVR ; GENERATED FROM 'RA VERIFY REPORT ONLY' INPUT TEMPLATE(#1073), FILE 74;03/17/10

Source Information

Source file <RACTVR.m>

Call Graph

Call Graph

Call Graph Total: 20

Package Total Call Graph
VA FileMan 13 ^%DT  EN^DDIOL  $$EZBLD^DIALOG  ^DIC  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 5 SECXREF^RADD1  XREF^RAUTL2  EN1^RAUTL4  $$MIDNGHT^RAUTL5  EN1^RAUTL9  
Kernel 2 $$NOW^XLFDT  EN^XUSHSHP  

Entry Points

Name Comments DBIA/ICR reference
DE
W
O
TR
A
B
RE
N
RD
T
P
V
Z
X
QS
D
Y
PR
R
RP
I
SET
SAVEVALS
NKEY
KEYCHK()
BEGIN
1
X1
2
X2
3
X3
4
X4
5
C5
C5S
C5F1
X5
6
X6
7
X7
8
X8
9
10
X10
11
12
X12
13
X13
14
X14
15
X15
16
C16
C16S
C16F1
X16
17
18
C18
C18S
C18F1
X18
19
X19
20
X20
21
X21
22
23
X23
24
X24
25
X25
26
X26
27
X27
28
X28
29
30
C30
C30S
C30F1
X30
31
X31
32
33
X33
34
X34
35
X35
36
X36
37
X37
38
39
C39
C39S
C39F1
X39
40
41
X41
42
M42
R42
43
44
X44
45

External References

Name Field # of Occurrence
^%DT X39
EN^DDIOL X14
$$EZBLD^DIALOG 42+1
^DIC X24X33
E^DIE0 I+1, 5+4, 6+2, 16+5, 18+5, 27+4, 30+4, 33+4, 35+4, 36+4
39+4, M42+3
^DIE17 RD
0^DIE17 45
F^DIE17 1234678101213
14151819202123252628
31333437414244
FIREREC^DIE17 12347810121314
15192123252628313437
4144
M^DIE17 T
N^DIE17 RP5+4, 6+2, 16+5, 18+5, 27+4, 30+4, 33+4, 35+4, 36+4
39+4, M42+3
OUT^DIE17 12347810121314
15192123252628313437
4144
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
SECXREF^RADD1 C5+4, C5+6, C5S+4, C5S+6, C16+4, C16+6, C16S+4, C16S+6, C18+4, C18+6
C18S+4, C18S+6, C30+4, C30+6, C30S+4, C30S+6
XREF^RAUTL2 C5+4, C5+6, C5S+4, C5S+6, C16+4, C16+6, C16S+4, C16S+6, C18+4, C18+6
C18S+4, C18S+6, C30+4, C30+6, C30S+4, C30S+6
EN1^RAUTL4 X5X16X18X30
$$MIDNGHT^RAUTL5 M42+1
EN1^RAUTL9 X12
$$NOW^XLFDT M42+1
EN^XUSHSHP X34

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
  • 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: !!,?3,$C(7),"NOTE: This report does not have an impression. As a result,",!?3," the report will be placed in a 'PROBLEM DRAFT' status",!?3," with an appropriate 'PROBLEM STATEMENT' entered as well.",!
  • Line Location: X7+0
Function Call: WRITE
  • Prompt: !!?3,"This report currently has a status of 'PROBLEM DRAFT' with",!?3,"the following 'PROBLEM STATEMENT':",!!?10,^("P"),!
  • Line Location: X10+0
Function Call: WRITE
  • Prompt: !!,$C(7),"You must enter the 'VERIFYING PHYSICIAN'."
  • Line Location: X25+0
Routine Call
  • DIALOG
  • Line Location:
    • 42+1
Routine Call
  • DIC
  • Line Location:
    • X24
    • X33
Routine Call
  • DIR
  • Line Location:
    • SET+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RARPT - [#74] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( TRR+1
^DD("DD" R+2
^DD("KEY" - [#.31] N
^DIE(1073 BEGIN+2
^DISV( RD+2, Z*
^RA(79 - [#79] X4
^RADPT - [#70] X4
^RARPT - [#74] DEX2X3X4X10, X19!, 42+3, M42
^RARPT("AA" C39+2!, C39S+2*
^RARPT("ASTAT" C5+8!, C5S+8*, C16+8!, C16S+8*, C18+8!, C18S+8*, C30+8!, C30S+8*
^VA(200 - [#200] X26

Label References

Name Line Occurrences
$$KEYCHK Z
@( BV
A NZYRP12345+4, 6+2
78101213141516+5, 18+5, 19
2123252627+4, 2830+4, 3133+4, 34
35+4, 36+4, 3739+4, 41M42+3, R42+1, 44
B QS
BEGIN RACTVR+1
C16F1 C16S
C16S C16
C18F1 C18S
C18S C18
C30F1 C30S
C30S C30
C39F1 C39S
C39S C39
C5F1 C5S
C5S C5
D RDRD+1, P+1, QS
DE RACTVR+1, 12346781012
13141518192021232526
28313334374142R4244
M42 42+2
N Y
NKEY N
O YRP
P T
PR REI+1
QS RDNKEY
R RR+1
RD YII+1, 5+5, 6+3, 16+6, 18+6, 27+5, 30+5, 33+5
35+5, 36+5, 39+5, M42+4
RE 20+1
RP PRRR+1
SAVEVALS Z
SET T
TR RE
V TP+1
W ORE
X NT+1, PY
X1 1
X10 10
X12 12
X13 13
X14 14
X15 15
X19 19
X2 2
X21 21
X23 23
X25 25
X26 26
X28 28
X3 3
X31 31
X34 34
X37 37
X4 4
X41 41
X44 44
X7 7
X8 8
Y 24+4
Z P+1, 27+5, 36+5

Naked Globals

Name Field # of Occurrence
^( RD+2, RR+1, X4
^("F" SAVEVALS*
^("P" DE+2, X10
^(0 DE+1, RR+1, X4X2642+2, 42+3, M42
^(12.1 T

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % DE+1*, DE+2*, TR+2*, SET+2*
>> %DT X39*
%Z DE+1*, DE+2*, DE+3!
>> D N, D*, 42*, 42+1, 42+2*, 42+3*, M42
>> D0 BEGIN+3*
>> DA DEBEGIN+3, X2X3X4C5+8, C5S+8, X10C16+8, C16S+8
C18+8, C18S+8, X19C30+8, C30S+8, X34C39+2, C39S+2, 42+3, M42
DB DE!, C5!, C5S!, C16!, C16S!, C18!, C18S!, C30!, C30S!, C39!
, C39S!
DB( TPXSETSET+1, 5+4*, 6+2*, 16+5*, 18+5*, 27+4*
30+4*, 33+4*, 35+4*, 36+4*, 39+4*, M42+3*
>> DC RP42+1*, M42*
DDER TT+1!, SET+2
DE DE!
DE( O+2, REZYPRRPSAVEVALSSAVEVALS+1, KEYCHK, 5+1*
5+4, 6+2, 16+1*, 16+5, 18+1*, 18+5, 27+4*, 30+1*, 30+4, 33+4
35+4, 36+4*, 39+1*, 39+4, M42+3
DE(1 42!
DE(16 DE+1*, C16C16+1, C16+3, C16+5, C16+7
DE(18 DE+1*, C18C18+1, C18+3, C18+5, C18+7
DE(20 DE+2*
DE(24 DE+1*
DE(27 DE+1*
DE(30 DE+1*, C30C30+1, C30+3, C30+5, C30+7
DE(33 DE+1*
DE(35 DE+1*
DE(36 DE+1*
DE(39 DE+1*, C39C39+1
DE(42 M42*
DE(5 DE+1*, C5C5+1, C5+3, C5+5, C5+7
DE(6 DE+2*
DG DE!, PR*, R*, R+1*, R+2, 12346
781012131415181920
21232526283133343741
4244
DG( Z*, C5SC5S+1, C5S+3, C5S+5, C5S+7, C16SC16S+1, C16S+3, C16S+5
C16S+7, C18SC18S+1, C18S+3, C18S+5, C18S+7, C30SC30S+1, C30S+3, C30S+5
C30S+7, C39SC39S+1
>> DGO 42+1*
DIC DE*, P*, C5+1*, C5+3*, C5+5*, C5+7*, C5S+1*, C5S+3*, C5S+5*, C5S+7*
C16+1*, C16+3*, C16+5*, C16+7*, C16S+1*, C16S+3*, C16S+5*, C16S+7*, C18+1*, C18+3*
C18+5*, C18+7*, C18S+1*, C18S+3*, C18S+5*, C18S+7*, X24!*, C30+1*, C30+3*, C30+5*
C30+7*, C30S+1*, C30S+3*, C30S+5*, C30S+7*, X33!*, C39+1*, C39S+1*
DIC("S" T, Z!, X24*, X33*
DIC(0 P*, 1*, 2*, 3*, 4*, 7*, 8*, 10*, 12*, 13*
, 14*, 15*, 19*, 21*, 23*, 25*, 26*, 28*, 31*, 34*
, 37*, 41*, 44*
>> DICRREC BEGIN+2*
>> DIE DE*, PC5+1, C5+3, C5+5, C5+7, C5S+1, C5S+3, C5S+5, C5S+7
C16+1, C16+3, C16+5, C16+7, C16S+1, C16S+3, C16S+5, C16S+7, C18+1, C18+3
C18+5, C18+7, C18S+1, C18S+3, C18S+5, C18S+7, X24C30+1, C30+3, C30+5
C30+7, C30S+1, C30S+3, C30S+5, C30S+7, X33C39+1, C39S+1
>> DIE("NO^" X14X15
DIEBADK BEGIN+1!
DIEFIRE BEGIN+1!, 123478101213
14151921232526283134
374144
>> DIEL DE*
>> DIEZ BEGIN+3*
DIEZAR BEGIN+1~, BEGIN+2*
DIEZRXR BEGIN+1~
DIEZTMP SAVEVALSSAVEVALS+1, SAVEVALS+2, BEGIN+1~*
>> DIFLD NTDSAVEVALSSAVEVALS+1, SAVEVALS+2, 5*, 6*, 16*, 18*
, 20*, 24*, 27*, 30*, 33*, 35*, 36*, 39*, 42+1*
DIIENS SAVEVALSSAVEVALS+1, SAVEVALS+2, BEGIN+1~, BEGIN+3*
DIQUIET SET+1~*
DIR SET~
DIR("V" SET*
DIR(0 SET*
>> DIRUT X13
DIXR BEGIN+1~
>> DL DE*, W
DLAYGO P*, Z!
>> DLB WRD+2, ZD, 5*, 6*, 16*, 18*, 20*, 24*
, 27*, 30*, 33*, 35*, 36*, 39*, 42+1*
>> DNM BEGIN*
>> DOW 42+1*
>> DP DE*, NTSAVEVALSSAVEVALS+1, SAVEVALS+2
>> DQ O+2, A*, BRETPP+2, VXD
YPRRPSETSET+1, SAVEVALS, BEGIN*, 1*, 2*, 3*
, 4*, 5+4, C5SC5S+1, C5S+3, C5S+5, C5S+7, 6*, 6+2, 7*
, 8*, 9*, 10*, 11*, 12*, 13*, 14*, 15*, 16+5, C16S
C16S+1, C16S+3, C16S+5, C16S+7, 17*, 18*, 18+5, C18SC18S+1, C18S+3
C18S+5, C18S+7, 19*, 20*, 21*, 22*, 23*, 25*, 26*, 27+4
, 28*, 29*, 30+4, C30SC30S+1, C30S+3, C30S+5, C30S+7, 31*, 32*
, 33*, 33+4, 34*, 35+4, 36+4, 37*, 38*, 39+4, C39SC39S+1
, 40*, 41*, 42*, M42+3, 43*, 44*
DQ( A!, P+2, D*, PR
>> DQ(35 35+1*
>> DSC( 42+2
DTIME TRBEGIN+3*
>> DTOUT TR*
>> DU DE*, PDPRSET, 5*, 5+2*, 6*, 16*, 16+2*
, 18*, 18+2*, 20*, 24*, 24+1*, 27*, 27+1*, 30*, 30+2*, 33*
33+1*, 35*, 36*, 36+1*, 39*
DUZ RD+2, Z27+2, 36+2
>> DV O+1, O+2, NRD+2, TPP+1, ZDY
PRRPI, 5*, 5+4, 6*, 6+2, 16*, 16+5, 18*
18+5, 20*, 24*, 27*, 27+4, 30*, 30+4, 33*, 33+4, 35*
35+4, 36*, 36+4, 39*, 39+4, 42+1*, M42+3
>> DW ZDSAVEVALS+1, KEYCHK, 1*, 2*, 3*, 4*, 5*, 5+1
, 6*, 7*, 8*, 10*, 12*, 13*, 14*, 15*, 16*, 16+1
, 18*, 18+1, 19*, 20*, 21*, 23*, 24*, 25*, 26*, 27*
27+4, 28*, 30*, 30+1, 31*, 33*, 34*, 35*, 36*, 36+4
, 37*, 39*, 39+1, 41*, 42+1*, 44*
>> DZ QS*
>> RACT X1*, X19*, X41
RAKILL C5+4*!, C5+6*!, C5S+4!, C5S+6!, C16+4*!, C16+6*!, C16S+4!, C16S+6!, C18+4*!, C18+6*!
C18S+4!, C18S+6!, C30+4*!, C30+6*!, C30S+4!, C30S+6!
RAOLDST X2*, X41, X44!
>> RAONLINE X23
RARAD C5+4*!, C5+6*!, C5S+4*!, C5S+6*!, C16+4*!, C16+6*!, C16S+4*!, C16S+6*!, C18+4*!, C18+6*!
C18S+4*!, C18S+6*!, C30+4*!, C30+6*!, C30S+4*!, C30S+6*!
RASEC C5S+6!, C16S+6!, C18S+6!, C30S+6!
>> RASECOND C5+4*, C5+6*, C5S+4*, C5S+6*, C16+4*, C16+6*, C16S+4*, C16S+6*, C18+4*, C18+6*
C18S+4*, C18S+6*, C30+4*, C30+6*, C30S+4*, C30S+6*
RASET C5+4!, C5+6!, C5S+4*!, C5S+6*, C16+4!, C16+6!, C16S+4*!, C16S+6*, C18+4!, C18+6!
C18S+4*!, C18S+6*, C30+4!, C30+6!, C30S+4*!, C30S+6*
>> RASIG("NAME" X23X34
>> RASIG("PER" X23X34
RASIGCDE X34*, 35+2, X37!
RASTATX 18+3, X19, X44!
RAVER X2324+2, X26!*, 33+2
RAXREF C5+4~*, C5+6~*, C5S+4~*, C5S+6~*, C16+4~*, C16+6~*, C16S+4~*, C16S+6~*, C18+4~*, C18+6~*
C18S+4~*, C18S+6~*, C30+4~*, C30+6~*, C30S+4~*, C30S+6~*
U DE+1, TRPP+2, ZDRR+1, SETBEGIN+3*
12X234X47810X10
121314151921232526X26
283134374142+3, M4244
X O+2*, TR*, NRDRD+1, RD+2*, T, P*, P+1!, P+2*
ZX+1*, QS, Y*, PR*, R*, R+1*, R+2, RP*, I+1
SET+2*, NKEY*, 1*, 2*, 3*, 4*, 5+4*, C5+1*, C5+3*, C5+5*
C5+7*, C5+8, C5S*, C5S+1*, C5S+3*, C5S+4, C5S+5*, C5S+6, C5S+7*, C5S+8
6+2*, X6!, X6+1!, 7*, 8*, 10*, 12*, 13*, 14*, 15*
16+3*, 16+4, 16+5*, C16+1*, C16+3*, C16+5*, C16+7*, C16+8, C16S*, C16S+1*
C16S+3*, C16S+4, C16S+5*, C16S+6, C16S+7*, C16S+8, 18+3*, 18+4, 18+5*, C18+1*
C18+3*, C18+5*, C18+7*, C18+8, C18S*, C18S+1*, C18S+3*, C18S+4, C18S+5*, C18S+6
C18S+7*, C18S+8, 19*, X20!, X20+1!, 21*, 23*, 24+2*, 24+3, X24*!
, 25*, X25, 26*, X2627+2*, 27+3, 27+4*, 27+5, 28*, 30+4*
C30+1*, C30+3*, C30+5*, C30+7*, C30+8, C30S*, C30S+1*, C30S+3*, C30S+4, C30S+5*
C30S+6, C30S+7*, C30S+8, 31*, 33+2*, 33+3, 33+4*, X33*!, 34*, X34*
35+2*, 35+3, 35+4*, X35!, X35+1!, 36+2*, 36+3, 36+4*, 36+5, 37*
39+2*, 39+3, 39+4*, C39+1*, C39+2, C39S*, C39S+1*, C39S+2, X39*!, 41*
M42+1*, M42+2, M42+3*, 44*
X1 X34*, X37!
X2 X34*, X37!
>> Y OO+1, O+2, PY, PR*, R*, R+1*, R+2*, SET+2
, 1*, 2*, 3*, X3*, 4*, X4*, 5+3*, 5+4, 6+1*, 6+2
, 7*, 8*, X8*, 10*, 12*, 13*, X13*, 14*, 15*, X15*
16+4*, 16+5, 18+4*, 18+5, 19*, X19*, 21*, X21*, 23*, X23*
24+3*, X24, 25*, X25*, 26*, 27+3*, 27+4, 28*, X28*, 30+3*
30+4, 31*, X31*, 33+3*, 33+4, X33, 34*, 35+3*, 35+4, 36+3*
36+4, 37*, 39+3*, 39+4, X39, 41*, X41*, M42+2*, M42+3, 44*
>> Y(0 SET+2
YS V!
>> ZTQUEUED XNKEY

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