Routine: RADLQ3

Package	Total	Call Graph
Radiology Nuclear Medicine	5	HDR^RADLQ2 $$USESSAN^RAHLRU1 SETVARS^RAPSET1 CLOSE^RAUTL $$EOS^RAUTL5
Kernel	1	$$REPEAT^XLFSTR

Package	Total	Caller Graph
Radiology Nuclear Medicine	4	RADLQ1 RADLQ2 RAPM RAPMW

Entry Points

Name	Comments	DBIA/ICR reference
LIST	; List divisions and I-Types
CHECK(DUZ)	; Check for the existence of RACCESS. Pass in user's DUZ!
ZEROUT(SUB)	; Zero out the ^TMP($J global.
EXIT	; Kill and quit
OUTPUT	; Print out the results
DISPXAM	; Display exam statuses for selected Imaging Types. These exam ; statuses need the 'DELINQUENT STATUS REPORT?' field tripped to ; 'yes' in file 72.

External References

Name	Field # of Occurrence
HDR^RADLQ2	OUTPUT+7, LIST+5, LIST+9
$$USESSAN^RAHLRU1	OUTPUT+27, OUTPUT+32, OUTPUT+39, OUTPUT+44
SETVARS^RAPSET1	CHECK+1
CLOSE^RAUTL	EXIT+8
$$EOS^RAUTL5	DISPXAM+12, DISPXAM+20, OUTPUT+7, LIST+5, LIST+9
$$REPEAT^XLFSTR	OUTPUT+13

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?(IOM-$L(RAHD(0))\2),RAHD(0) Line Location: DISPXAM+7
Function Call: WRITE	Prompt: !?(IOM-$L(RAHD(1))\2),RAHD(1) Line Location: DISPXAM+8
Function Call: WRITE	Prompt: @IOF Line Location: DISPXAM+12
Function Call: WRITE	Prompt: !!?10,X,!?10,UNDRLN Line Location: DISPXAM+13
Function Call: WRITE	Prompt: @IOF,!?10,X,!?10,UNDRLN Line Location: DISPXAM+21
Function Call: WRITE	Prompt: !!,RASTR(1) Line Location: OUTPUT+15
Function Call: WRITE	Prompt: !,RANME,?RATAB(1),RACN,?RATAB(2)+7,RASSN,?RATAB(3),RADT,?RATAB(4) Line Location: OUTPUT+28
Function Call: WRITE	Prompt: $E(RAWHE,1,25),?RATAB(5),RAVRFIED Line Location: OUTPUT+29
Function Call: WRITE	Prompt: !?RATAB(6),$E(RAPRC,1,30),?RATAB(7),$E(RAST,1,30) Line Location: OUTPUT+30
Function Call: WRITE	Prompt: ?RATAB(8),RARP,?RATAB(9),$E(RAIPHY,1,20),?RATAB(10),RATECH Line Location: OUTPUT+31
Function Call: WRITE	Prompt: !,RANME,?RATAB(1),RACN,?RATAB(2),RASSN,?RATAB(3),RADT,?RATAB(4) Line Location: OUTPUT+33
Function Call: WRITE	Prompt: $E(RAWHE,1,25),?RATAB(5),RAVRFIED Line Location: OUTPUT+34
Function Call: WRITE	Prompt: !?RATAB(6),$E(RAPRC,1,30),?RATAB(7),$E(RAST,1,30) Line Location: OUTPUT+35
Function Call: WRITE	Prompt: ?RATAB(8),RARP,?RATAB(9),$E(RAIPHY,1,20),?RATAB(10),RATECH Line Location: OUTPUT+36
Function Call: WRITE	Prompt: !,$E(RANME,1,20),?RATAB(1),RACN,?RATAB(2)+7,RASSN,?RATAB(3),RADT Line Location: OUTPUT+40
Function Call: WRITE	Prompt: ?RATAB(4),$E(RAWHE,1,15),?RATAB(5),RAVRFIED Line Location: OUTPUT+41
Function Call: WRITE	Prompt: !?RATAB(6),$E(RAPRC,1,20),?RATAB(7),$E(RAST,1,11) Line Location: OUTPUT+42
Function Call: WRITE	Prompt: ?RATAB(8),RARP,?RATAB(9),$E(RAIPHY,1,15),?RATAB(10),RATECH Line Location: OUTPUT+43
Function Call: WRITE	Prompt: !,$E(RANME,1,20),?RATAB(1),RACN,?RATAB(2),RASSN,?RATAB(3),RADT Line Location: OUTPUT+45
Function Call: WRITE	Prompt: ?RATAB(4),$E(RAWHE,1,15),?RATAB(5),RAVRFIED Line Location: OUTPUT+46
Function Call: WRITE	Prompt: !?RATAB(6),$E(RAPRC,1,20),?RATAB(7),$E(RAST,1,11) Line Location: OUTPUT+47
Function Call: WRITE	Prompt: ?RATAB(8),RARP,?RATAB(9),$E(RAIPHY,1,15),?RATAB(10),RATECH Line Location: OUTPUT+48
Function Call: WRITE	Prompt: !,RALN1 Line Location: OUTPUT+50
Function Call: WRITE	Prompt: !!,"Division: ",$P($G(^DIC(4,A,0)),"^"),!?3,"Imaging Type(s): " Line Location: LIST+3
Function Call: WRITE	Prompt: !?($X+$L("Imaging Type(s): ")+3) Condition for execution: $X>(IOM-30) Line Location: LIST+6
Function Call: WRITE	Prompt: B,?($X+3) Line Location: LIST+6
Function Call: WRITE	Prompt: !!?RATAB(6),"Total Over All Divisions: ",+$G(^TMP($J,"RADLQ")) Line Location: LIST+10

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(4 - [#4]	LIST+3
^RA(72 - [#72]	DISPXAM+11, DISPXAM+14, DISPXAM+15, DISPXAM+16
^TMP($J	DISPXAM+10, LIST+2, LIST+4, LIST+10, EXIT+7!, ZEROUT+3, ZEROUT+4, ZEROUT+5, ZEROUT+7, ZEROUT+9* , ZEROUT+10*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	EXIT+1!
A	LIST+1~, LIST+2, LIST+3, LIST+4
B	LIST+1~, LIST+4*, LIST+6
BEGDATE	EXIT+1!
DIROUT	EXIT+1!
DIRUT	EXIT+1!
DISYS	EXIT+9!
DTOUT	EXIT+1!
DUOUT	EXIT+1!
DUZ	CHECK~, ZEROUT+2, ZEROUT+6
ENDDATE	EXIT+1!
I	OUTPUT+3*, OUTPUT+4, EXIT+1!, EXIT+9!
INVMAXDT	EXIT+1!
IOF	DISPXAM+12, DISPXAM+21
IOM	DISPXAM+7, DISPXAM+8, OUTPUT+13, OUTPUT+26, LIST+6
IOSL	DISPXAM+12, DISPXAM+20, OUTPUT+6, LIST+5, LIST+9
POP	EXIT+9!
RA	DISPXAM+3~, EXIT+1!
RA(	DISPXAM+16, DISPXAM+17, DISPXAM+18
RA(0	DISPXAM+16*, DISPXAM+18, DISPXAM+23
RA1	EXIT+1!
RA2	EXIT+1!
RABEG	EXIT+2!
RACCESS	EXIT+8!
RACCESS(	ZEROUT+2, ZEROUT+6
RACN	OUTPUT+28, OUTPUT+33, OUTPUT+40, OUTPUT+45, EXIT+2!
RACNI	EXIT+2!
RACRT	EXIT+2!
RACRT(	DISPXAM+19*
RADFN	EXIT+2!
RADIV	EXIT+2!
RADIVNM	EXIT+2!
RADT	OUTPUT+28, OUTPUT+33, OUTPUT+40, OUTPUT+45, EXIT+2!
RADTE	EXIT+2!
RADTI	EXIT+2!
RAEND	EXIT+2!
RAEOS	OUTPUT+1~, OUTPUT+2, OUTPUT+6, OUTPUT+11
RAEXAM	EXIT+3!
RAFLAG	EXIT+3!
RAHD	DISPXAM+3~, EXIT+3!
RAHD(0	DISPXAM+4*, DISPXAM+7
RAHD(1	DISPXAM+5*, DISPXAM+8
RAHEAD	EXIT+3!
RAIPHY	OUTPUT+31, OUTPUT+36, OUTPUT+43, OUTPUT+48, EXIT+3!
RAITYPE	EXIT+3!
>> RALL	DISPXAM+6, DISPXAM+12, DISPXAM+13, DISPXAM+20, DISPXAM+23
RALN1	OUTPUT+50, EXIT+3!
RALN2	EXIT+3!
RAMES	EXIT+3!
RANME	OUTPUT+28, OUTPUT+33, OUTPUT+40, OUTPUT+45, EXIT+3!
RANODE	OUTPUT+3, OUTPUT+4, EXIT+4!
RAPAT	EXIT+4!
RAPG	EXIT+4!
RAPOP	EXIT+4!
RAPRC	OUTPUT+30, OUTPUT+35, OUTPUT+42, OUTPUT+47, EXIT+4!
RAPSTX	CHECK+1*, EXIT+8!
RAQUIT	EXIT+4!
RAREGEX	EXIT+4!
RARP	OUTPUT+31, OUTPUT+36, OUTPUT+43, OUTPUT+48, EXIT+4!
RASORT1	EXIT+4!, ZEROUT+9, ZEROUT+10
RASORT2	EXIT+4!
RASSN	OUTPUT+28, OUTPUT+33, OUTPUT+40, OUTPUT+45, EXIT+5!
RAST	OUTPUT+30, OUTPUT+35, OUTPUT+42, OUTPUT+47, EXIT+5!
RASTI	EXIT+5!
RASTR	OUTPUT+12~*, OUTPUT+13, OUTPUT+14
RASTR(0	OUTPUT+13*, OUTPUT+14
RASTR(1	OUTPUT+14*, OUTPUT+15
RASV	EXIT+5!
RATAB	EXIT+5!
RATAB(1	OUTPUT+28, OUTPUT+33, OUTPUT+40, OUTPUT+45
RATAB(10	OUTPUT+31, OUTPUT+36, OUTPUT+43, OUTPUT+48
RATAB(2	OUTPUT+28, OUTPUT+33, OUTPUT+40, OUTPUT+45
RATAB(3	OUTPUT+28, OUTPUT+33, OUTPUT+40, OUTPUT+45
RATAB(4	OUTPUT+28, OUTPUT+33, OUTPUT+41, OUTPUT+46
RATAB(5	OUTPUT+29, OUTPUT+34, OUTPUT+41, OUTPUT+46
RATAB(6	OUTPUT+30, OUTPUT+35, OUTPUT+42, OUTPUT+47, LIST+10
RATAB(7	OUTPUT+30, OUTPUT+35, OUTPUT+42, OUTPUT+47
RATAB(8	OUTPUT+31, OUTPUT+36, OUTPUT+43, OUTPUT+48
RATAB(9	OUTPUT+31, OUTPUT+36, OUTPUT+43, OUTPUT+48
RATECH	OUTPUT+31, OUTPUT+36, OUTPUT+43, OUTPUT+48, EXIT+5!
RAVAR	OUTPUT+1, OUTPUT+11, OUTPUT+51, EXIT+5!
RAVAR(0	OUTPUT+1, OUTPUT+51*
RAVRFIED	OUTPUT+29, OUTPUT+34, OUTPUT+41, OUTPUT+46, EXIT+5!
RAWHE	OUTPUT+29, OUTPUT+34, OUTPUT+41, OUTPUT+46, EXIT+5!
RAXIT	DISPXAM+10, DISPXAM+12, DISPXAM+14, DISPXAM+15, DISPXAM+20, OUTPUT+6, OUTPUT+7, LIST+4, LIST+5, LIST+9* , EXIT+5!
SUB	ZEROUT~, ZEROUT+5, ZEROUT+7, ZEROUT+8, ZEROUT+9, ZEROUT+10
UNDRLN	DISPXAM+3~, DISPXAM+11!, DISPXAM+13*, DISPXAM+21
X	DISPXAM+3~, DISPXAM+10, DISPXAM+11, DISPXAM+13, DISPXAM+14, DISPXAM+15, DISPXAM+21, EXIT+6!, ZEROUT+1~, ZEROUT+2 , ZEROUT+3, ZEROUT+4, ZEROUT+6
Y	DISPXAM+3~, DISPXAM+11, DISPXAM+14, DISPXAM+15, EXIT+6!, ZEROUT+1~, ZEROUT+3, ZEROUT+4, ZEROUT+5, ZEROUT+7 , ZEROUT+9, ZEROUT+10
Z	DISPXAM+3~, DISPXAM+15, DISPXAM+16, DISPXAM+19, ZEROUT+1~, ZEROUT+5, ZEROUT+6*, ZEROUT+7, ZEROUT+9, ZEROUT+10
ZTDESC	EXIT+6!
ZTRTN	EXIT+6!
ZTSAVE	EXIT+6!

Customize PDF page

Package: Radiology Nuclear Medicine

Routine: RADLQ3

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Local Variables

Legend: