Routine: RANMUSE1

Package	Total	Call Graph
Radiology Nuclear Medicine	6	(SET,WRT)^RANMUSE2 (SUM,ZERO)^RANMUSE3 (SELADMIN,SELDATES,SELIMG,SELRADIO,SELSORT)^RANMUTL1 SETVARS^RAPSET1 (CLOSE,D,ZIS)^RAUTL ($$SETUPDI,SELDIV)^RAUTL7
VA Fileman	2	^%DT ^DIR

Package

Total

Call Graph

(SET,WRT)^RANMUSE2 (SUM,ZERO)^RANMUSE3 (SELADMIN,SELDATES,SELIMG,SELRADIO,SELSORT)^RANMUTL1 SETVARS^RAPSET1 (CLOSE,D,ZIS)^RAUTL ($$SETUPDI,SELDIV)^RAUTL7

VA Fileman

^%DT ^DIR

Package	Total	Caller Graph
Radiology Nuclear Medicine	2	RA NM RADIOPHARM ADMIN RA NM RADIOPHARM USAGE

Package

Total

Caller Graph

Radiology Nuclear Medicine

RA NM RADIOPHARM ADMIN RA NM RADIOPHARM USAGE

Name	Comments	DBIA/ICR reference
START	;
RADADM	; Entry point for Radiopharm administerer report
RADUSE	; Entry point for Radiopharm usage report
EN1	;
KIL	;
OUT	;

External References

Name	Field # of Occurrence
^%DT	EN1+5
^DIR	EN1+9
SET^RANMUSE2	START+6
WRT^RANMUSE2	START+9
SUM^RANMUSE3	START+10
ZERO^RANMUSE3	START+7
SELADMIN^RANMUTL1	EN1+26
SELDATES^RANMUTL1	EN1+29
SELIMG^RANMUTL1	EN1+21
SELRADIO^RANMUTL1	EN1+25
SELSORT^RANMUTL1	EN1+31
SETVARS^RAPSET1	EN1+12
CLOSE^RAUTL	OUT+2
D^RAUTL	EN1+5
ZIS^RAUTL	EN1+57
$$SETUPDI^RAUTL7	EN1+13
SELDIV^RAUTL7	EN1+14

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?5,"*",?57,"",!?5," This report requires a 132 column output device ",!?5,"",?57,"*" Line Location: EN1+56
Function Call: WRITE	Prompt: ! Line Location: EN1+57
Routine Call	DIR Line Location: EN1+9

Name	Line Occurrences (* Changed, ! Killed)
^TMP($J	EN1+15, EN1+16!, EN1+22, EN1+23!, EN1+28, KIL+1!, KIL+2!

Name	Line Occurrences
EN1	RADUSE+2, RADADM+2
KIL	EN1+3, OUT+3
OUT	EN1+9, EN1+15, EN1+22, EN1+27, EN1+28, EN1+30, EN1+32, EN1+58, START+9

Name	Field # of Occurrence
^("DIV-IMG"	KIL+1!
^("RA D-TYPE"	KIL+1!
^("RA EITHER"	KIL+1!
^("RA I-TYPE"	KIL+1!
^("RASUM"	KIL+1!
^("RATDOSE"	KIL+2!
^("RATDRAWN"	KIL+2!
^("RATRADIO"	KIL+2!
^("RATUNIQ"	KIL+1!

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	EN1+5*!
DFN	EN1+1~
DIR	EN1+6!, EN1+9!, KIL+7!
DIR("?"	EN1+8*
DIR("A"	EN1+8*
DIR("B"	EN1+8*
DIR(0	EN1+8*
DIROUT	EN1+11!
DIRUT	EN1+9, EN1+11!
DTOUT	EN1+11!
DUOUT	EN1+11!
DUZ	EN1+12, EN1+16, EN1+23
I	EN1+1~, EN1+55*, KIL+7!
IO	START+8
P02	EN1+2~
P03	EN1+2~
RA0	KIL+3!
RA1	KIL+3!
RA2	KIL+3!
>> RACCESS(	EN1+12, EN1+16!, EN1+23!
RACN	EN1+1~
RACNI	KIL+4!
RADFN	KIL+4!
RADIOPH	EN1+1~
RADIVNAM	EN1+1~
RADOSE	KIL+6!
RADRAWN	KIL+6!
RADTBEG	KIL+3!
RADTEND	KIL+3!
RADTI	KIL+4!
RAEITHER	KIL+7!
RAFIRST	KIL+3!
RAHDTYP	START+1!, KIL+6!
RAHIGH	KIL+6!
RAIMGNAM	EN1+1~
RAINPUT	EN1+25, EN1+26, EN1+28, KIL+4!
RALN	EN1+5*, KIL+4!
RALONGCN	KIL+4!
RALOW	KIL+6!
RAMES	KIL+6!
RAN0	KIL+4!
RANUC	KIL+4!
RANUC1	KIL+6!
RANUMD	KIL+6!
RANUMI	KIL+6!
RAPATNAM	EN1+1~
RAPG	EN1+4*, KIL+3!
RAPOP	EN1+30, EN1+32, EN1+58, KIL+5!
RAPRC0	KIL+5!
RAPRCNAM	EN1+1~
RAQUIT	EN1+15, EN1+22, EN1+27, KIL+5!
RASEQD	KIL+5!
RASEQI	KIL+5!
RASORT	KIL+3!
RASSN	KIL+5!
RASTERSK	KIL+3!
RASUM	EN1+10*, START+9, KIL+3!
RATDOSE	START+1!
RATDRAWN	START+1!
RATDY	EN1+5*, KIL+4!
RATITLE	EN1+4, EN1+25, EN1+26, RADUSE+2~, RADADM+2~*
RATOUTSD	START+1!
RATRADIO	START+1!
RATUNIQ	START+1!
RAUNIQ	KIL+3!
RAWHO	KIL+5!
RAXIT	START+9, KIL+5!
RAXMDTM	EN1+1~, KIL+5!
S3	EN1+2~
S4	EN1+2~
VA	EN1+2~
VAERR	EN1+2~
X	EN1+5, EN1+13~
>> Y	EN1+5, EN1+10
ZTDESC	RADUSE+1~, RADADM+1~
>> ZTQUEUED	OUT+1
>> ZTREQ	OUT+1*
>> ZTRTN	EN1+50*
>> ZTSAVE(	EN1+55*
>> ZTSAVE("^TMP(	$J, ""RA D-TYPE"", " , EN1+52, $J, ""RA EITHER"", " , EN1+54, $J, ""RA I-TYPE"" , " , EN1+53*
>> ZTSAVE("^TMP($J,""RA"","	EN1+51*

Customize PDF page

Package: Radiology Nuclear Medicine

Routine: RANMUSE1

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: