Routine: RARTRPV

Call Graph Total: 15

Package	Total	Call Graph
Radiology Nuclear Medicine	12	$$STUB^RAEDCN1 SET^RAPSET1 SET^RARD DISP^RART1 Q^RARTR (EDTRPT,NOEDIT)^RARTRPV1 ^RARTVER1 (RESTORE,SAVE)^RARTVER2 ES^RASIGU UP1^RAUTL1 $$IMGTY^RAUTL12 RASET^RAUTL2
VA Fileman	2	$$GET1^DIQ ^DIR
Kernel	1	$$REPEAT^XLFSTR

Package

Total

Call Graph

$$STUB^RAEDCN1 SET^RAPSET1 SET^RARD DISP^RART1 Q^RARTR (EDTRPT,NOEDIT)^RARTRPV1 ^RARTVER1 (RESTORE,SAVE)^RARTVER2
ES^RASIGU UP1^RAUTL1 $$IMGTY^RAUTL12 RASET^RAUTL2

VA Fileman

$$GET1^DIQ ^DIR

Kernel

$$REPEAT^XLFSTR

Package	Total	Caller Graph
Radiology Nuclear Medicine	2	RA RESIDENT PRE-VERIFY RARTRPV1

Package

Total

Caller Graph

Radiology Nuclear Medicine

RA RESIDENT PRE-VERIFY RARTRPV1

External References

Name	Field # of Occurrence
$$GET1^DIQ	RARTRPV+10, VER+5
^DIR	RPTLP+2
$$STUB^RAEDCN1	SRTRPT+2
SET^RAPSET1	RARTRPV+7
SET^RARD	SELRPT+1, ASK+3
DISP^RART1	DISRPT
Q^RARTR	PRTRPT+2
EDTRPT^RARTRPV1	ASK+7
NOEDIT^RARTRPV1	ASK+11
^RARTVER1	SELRPT+1
RESTORE^RARTVER2	PRTRPT+3
SAVE^RARTVER2	PRTRPT
ES^RASIGU	RARTRPV+12
UP1^RAUTL1	ASK+8
$$IMGTY^RAUTL12	RASET+3
RASET^RAUTL2	RASET
$$REPEAT^XLFSTR	ASK

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,$C(7),"Your name must be defined in the NEW PERSON File to continue." Line Location: RARTRPV+8
Function Call: WRITE	Prompt: !!,$C(7),"You are not classified as a Rad/Nuc Med Interpreting Resident." Line Location: RARTRPV+9
Function Call: WRITE	Prompt: !!,$C(7),"You are not classified as an active Rad/Nuc Med Interpreting Resident." Line Location: RARTRPV+11
Function Call: WRITE	Prompt: !!,"You have no Unverified Reports." Line Location: SRTRPT+6
Function Call: WRITE	Prompt: !,$$REPEAT^XLFSTR("=",80) Line Location: ASK+0
Function Call: WRITE	Prompt: !?5,"Imaging Type data appears to be missing for this exam.",$C(7) Line Location: RASET+5
Function Call: WRITE	Prompt: !!,$C(7),"Another user is editing this report",$S($G(RACN)]"":" (Case # "_RACN_")",1:""),". Please try again later." Line Location: LOCK+1
Function Call: WRITE	Prompt: !!,$C(7),$$GET1^DIQ(200,+RACN("VER")_",",.01)_" verified report for "_$P(^DPT(RACN("PAT"),0),U) Line Location: VER+5
Function Call: WRITE	Prompt: !,"(Case # "_RACN("CASE")_") since you began this option." Line Location: VER+6
Function Call: WRITE	Prompt: $C(7),!!,"The STATUS for this case is CANCELLED. You may not enter a report.",!! Line Location: EDTCHK+6
Routine Call	DIR Line Location: RPTLP+2

FileNo	Call Tags
^VA(200 - [#200]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	RASET+1, VER+5
^RA(72 - [#72]	EDTCHK+2
^RADPT - [#70]	EDTCHK+1
^RAMIS(71 - [#71]	RASET+2
^RARPT - [#74]	SRTRPT+1, SRTRPT+3, GETRPT, GETRPT+1, GETRPT+4, ASK+3, LOCK, VER+1
^TMP($J	SRTRPT!, SRTRPT+4*, RPTLP+3, RPTLP+4, Q+1!, GETRPT+1, ASK+9!
^VA(200 - [#200]	RARTRPV+8, RARTRPV+9
^XUSEC("RA MGR"	EDTCHK+4

Name	Line Occurrences
ASK	ASK+4, ASK+5
DISRPT	GETRPT+2, ASK+4
EDTCHK	ASK+5
GETRPT	RPTLP+3, RPTLP+4, LOCK+1, VER+7
LOCK	GETRPT+1
PRTRPT	ASK+4
Q	RARTRPV+8, RARTRPV+9, RARTRPV+11, RARTRPV+12, SRTRPT+6, SELRPT+1, RPTLP+2
RASET	DISRPT
RPTLP	SELRPT+1
VER	GETRPT+1

Name	Field # of Occurrence
^(0	RARTRPV+8, SRTRPT+1, RASET+1, RASET+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	RARTRPV+12, Q!
%DT	Q!
%W	Q!
%X	Q+2!
%Y1	Q!
C	Q+3!
D	Q+2!
D0	Q+2!
D1	Q+2!
DA	Q!
DDER	Q+2!
DDH	Q+2!
DGO	Q!
DI	Q!
DIC	Q!
DIERR	RARTRPV+6~
DIR	RPTLP+2!
DIR("?"	RPTLP+1*
DIR("A"	RPTLP*
DIR("B"	RPTLP*
DIR(0	RPTLP*
DIRUT	RPTLP+2, Q+3!
DIWF	Q!
DIWR	Q!
DLAYGO	Q+2!
DT	RARTRPV+11
>> DTOUT	ASK+9
DUOUT	Q+3!
DUZ	RARTRPV+8, RARTRPV+9, RARTRPV+10, RARTRPV+13, EDTCHK+4
HLN	Q+3!
HLRESLT	Q+3!
HLSAN	Q+3!
I	Q!
ION	PRTRPT+1*
>> IOP	PRTRPT+1*
J	Q+3!
OREND	Q!
POP	Q!
RA	SRTRPT!, Q!
RACN	Q!, LOCK, LOCK+1!, VER+1, VER+2, VER+3, VER+4, VER+7!
RACN("CASE"	VER+2*, VER+6
RACN("PAT"	VER+3*, VER+5
RACN("VER"	VER+4*, VER+5
RACNI	Q!, EDTCHK+1
RACS	Q!
RACT	Q!, ASK+8
RAD	RARTRPV+13*, SRTRPT+1, Q!
RADATE	Q!
RADFLDS	Q+3!
RADFN	Q!, RASET+1, RASET+3, EDTCHK+1
RADIV	Q!
RADTE	Q!
RADTI	Q!, RASET+3, EDTCHK+1
RADUP	Q!
RADUZ	Q!
RAERR	Q!
RAFLG	Q!
RAIMGTYJ	Q!, GETRPT+3, DISRPT, RASET+3, RASET+4
RAINACT	RARTRPV+10*, RARTRPV+11!, RARTRPV+12!
RAJ1	Q!
>> RAMDV	EDTCHK+5
>> RAMES	PRTRPT+2*
>> RAMLC	PRTRPT+1
RANM	Q!
RANME	Q!, RASET+1*
RANUM	Q!
RAONLINE	RARTRPV+12*, Q!
RAOR	Q!
RAOUT	SELRPT+1, Q!
RAPRC	Q!, RASET+2*
RAPRIT	Q!
RAPRTSET	Q+3!
RARAD	RARTRPV+13*, SRTRPT+1, Q!
RARD	SELRPT+1!, ASK+3!
RARD("A"	SELRPT*
RARD("B"	SELRPT, ASK+2
RARD(0	SELRPT, ASK+2
RARD(1	SELRPT, ASK+1
RARD(2	SELRPT, ASK+1
RARD(3	ASK+1*
RARD(4	ASK+1*
RARD(5	ASK+2*
RARDX	RPTLP+3, Q!, ASK+3, ASK+4, ASK+5, EDTCHK+7*
RARPDT	Q!
RARPT	SRTRPT, SRTRPT+1, SRTRPT+2, SRTRPT+3, SRTRPT+4, RPTLP+3, RPTLP+4, Q!, GETRPT, GETRPT+1* , GETRPT+4, ASK+3, RASET, LOCK, VER+1
RARPTX	SRTRPT!, SELRPT+1, Q+1!
RARPTX(	GETRPT+1
RARTDT	SRTRPT+1, SRTRPT+4, RPTLP+3, Q+1!, GETRPT+1
RARTVER	Q+1!, DISRPT*!
RARTVERF	RPTLP+2*, Q+1!
RASET	Q+1!
RASIG	Q+1!
RASN	Q+1!
RASTATUS	EDTCHK+1*, EDTCHK+2!, EDTCHK+3!
RASTI	Q+1!
RATOT	SRTRPT, SRTRPT+5, SRTRPT+6, SELRPT, SELRPT+1, Q+1!
RAVER	RARTRPV+8!*, Q+1!
RAVNB	Q+1!
RAXIT	Q+1!
RAXX	Q+1!
RPTX	RPTLP+4, Q+1!, GETRPT+1
U	SRTRPT+1, GETRPT+1, VER+2, VER+3, VER+4, VER+5
X	SELRPT+1*, Q+1!, ASK+3
X1	Q+3!
XQUIT	RARTRPV+7!
Y	RPTLP+2, Q+1!, DISRPT, RASET*, RASET+1
Y(0	RASET+1*, RASET+2

Customize PDF page

Package: Radiology Nuclear Medicine

Routine: RARTRPV

Information

Source Information

Call Graph

Call Graph Total: 15

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
RASET
PRTRPT
SELRPT
LOCK
GETRPT
RPTLP
Q
EDTCHK	; is user permitted to edit report
DISRPT
SRTRPT
ASK
VER	; report was verified since tmp global was built