Routine: RALWKL2

Package	Total	Call Graph
Radiology Nuclear Medicine	3	HD^RALWKL1 CLOSE^RAUTL $$EOS^RAUTL5

Package	Total	Caller Graph
Radiology Nuclear Medicine	5	RACDR RAFLM RALWKL RALWKL1 RAWKL

Entry Points

Name	Comments	DBIA/ICR reference
PURGE	; Kill & Quit
IMGCHK	; Check for EOS on I-Type
IT	; calculate imaging type subscript
DIVCHK	; Output statistics within division.
ZEROUT	; Zero out the data globals.

External References

Name	Field # of Occurrence
HD^RALWKL1	DIVCHK+3, DIVCHK+7, DIVCHK+19, DIVCHK+24, DIVCHK+28, DIVCHK+35, IMGCHK+3, IMGCHK+4, IMGCHK+8, IMGCHK+19 , IMGCHK+29
CLOSE^RAUTL	PURGE+8
$$EOS^RAUTL5	DIVCHK+3, DIVCHK+7, DIVCHK+19, DIVCHK+24, DIVCHK+28, DIVCHK+35, IMGCHK+3, IMGCHK+8, IMGCHK+19, IMGCHK+29

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,$E(RA1,1,28),?30,$J(+$P(RATTL2,"^"),5) Line Location: DIVCHK+11
Function Call: WRITE	Prompt: ?36,$J(+$P(RATTL2,"^",2),5),?42,$J(+$P(RATTL2,"^",3),5) Line Location: DIVCHK+12
Function Call: WRITE	Prompt: ?48,$J(+$P(RATTL2,"^",4),5),?55,$J(RATTL3,5) Line Location: DIVCHK+13
Function Call: WRITE	Prompt: ?68,$J(RAWWU2,5) Line Location: DIVCHK+15
Function Call: WRITE	Prompt: !,RALN,!!,"Division Total",?30,$J(+$P(RATTL0,"^"),5) Line Location: DIVCHK+21
Function Call: WRITE	Prompt: ?36,$J(+$P(RATTL0,"^",2),5),?42,$J(+$P(RATTL0,"^",3),5) Line Location: DIVCHK+22
Function Call: WRITE	Prompt: ?48,$J(+$P(RATTL0,"^",4),5),?55,$J(RATTL1,5) Line Location: DIVCHK+23
Function Call: WRITE	Prompt: ?68,$J(RAWWU1,5) Condition for execution: $D(RAFL) Line Location: DIVCHK+23
Function Call: WRITE	Prompt: !!?2,"Imaging Type(s): " Line Location: DIVCHK+25
Function Call: WRITE	Prompt: !!?3,"# of "_RATITLE_"s selected: "_$S(RAINPUT=1:"ALL",1:$G(RAFLDCNT)) Line Location: DIVCHK+31
Function Call: WRITE	Prompt: !,$E(RA111,1,28),?30,$J(+$P(RATTL2,"^"),5) Line Location: IMGCHK+12
Function Call: WRITE	Prompt: ?36,$J(+$P(RATTL2,"^",2),5),?42,$J(+$P(RATTL2,"^",3),5) Line Location: IMGCHK+13
Function Call: WRITE	Prompt: ?48,$J(+$P(RATTL2,"^",4),5),?55,$J(RATTL3,5) Line Location: IMGCHK+14
Function Call: WRITE	Prompt: ?68,$J(RAWWU2,5) Line Location: IMGCHK+16
Function Call: WRITE	Prompt: !,RALN,!!,"Imaging Type Total",?30,$J(+$P(RATTL0,"^"),5) Line Location: IMGCHK+21
Function Call: WRITE	Prompt: ?36,$J(+$P(RATTL0,"^",2),5),?42,$J(+$P(RATTL0,"^",3),5) Line Location: IMGCHK+22
Function Call: WRITE	Prompt: ?48,$J(+$P(RATTL0,"^",4),5),?55,$J(RATTL1,5),?68,$J(RAWWU1,5) Line Location: IMGCHK+23
Function Call: WRITE	Prompt: !!?3,"# of "_RATITLE_"s selected: "_$S(RAINPUT=1:"ALL",1:$G(RAFLDCNT)) Line Location: IMGCHK+24

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^RA(79.2 - [#79.2]	DIVCHK+29, IT+1, IT+2
^TMP($J	DIVCHK+4, DIVCHK+6, DIVCHK+9, DIVCHK+27, DIVCHK+32, DIVCHK+34, DIVCHK+35, IMGCHK+5, IMGCHK+7, IMGCHK+10 , IMGCHK+25, IMGCHK+27, IMGCHK+28, PURGE+7!, PURGE+8!, ZEROUT+3, ZEROUT+4, ZEROUT+6, ZEROUT+7

Label References

Name	Line Occurrences
IT	ZEROUT+6

Naked Globals

Name	Field # of Occurrence
^(0	DIVCHK+29

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	PURGE+1!
A	PURGE+1!, ZEROUT+1~, ZEROUT+2*, ZEROUT+3, ZEROUT+5
A1	PURGE+1!, ZEROUT+1~, ZEROUT+3*, ZEROUT+4, ZEROUT+6, ZEROUT+7
B	PURGE+1!, ZEROUT+1~, ZEROUT+4, ZEROUT+5, ZEROUT+6, IT+1
B1	PURGE+1!, ZEROUT+1~, ZEROUT+6, ZEROUT+7, IT+1, IT+2
BEGDATE	PURGE+1!
C	PURGE+1!
DIROUT	PURGE+1!
DIRUT	PURGE+1!
DTOUT	PURGE+1!
DUOUT	PURGE+1!
DUZ	ZEROUT+2, ZEROUT+5, ZEROUT+10
ENDDATE	PURGE+1!
I	DIVCHK+5, DIVCHK+10, IMGCHK+6, IMGCHK+11, PURGE+1!
IOSL	DIVCHK+7, DIVCHK+19, DIVCHK+24, DIVCHK+28, IMGCHK+8, IMGCHK+19
J	PURGE+1!
POP	PURGE+8!
RA1	DIVCHK+1~, DIVCHK+2, DIVCHK+6, DIVCHK+9, DIVCHK+11, DIVCHK+32, DIVCHK+33, IMGCHK+1~, IMGCHK+25, IMGCHK+26 , PURGE+1!
RA11	DIVCHK+34, IMGCHK+1~, IMGCHK+27, PURGE+1!
RA111	DIVCHK+35, IMGCHK+1~, IMGCHK+2, IMGCHK+7, IMGCHK+10, IMGCHK+12, IMGCHK+28, PURGE+2!
RABEG	PURGE+2!
RACCESS	PURGE+8!
RACCESS(	ZEROUT+2, ZEROUT+5, ZEROUT+10!
RACNI	PURGE+2!
RACRT	PURGE+2!
RAD0	PURGE+2!
RADFN	PURGE+2!
RADIFLG	PURGE+2!
RADIFLG(	ZEROUT+3, ZEROUT+6
RADIV	DIVCHK+4, DIVCHK+6, DIVCHK+9, DIVCHK+27, DIVCHK+32, DIVCHK+33~*, DIVCHK+34, DIVCHK+35, IMGCHK+5, IMGCHK+7 , IMGCHK+10, IMGCHK+25, IMGCHK+27, IMGCHK+28, PURGE+2!
RADIVNME	PURGE+3!
RADIVSUM	DIVCHK+2*, DIVCHK+20!, PURGE+3!
RADTE	PURGE+3!
RADTI	PURGE+3!
RAEND	PURGE+3!
RAFILE	PURGE+3!
RAFL	DIVCHK+14, DIVCHK+16, DIVCHK+23, IMGCHK+15, IMGCHK+17, PURGE+3!
RAFL1	PURGE+3!
RAFLD	DIVCHK+33~, DIVCHK+35, IMGCHK+26~, IMGCHK+27, IMGCHK+28, PURGE+3!
RAFLDCNT	DIVCHK+31, IMGCHK+24, PURGE+3!
RAIMG	DIVCHK+1~, DIVCHK+2, DIVCHK+33~, DIVCHK+34, DIVCHK+35, IMGCHK+5, IMGCHK+7, IMGCHK+10, IMGCHK+25, IMGCHK+26~* , IMGCHK+27, IMGCHK+28, PURGE+3!
RAIMGSUM	IMGCHK+2*, IMGCHK+20!, PURGE+3!
RAINPUT	DIVCHK+31, IMGCHK+24, PURGE+4!
RAITHLD	DIVCHK+26, DIVCHK+27, DIVCHK+29, DIVCHK+30!
RALN	DIVCHK+21, IMGCHK+21, PURGE+4!
RALN1	PURGE+4!
RAMES	PURGE+4!
RAMIS	PURGE+4!
RANUM	PURGE+4!
RAP0	PURGE+4!
RAPCE	PURGE+4!
RAPG	IMGCHK+3, IMGCHK+4, PURGE+4!
RAPOP	PURGE+4!
RAPRC	PURGE+4!
RAPRI	PURGE+5!
RAPSTX	PURGE+8!
RAQI	PURGE+5!
RAQUIT	PURGE+5!
RASUM	DIVCHK+1~, DIVCHK+2, DIVCHK+33, IMGCHK+1~, IMGCHK+2, IMGCHK+26, PURGE+5!
RASV	PURGE+5!
RATDY	PURGE+5!
RATITLE	DIVCHK+31, IMGCHK+24, PURGE+5!
RATTL0	DIVCHK+1~, DIVCHK+4, DIVCHK+5, DIVCHK+21, DIVCHK+22, DIVCHK+23, IMGCHK+1~, IMGCHK+5, IMGCHK+6, IMGCHK+21 , IMGCHK+22, IMGCHK+23, PURGE+5!
RATTL1	DIVCHK+1~, DIVCHK+5, DIVCHK+14, DIVCHK+23, IMGCHK+1~, IMGCHK+6, IMGCHK+15, IMGCHK+23, PURGE+5!
RATTL2	DIVCHK+8, DIVCHK+9, DIVCHK+10, DIVCHK+11, DIVCHK+12, DIVCHK+13, IMGCHK+1~, IMGCHK+9, IMGCHK+10, IMGCHK+11 , IMGCHK+12, IMGCHK+13, IMGCHK+14, PURGE+5!
RATTL3	DIVCHK+8, DIVCHK+10, DIVCHK+13, DIVCHK+14, IMGCHK+1~, IMGCHK+9, IMGCHK+11, IMGCHK+14, IMGCHK+15, PURGE+6!
RAWWU1	DIVCHK+1~, DIVCHK+4, DIVCHK+16, DIVCHK+23, IMGCHK+1~, IMGCHK+5, IMGCHK+17, IMGCHK+23, PURGE+6!
RAWWU2	DIVCHK+8, DIVCHK+9, DIVCHK+15, DIVCHK+16, IMGCHK+1~, IMGCHK+9, IMGCHK+10, IMGCHK+16, IMGCHK+17, PURGE+6!
RAXIT	DIVCHK+3, DIVCHK+6, DIVCHK+7, DIVCHK+18, DIVCHK+19, DIVCHK+24, DIVCHK+27, DIVCHK+28, DIVCHK+30, DIVCHK+35 , IMGCHK+3, IMGCHK+4, IMGCHK+7, IMGCHK+8, IMGCHK+19, IMGCHK+29, PURGE+6!
U	DIVCHK+29, IT+2
X	PURGE+6!
Y	PURGE+6!
ZTDESC	PURGE+6!
ZTRTN	PURGE+6!
ZTSAVE	PURGE+6!

Customize PDF page

Package: Radiology Nuclear Medicine

Routine: RALWKL2

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 5

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: