Routine: RARTUVR2

Package	Total	Call Graph
Radiology Nuclear Medicine	4	PHYS^RARTUVR1 $$SSN^RAUTL $$EOS^RAUTL5 STOPCHK^RAUTL9
Kernel	1	$$FMTE^XLFDT
Registration	1	DEM^VADPT

Package	Total	Caller Graph
Radiology Nuclear Medicine	2	RARTUVR RARTUVR1

Entry Points

Name	Comments	DBIA/ICR reference
HDR	; header
NEGRPT	; negative reports
PRTB
HOURAGE
PRTD
PRINT	; print entries
SETX
APPEND

External References

Name	Field # of Occurrence
PHYS^RARTUVR1	PRTD+24
$$SSN^RAUTL	PRTD+9
$$EOS^RAUTL5	PRINT+5, PRINT+8, PRINT+21, PRTB, PRTD+17
STOPCHK^RAUTL9	PRINT+3, PRINT+14, PRTB+1, PRTD+4
DEM^VADPT	PRTD+8
$$FMTE^XLFDT	HDR+2, HDR+3, PRTD+11, SETX+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"* ",$P(RASTRING,U),": ",^TMP($J,RADIVNME,RAITNAME,$P(RASTRING,U,2))," *" Line Location: PRINT+11
Function Call: WRITE	Prompt: !! Line Location: PRINT+18
Function Call: WRITE	Prompt: ! Line Location: PRINT+20
Function Call: WRITE	Prompt: @IOF Condition for execution: $Y>0 Line Location: HDR+1
Function Call: WRITE	Prompt: !?$S(IOM<81:20,1:IOM-90),">>>>> Unverified Reports ("_$S(RABD="B":"brief",1:"detailed")_") <<<<<" Line Location: HDR+1
Function Call: WRITE	Prompt: ?$S(IOM<81:70,1:IOM-10),"Page: ",RAPAGE Line Location: HDR+1
Function Call: WRITE	Prompt: !,"Division: ",?10,RADIVNME,?$S(IOM<81:43,1:IOM-37),"Report Date Range:",?$S(IOM<81:62,1:IOM-18),$$FMTE^XLFDT(BEGDATE) Line Location: HDR+2
Function Call: WRITE	Prompt: !,"Imaging Type: ",RAITNAME,?$S(IOM<81:62,1:IOM-18),$$FMTE^XLFDT(ENDDATE),!,"Run Date: ",RARUNDAT,?$S(IOM<81:45,1:IOM-35),"Total Unverified Reports: ",^TMP($J,"RAUVR",RADIVNME,RAITNAME),! Line Location: HDR+3
Function Call: WRITE	Prompt: !!?$S(IOM<81:26,1:IOM-84),"***************************" Line Location: NEGRPT+1
Function Call: WRITE	Prompt: !?$S(IOM<81:26,1:IOM-84),"* No Unverified Reports *" Line Location: NEGRPT+2
Function Call: WRITE	Prompt: !?$S(IOM<81:26,1:IOM-84),"***************************",! Line Location: NEGRPT+3
Function Call: WRITE	Prompt: !,$J(^TMP($J,RADIVNME,RAITNAME,RARS,RAIPNAME),3)," " Line Location: PRTB+5
Function Call: WRITE	Prompt: $E(RAIPNAME,1,20) Line Location: PRTB+6
Function Call: WRITE	Prompt: ?29,$S($G(^TMP($J,RADIVNME,RAITNAME,RARS,RAIPNAME,"H",1)):$J(^(1),$L(RACUT(3))),1:$J(0,$L(RACUT(3)))),?39,$S($G(^(2)):$J(^(2),$L(RACUT(3))),1:$J(0,$L(RACUT(3)))) Line Location: PRTB+7
Function Call: WRITE	Prompt: ?49,$S($G(^(3)):$J(^(3),$L(RACUT(3))),1:$J(0,$L(RACUT(3)))),?59,$S($G(^(4)):$J(^(4),$L(RACUT(3))+2),1:$J(0,$L(RACUT(3))+2)) Line Location: PRTB+8
Function Call: WRITE	Prompt: ! Line Location: PRTD+16
Function Call: WRITE	Prompt: !,"Transcrip: ",X,?27,"ID: ",$P(^TMP($J,"RA0",RA3),U),?47 Line Location: PRTD+19
Function Call: WRITE	Prompt: $S(X="D":"DRAFT",X="PD":"PROB/DRAFT",X="R":"RELEASE",X="V":"VERIFIED",1:"") Line Location: PRTD+20
Function Call: WRITE	Prompt: ?58,"Pre-ver: ",$P(^(RA3),U,3) Line Location: PRTD+21
Function Call: WRITE	Prompt: !,"Exam Date: ",$P(^TMP($J,"RA0",RA3),U,4),?31,"Order Date Desired: ",$P(^(RA3),U,5) Line Location: PRTD+22
Function Call: WRITE	Prompt: ! Condition for execution: IOM<81 Line Location: PRTD+23
Function Call: WRITE	Prompt: ?$S(IOM<81:0,1:IOM-66),"Proc: ",$E($P($G(^RAMIS(71,$P(^(RA3),U,6),0)),U),1,60) Line Location: PRTD+23
Function Call: WRITE	Prompt: !,"Hours (age of report)",?29,$J(RACUT(1),$L(RACUT(3))),?39,$J(RACUT(2),$L(RACUT(3))),?49,$J(RACUT(3),$L(RACUT(3))),?59,">",$J(RACUT(3),$L(RACUT(3))+1) Line Location: HOURAGE+0
Function Call: WRITE	Prompt: !?29,$E(RADASH,1,$L(RACUT(3))),?39,$E(RADASH,1,$L(RACUT(3))),?49,$E(RADASH,1,$L(RACUT(3))),?59,$E(RADASH,1,$L(RACUT(3))+2) Line Location: HOURAGE+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^RADPT - [#70]	PRTD+6
^RAMIS(71 - [#71]	PRTD+23
^RAO(75.1 - [#75.1]	PRTD+13
^RARPT - [#74]	PRTD+6
^TMP($J	PRINT+4, PRINT+11, PRINT+13, HDR+3, PRTB+5, PRTB+7, PRTD!, PRTD+1, PRTD+3, PRTD+9* , PRTD+16, PRTD+19, PRTD+22, APPEND

Label References

Name	Line Occurrences
APPEND	PRTD+10, PRTD+12, PRTD+13, PRTD+14
HDR	PRINT+2, PRINT+8, PRTB, PRTD+17
HOURAGE	PRINT+10, PRTB+3
NEGRPT	PRINT+4
PRTB	PRINT+15
PRTD	PRINT+16
SETX	PRTD+10, PRTD+13, PRTD+18

Naked Globals

Name	Field # of Occurrence
^(	PRTD+3, PRTD+20, PRTD+21, PRTD+22, PRTD+23, APPEND*
^(1	PRTB+7
^(2	PRTB+7
^(3	PRTB+8
^(4	PRTB+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> BEGDATE	HDR+2
>> DFN	PRTD+8*
>> ENDDATE	HDR+3
IOF	HDR+1
IOM	HDR+1, HDR+2, HDR+3, NEGRPT+1, NEGRPT+2, NEGRPT+3, PRTD+23
IOSL	PRINT+8, PRTB, PRTD+17
RA1	PRTB+4, PRTD~, PRTD+6, PRTD+7, PRTD+9, PRTD+10, PRTD+11, PRTD+12
RA2	PRTD~, PRTD+6*, PRTD+13, PRTD+14, PRTD+24
RA3	PRTD~, PRTD+7, PRTD+9, PRTD+16, PRTD+18, PRTD+19, PRTD+20, PRTD+21, PRTD+22, PRTD+23 , APPEND
RA4	PRTD~, SETX+1*, SETX+3
>> RABD	PRINT+10, PRINT+16, HDR+1, PRTB+2, PRTB+3
RACNI	PRTD~, PRTD+5*, PRTD+6
>> RACNT	PRINT+5, PRINT+21
>> RACNT(0	PRINT+1*, PRINT+5, PRINT+21
>> RACUT(1	HOURAGE
>> RACUT(2	HOURAGE
>> RACUT(3	PRTB+4, PRTB+7, PRTB+8, HOURAGE, HOURAGE+1
>> RADASH	HOURAGE+1
RADFN	PRTD~, PRTD+5*, PRTD+6, PRTD+8
>> RADIVNME	PRINT+4, PRINT+11, PRINT+13, HDR+2, HDR+3, PRTB+5, PRTB+7, PRTD+1, PRTD+3
RADTI	PRTD~, PRTD+5*, PRTD+6
>> RAEQUAL	PRTB+2
>> RAFL	PRINT+12*
>> RAIPNAME	PRINT+12, PRINT+13, PRTB+5, PRTB+6, PRTB+7, PRTD+1, PRTD+3
>> RAITNAME	PRINT+4, PRINT+11, PRINT+13, HDR+3, PRTB+5, PRTB+7, PRTD+1, PRTD+3
>> RAOUT	PRINT+3, PRINT+5, PRINT+7, PRINT+8, PRINT+13, PRINT+14, PRINT+16, PRINT+21, PRTB, PRTB+1* , PRTD+3, PRTD+4, PRTD+16, PRTD+17
>> RAPAGE	HDR+1*
RARPT	PRTD~, PRTD+2, PRTD+3, PRTD+6
>> RARS	PRINT+7*, PRINT+9, PRINT+13, PRTB+5, PRTB+7, PRTD+1, PRTD+3
>> RARUNDAT	HDR+3
>> RASTRING	PRINT+9*, PRINT+11
U	PRINT+11, PRTD+5, PRTD+7, PRTD+9, PRTD+10, PRTD+11, PRTD+12, PRTD+13, PRTD+14, PRTD+19 , PRTD+20, PRTD+21, PRTD+22, PRTD+23, APPEND
VADM	PRTD+10!
VADM(1	PRTD+9
>> X	PRTD+3, PRTD+5, PRTD+10, PRTD+11, PRTD+12, PRTD+13, PRTD+14, PRTD+18, PRTD+19, PRTD+20 , SETX, SETX+1, SETX+2, SETX+3*, APPEND
>> Y(0	PRTD+24*
>> ZTQUEUED	PRINT+3, PRINT+14, PRTB+1, PRTD+4
>> ZTSTOP	PRINT+3, PRINT+14, PRTB+1, PRTD+4

Customize PDF page

Package: Radiology Nuclear Medicine

Routine: RARTUVR2

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: