Routine: RARTE

Call Graph Total: 15

Package	Total	Call Graph
Radiology Nuclear Medicine	13	1^RABTCH ^RACNLU ($$SSANVAL,$$USESSAN)^RAHLRU1 SET^RAPSET1 ASKBTCH^RARTE1 INSERT^RARTE2 (IN,INCRPT,LOCK,Q,Q1)^RARTE4 ES^RASIGU $$PUTTCOM2^RAUTL11 ($$LOCK,UNLOCK)^RAUTL12 EN2^RAUTL20 $$DIVLOC^RAUTL7 ($$CMEDIA,$$PTSEX)^RAUTL8
VA Fileman	2	YN^DICN $$GET1^DIQ

Package	Total	Caller Graph
Radiology Nuclear Medicine	3	RA RPTENTRY RARTE4 RARTE6

Package

Total

Caller Graph

Radiology Nuclear Medicine

RA RPTENTRY RARTE4 RARTE6

Name	Comments	DBIA/ICR reference
SS1
CMEDIA(X)	;check if contrast media is associated with the report (exam)
START
NEW
NEW1	;
DISPLAY	; Display exam specific info, edit/enter the report

External References

Name	Field # of Occurrence
YN^DICN	SS1+26
$$GET1^DIQ	RARTE+18
1^RABTCH	RARTE+22
^RACNLU	START
$$SSANVAL^RAHLRU1	DISPLAY+2
$$USESSAN^RAHLRU1	DISPLAY+5, DISPLAY+6, DISPLAY+15, DISPLAY+16, DISPLAY+28, DISPLAY+29, DISPLAY+30, DISPLAY+31
SET^RAPSET1	RARTE+8
ASKBTCH^RARTE1	RARTE+22
INSERT^RARTE2	SS1+28
IN^RARTE4	SS1+18
INCRPT^RARTE4	START+5, DISPLAY+12, SS1+16, SS1+29, NEW+4
LOCK^RARTE4	NEW1+5
Q^RARTE4	RARTE+11, START, DISPLAY+4
Q1^RARTE4	RARTE+22
ES^RASIGU	RARTE+19
$$PUTTCOM2^RAUTL11	DISPLAY+21, DISPLAY+36, DISPLAY+37
$$LOCK^RAUTL12	DISPLAY+12
UNLOCK^RAUTL12	SS1+16, SS1+29, NEW+4
EN2^RAUTL20	DISPLAY+24
$$DIVLOC^RAUTL7	RARTE+11
$$CMEDIA^RAUTL8	DISPLAY+18, DISPLAY+33
$$PTSEX^RAUTL8	SS1+7

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?3,"Note: To enter receipt of OUTSIDE INTERPRETED REPORTS,",!?3,"please use the 'Outside Report/Entry Edit' option.",! Line Location: RARTE+9
Function Call: WRITE	Prompt: ! Line Location: RARTE+19
Function Call: WRITE	Prompt: " ...no batch selected",! Line Location: RARTE+22
Function Call: WRITE	Prompt: $C(7),!!,"The STATUS for this case is CANCELLED. You may not enter a report.",!! Line Location: START+5
Function Call: WRITE	Prompt: !!?2,"Case #: ",RACNDSP," for ",RANME Line Location: DISPLAY+5
Function Call: WRITE	Prompt: !!?2,"Case #: ",RACN," for ",RANME Line Location: DISPLAY+6
Function Call: WRITE	Prompt: !?2,"Procedure: '",$E(RAPRC,1,45),"' has been deleted" Line Location: DISPLAY+7
Function Call: WRITE	Prompt: !?2,"by another user!",$C(7) Line Location: DISPLAY+8
Function Call: WRITE	Prompt: !,RAI Line Location: DISPLAY+13
Function Call: WRITE	Prompt: !?1,"Name : ",$E(RANME,1,25),?40,"Pt ID : ",RASSN Line Location: DISPLAY+14
Function Call: WRITE	Prompt: !?1,"Case No. : ",RACNDSP,?40,"Exm. St : ",$E($P($G(^RA(72,+RAST,0)),"^"),1,22),!?1,"Procedure: ",$E(RAPRC,1,45) Line Location: DISPLAY+15
Function Call: WRITE	Prompt: !?1,"Case No. : ",RACN,?18,"Exm. St: ",$E($P($G(^RA(72,+RAST,0)),"^"),1,12),?40,"Procedure : ",$E(RAPRC,1,25) Line Location: DISPLAY+16
Function Call: WRITE	Prompt: !,?1,"Case No. : ",$P(RAMEMARR(RA1),U) Line Location: DISPLAY+28
Function Call: WRITE	Prompt: !,?1,"Case No. : ",+RAMEMARR(RA1) Line Location: DISPLAY+29
Function Call: WRITE	Prompt: ?40,"Exm. St : ",$E($P($G(^RA(72,$P(RAMEMARR(RA1),"^",4),0)),"^"),1,22) Condition for execution: $P(RAMEMARR(RA1),"^",4)]"" Line Location: DISPLAY+30
Function Call: WRITE	Prompt: !?1,"Procedure: ",$E($P($G(^RAMIS(71,+$P(RAMEMARR(RA1),"^",2),0)),"^"),1,45) Line Location: DISPLAY+30
Function Call: WRITE	Prompt: ?18,"Exm. St: ",$E($P($G(^RA(72,$P(RAMEMARR(RA1),"^",4),0)),"^"),1,12) Condition for execution: $P(RAMEMARR(RA1),"^",4)]"" Line Location: DISPLAY+31
Function Call: WRITE	Prompt: ?40,"Procedure : ",$E($P($G(^RAMIS(71,+$P(RAMEMARR(RA1),"^",2),0)),"^"),1,26) Line Location: DISPLAY+31
Function Call: WRITE	Prompt: !?1,"Exam Date: ",RADATE,?40,"Technologist: " Line Location: SS1+1
Function Call: WRITE	Prompt: $E($P(^(0),"^"),1,25) Line Location: SS1+1
Function Call: WRITE	Prompt: !?1,"Req Phys : ",$E($S($D(^VA(200,+$P(Y(0),"^",14),0)):$P(^(0),"^"),1:""),1,25) Line Location: SS1+2
Function Call: WRITE	Prompt: !,RAI Line Location: SS1+14
Function Call: WRITE	Prompt: !?3,$C(7),"Report has already been ",$S(RA1="V":"verified",1:"electronically filed"),! Line Location: SS1+16
Function Call: WRITE	Prompt: !!,$C(7),"Other cases of this cancelled case ",RACNDSP,"'s print set are entered in a report already",!!,"You may NOT create a new report for this cancelled case,",!,"but you may include this cancelled case in the existing report." Line Location: SS1+24
Function Call: WRITE	Prompt: !!,"Do you want to include this cancelled case in the same report",!,"as the others in the print set ?" Line Location: SS1+25
Function Call: WRITE	Prompt: !!?10,$C(7)," This case belongs to a printset,",?68,"",!?10," and someone else is currently doing REPORT ENTRY/EDIT",?68,"" Line Location: NEW+2
Function Call: WRITE	Prompt: !?10," on another case for this same printset,",?68,"",!?10," so you may not enter a new report.",?68,"" Line Location: NEW+3
Function Call: WRITE	Prompt: !?3,"...report not entered for this exam...",!?10,"...will now initialize report entry..." Line Location: NEW1+3
Function Call: WRITE	Prompt: !," Contrast :" Line Location: CMEDIA+3

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^RA(72 - [#72]	START+2, DISPLAY+15, DISPLAY+16, DISPLAY+30, DISPLAY+31, SS1+19
^RADPT - [#70]	DISPLAY+4, SS1+1, SS1+9, SS1+10, SS1+28*, NEW+1
^RAMIS(71 - [#71]	DISPLAY+30, DISPLAY+31
^RARPT - [#74]	SS1+16, SS1+18, SS1+28
^RARPT(0	NEW1+4
^VA(200 - [#200]	RARTE+18, SS1+1, SS1+2
^XUSEC("RA MGR"	START+3
^XUSEC("RA VERIFY"	RARTE+18

Name	Line Occurrences
CMEDIA	DISPLAY+19, DISPLAY+34
DISPLAY	START+2, START+3, START+4
NEW	SS1+19, SS1+23
NEW1	NEW, NEW+1
START	START+5, DISPLAY+12, SS1+16, SS1+29, NEW+4

Name	Field # of Occurrence
^(	SS1+1
^(0	SS1+1, SS1+2, SS1+16

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	RARTE+19, RARTE+20!, SS1+26*, SS1+27, SS1+28
%W	RARTE+20!
%Y	RARTE+20!
%Y1	RARTE+20!
C	RARTE+20!
DUZ	RARTE+18, START+3
>> I	NEW1+4*
RA1	DISPLAY+23~, DISPLAY+26, DISPLAY+27, DISPLAY+28, DISPLAY+29, DISPLAY+30, DISPLAY+31, DISPLAY+33, DISPLAY+36, DISPLAY+37 , SS1+16, SS1+21, SS1+22, SS1+28
RA18EX	DISPLAY+1~, DISPLAY+21, DISPLAY+22, DISPLAY+27, DISPLAY+36, DISPLAY+37, SS1
RA2	SS1+21~, SS1+22, SS1+23, SS1+28
RA3	SS1+9~*, SS1+11, SS1+12
RABTCH	RARTE+22!
RACMDATA	DISPLAY+18, DISPLAY+19, DISPLAY+20!, DISPLAY+33, DISPLAY+34, DISPLAY+35!
>> RACN	DISPLAY+3, DISPLAY+6, DISPLAY+16, DISPLAY+21, SS1+28, NEW1+2
RACNDSP	DISPLAY+2~, DISPLAY+3*, DISPLAY+5, DISPLAY+15, SS1+24, NEW1+1, NEW1+2
>> RACNI	DISPLAY+2, DISPLAY+4, DISPLAY+12, DISPLAY+18, DISPLAY+27, SS1+1, SS1+9, SS1+10, SS1+16, SS1+28 , SS1+29, NEW+4
>> RADATE	SS1+1
>> RADFN	DISPLAY+2, DISPLAY+4, DISPLAY+11, DISPLAY+18, DISPLAY+21, DISPLAY+33, DISPLAY+36, DISPLAY+37, SS1+1, SS1+7 , SS1+9, SS1+10, SS1+28, NEW+1
RADRS	RARTE+10~
>> RADTE	NEW1+2
>> RADTI	DISPLAY+2, DISPLAY+4, DISPLAY+11, DISPLAY+18, DISPLAY+21, DISPLAY+33, DISPLAY+36, DISPLAY+37, SS1+1, SS1+9 , SS1+10, SS1+28, NEW+1
>> RAELESIG	RARTE+18, RARTE+19*, RARTE+20
>> RAI	DISPLAY+13*, SS1+14
>> RAMDV	RARTE+22, START+4
RAMEMARR	DISPLAY+23~, DISPLAY+24
RAMEMARR(	DISPLAY+27, DISPLAY+28, DISPLAY+29, DISPLAY+30, DISPLAY+31, DISPLAY+36, DISPLAY+37, SS1+22
>> RANME	DISPLAY+5, DISPLAY+6, DISPLAY+14
>> RANOSCRN	RARTE+11
RAPCOMM	SS1+9~, SS1+10*, SS1+12
>> RAPNODE	DISPLAY+11*, DISPLAY+12, SS1+16, SS1+29, NEW+4
>> RAPRC	DISPLAY+7, DISPLAY+15, DISPLAY+16
RAPRTSET	DISPLAY+23~, DISPLAY+25, SS1+19, NEW
>> RAREPORT	START*
>> RARPT	SS1+16, SS1+18, SS1+28*
>> RARPTN	SS1+28, NEW1+1, NEW1+2*
RASSAN	DISPLAY+2~*, DISPLAY+3
>> RASSN	DISPLAY+14
>> RAST	START+2, DISPLAY+15, DISPLAY+16, SS1+19
RASUBY0	RARTE+10~, START+1*, SS1+13
RAVER	START!
>> RAVW	START*
RAXIT	RARTE+10~, DISPLAY+5, DISPLAY+6, DISPLAY+12
U	DISPLAY+28, SS1+11, SS1+12
X	RARTE+11*, RARTE+20!, RARTE+22, START, CMEDIA~, CMEDIA+4
X1	RARTE+20!
X2	RARTE+20!
XQUIT	RARTE+8!
Y	CMEDIA+3~, CMEDIA+4*
Y(0	START+1, SS1+2, SS1+13*

Customize PDF page

Package: Radiology Nuclear Medicine

Routine: RARTE

Information

Source Information

Call Graph

Call Graph Total: 15

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: