Routine: RADLY

Information

RADLY ;HISC/GJC AISC/MJK,RMO-Rad Daily Log Report ;7/17/97 12:35

Call Graph

Call Graph Total: 13

Package	Total	Call Graph
Radiology Nuclear Medicine	10	$$DIVTOT^RACMP (HD,KILL,PRINT,SORT,ZEROUT)^RADLY1 ($$SSANVAL,$$USESSAN)^RAHLRU1 SETVARS^RAPSET1 (CLOSE,ZIS)^RAUTL TIME^RAUTL1 $$EOS^RAUTL5 ($$SETUPDI,SELDIV,SELLOC)^RAUTL7 SETUP^RAUTL7A STOPCHK^RAUTL9
VA Fileman	2	^%DT NOW^%DTC
Kernel	1	$$FMTE^XLFDT

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
Radiology Nuclear Medicine	2	RA LOG RADLY1

Entry Points

Name	Comments	DBIA/ICR reference
SET	; Set ^TMP global
CLEAN
ASKLOG	; Ask log date
SYN3
START	; Start the process
CLN3
CLN2
CLN1
SYNOP	; Synopsis of data presented to the user.
SYN1
SYN2
PREP
OUT

External References

Name	Field # of Occurrence
^%DT	ASKLOG+3
NOW^%DTC	START+1
$$DIVTOT^RACMP	PREP+11
HD^RADLY1	PREP+6, PREP+12, SYN1+1, SYN2+1, SYN3+1
KILL^RADLY1	ASKLOG+4, ASKLOG+12, START+18, PREP+7, OUT
PRINT^RADLY1	PREP+9
SORT^RADLY1	START+15
ZEROUT^RADLY1	CLEAN+6
$$SSANVAL^RAHLRU1	SET+21
$$USESSAN^RAHLRU1	SET+23, SET+24
SETVARS^RAPSET1	RADLY+3
CLOSE^RAUTL	START+18, PREP+7, OUT
ZIS^RAUTL	ASKLOG+11
TIME^RAUTL1	SET+8
$$EOS^RAUTL5	PREP+12, SYN1+1, SYN2+1, SYN3+1
$$SETUPDI^RAUTL7	RADLY+6
SELDIV^RAUTL7	RADLY+9
SELLOC^RAUTL7	RADLY+19
SETUP^RAUTL7A	RADLY+14
STOPCHK^RAUTL9	SET+16
$$FMTE^XLFDT	ASKLOG+5, START+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: CLEAN+6
Function Call: WRITE	Prompt: ! Line Location: ASKLOG+1
Function Call: WRITE	Prompt: !?RATAB(2),"Division",!?RATAB(2)+3,"Imaging Type",!?RATAB(2)+6,"Imaging Location(s)",! Line Location: SYNOP+2
Function Call: WRITE	Prompt: !!?RATAB(2),$P($G(^DIC(4,A,0)),"^") Line Location: SYN1+2
Function Call: WRITE	Prompt: !?RATAB(2)+3,B,!?RATAB(2)+6 Line Location: SYN2+2
Function Call: WRITE	Prompt: C,?($X+3) Line Location: SYN3+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(34 - [#34]	SET+11
^DIC(4 - [#4]	PREP+2, SYN1+2
^DIC(42 - [#42]	SET+9
^RA(72 - [#72]	SET+5
^RA(79.2 - [#79.2]	RADLY+16
^RADPT - [#70]	START+15, SET+1, SET+12
^RADPT("AR"	START+11, START+13
^RAMIS(71 - [#71]	SET+3
^RARPT - [#74]	SET+15
^SC - [#44]	SET+10
^TMP($J	RADLY+10, RADLY+16, RADLY+20!, CLEAN!, CLN1, CLN2, CLN3, CLN3+1!, CLN3+2!, CLN3+3! , PREP, PREP+1, PREP+3, PREP+8, SET+17, SET+18, SET+19, SET+23, SET+24, SYN1 , SYN2, SYN3

Label References

Name	Line Occurrences
CLEAN	RADLY+6, RADLY+10
CLN1	CLN2
CLN2	CLN3
CLN3	CLN3+4
OUT	PREP
PREP	CLN1
SYN1	SYN2
SYN2	SYN3
SYN3	SYN3+4
SYNOP	PREP+13

Naked Globals

Name	Field # of Occurrence
^("R"	SET+12

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	START+3
%DT	ASKLOG+1!, ASKLOG+2*, ASKLOG+3!
%DT("A"	ASKLOG+2*
%DT("B"	ASKLOG+3*
A	START+21~, CLN1, CLN2, CLN3, CLN3+1, CLN3+2, CLN3+3, SYNOP+1, SYN1, SYN1+2 , SYN2, SYN3
B	START+21~, CLN1, CLN2, CLN3, CLN3+1, CLN3+2, SYN1+2, SYN2, SYN2+2, SYN3
C	START+21~, CLN2, CLN3, CLN3+1, SYN2+2, SYN3, SYN3+3
DUZ	RADLY+3, RADLY+10, RADLY+16, RADLY+20, CLEAN+6
I	CLEAN+2!
IO	START+1
IOM	START+4, START+5, START+6, START+7, START+8, START+9, SYN3+2
IOSL	SYN1+1, SYN2+1, SYN3+1
POP	CLEAN+2!
>> RA6	SET+5*, SET+9
>> RA8	SET+6*, SET+10
>> RA9	SET+6*, SET+11
RACCESS	CLEAN+2!
RACCESS(	RADLY+3, RADLY+10!, RADLY+16, CLEAN+6!
>> RACESS(	RADLY+20!
RACHK1	RADLY+12~
>> RACN	SET+2*, SET+22, SET+24
RACNDSP	SET+21~, SET+22*, SET+23
>> RACNI	SET+1, SET+12, SET+21, SET+23, SET+24
>> RADFN	START+13*, START+15, SET+1, SET+12, SET+21
>> RADIV	PREP+2, PREP+5, PREP+12, SET+17, SET+18, SET+19, SET+23, SET+24
>> RADIV0	PREP+5*
>> RADIVNM	PREP+11*
>> RADIVTY	SET+20*
>> RADTE	START+11*, START+12, START+13, START+14, SET+8, SET+23, SET+24
>> RADTI	START+14*, START+15, SET+1, SET+12, SET+21
>> RAEX(0	SET+1*, SET+2, SET+3, SET+5, SET+6, SET+14
>> RAFLG	PREP+12*
>> RAHEAD	START+4*
>> RAILOC	PREP+3*, PREP+5, SET+19, SET+23, SET+24
>> RAILOC0	PREP+5*
>> RAITYPE	PREP+2, PREP+5, PREP+12, SET+18, SET+19, SET+23, SET+24
>> RAITYPE0	PREP+5*
>> RALDTI	ASKLOG+5*, START+11, START+12
>> RALDTX	ASKLOG+5*, START+4
>> RALN	START+4*
>> RANME	SET+23, SET+24
>> RAPG	START+3*
>> RAPOP	ASKLOG+12
>> RAPRC	SET+2, SET+3, SET+4*, SET+23, SET+24
RAPSTX	RADLY+3*, CLEAN+2!
RAQUIT	RADLY+10, RADLY+20, CLEAN+2!
>> RARPT	SET+14, SET+15, SET+23, SET+24
RASSAN	SET+21~*, SET+22
>> RASSN	SET+23, SET+24
>> RAST	SET+3, SET+5, SET+7*, SET+23, SET+24
>> RATAB(1	START+5*
>> RATAB(2	START+5*, SYNOP+2, SYN1+2, SYN2+2, SYN3+2
>> RATAB(3	START+6*
>> RATAB(4	START+6*
>> RATAB(5	START+7*
>> RATAB(6	START+7*
>> RATAB(7	START+8*
>> RATAB(8	START+8*
>> RATAB(9	START+9*
>> RATDY	START+3*
>> RATME	SET+8*, SET+23, SET+24
>> RAWHE	SET+9, SET+10, SET+11, SET+12, SET+13*, SET+23, SET+24
RAXIT	RADLY+6, RADLY+10, RADLY+20, CLEAN+2!, START+3, START+11, START+13, START+18, PREP+7, PREP+10 , PREP+12, PREP+13, SET+16, SYN1+1, SYN2+1, SYN3+1*
U	RADLY+16
X	RADLY+12~, RADLY+16, PREP+1, PREP+2, PREP+3, SET+8
X1	RADLY+12~
>> Y	ASKLOG+4, ASKLOG+5, PREP+1*, PREP+2, PREP+3
>> ZTDESC	ASKLOG+6*
>> ZTQUEUED	START+2, SET+16
>> ZTREQ	START+2*
>> ZTRTN	ASKLOG+7*
>> ZTSAVE("RALDT*"	ASKLOG+7*
>> ZTSAVE("^TMP(	$J, ""RA D-TYPE"", " , ASKLOG+8, $J, ""RA I-TYPE"", " , ASKLOG+9, $J, ""RA LOC-TYPE"" , " , ASKLOG+10*
>> ZTSAVE("^TMP($J,""RADLY"","	ASKLOG+8*
>> ZTSTOP	SET+16

Customize PDF page

Package: Radiology Nuclear Medicine

Routine: RADLY

Information

Source Information

Call Graph

Call Graph Total: 13

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: