Routine: RARIC

Information

RARIC ;HISC/FPT,GJC AISC/SAW-Radiologic Image Capture and Display Routine ;08/05/08 14:35

Source Information

Source file <RARIC.m>

Call Graph

Call Graph Total: 5

Package	Total	Call Graph
Radiology Nuclear Medicine	2	PTR^RARTE2 EN2^RAUTL20
VA Fileman	2	(FILE,UPDATE)^DIE LOCK^DILF
Kernel	1	$$NOW^XLFDT

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
Radiology Nuclear Medicine	1	RAMAGU12

Entry Points

Name	Comments	DBIA/ICR reference
DELRPT(Y)	; delete a report (RARIC). The report record should
CREATE	; >>create new stub entry in file 74<< ; -------------------------------------------------------------------- ; IA: 1178 (the value of RARPT is currently null) If no report entry is ; created, RARPT is set to null or negative (negative w/report)
XIT	;exit the CREATE subroutine ; =================================================================
NEWIEN()	; ##### ALLOCATES A NEW RECORD IN THE RAD/NUC MED REPORTS FILE ; (#74) AND LOCKS IT ; -------------------------------------------------------------------- ; Return Values ; ============= ; >0 IEN for the new record in the RAD/NUC MED REPORTS FILE (#74)
UNLOCXAM	;Unlock the EXAMINATION node locked by this process. ; --------------------------------------------------------------------
PTR	; associate images with a radiology report record ; --------------------------------------------------------------------

External References

Name	Field # of Occurrence
FILE^DIE	CREATE+120, DELRPT+6
UPDATE^DIE	CREATE+101, PTR+15
LOCK^DILF	NEWIEN+23
PTR^RARTE2	CREATE+134
EN2^RAUTL20	CREATE+74
$$NOW^XLFDT	CREATE+98

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^RA(79 - [#79]	CREATE+57
^RADPT - [#70]	CREATE+24, CREATE+28, CREATE+29, CREATE+36, UNLOCXAM+2
^RARPT - [#74]	CREATE+107, CREATE+133, XIT+3, PTR+11, PTR+20, NEWIEN+20
^RARPT(" "	NEWIEN+18

Label References

Name	Line Occurrences
$$NEWIEN	CREATE+80
DELRPT	CREATE+108, CREATE+123
UNLOCXAM	CREATE+35, CREATE+36, CREATE+44, XIT+3
XIT	CREATE+107, CREATE+123

Naked Globals

Name	Field # of Occurrence
^(	CREATE+57

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DILOCKTM	PTR+11
DT	CREATE+90
DUZ	CREATE+100
IEN	NEWIEN+14~, NEWIEN+18*, NEWIEN+20, NEWIEN+28
>> MAGGP	PTR+10, PTR+14
NEWIEN	NEWIEN+14~, NEWIEN+15, NEWIEN+17, NEWIEN+28, NEWIEN+31
NODE	NEWIEN+14~, NEWIEN+20*, NEWIEN+23, NEWIEN+26
RA1	CREATE+65~
RACESION	CREATE+56~, CREATE+59, CREATE+62, CREATE+86
>> RACN	CREATE+35, CREATE+62, CREATE+89
>> RACNI	CREATE+24, CREATE+29, CREATE+36, CREATE+118, UNLOCXAM+2
>> RADFN	CREATE+24, CREATE+28, CREATE+29, CREATE+36, CREATE+87, CREATE+118, UNLOCXAM+2
>> RADTE	CREATE+62
>> RADTI	CREATE+24, CREATE+28, CREATE+29, CREATE+36, CREATE+88, CREATE+118, UNLOCXAM+2
RAERR	CREATE+65~, CREATE+116!, DELRPT+5!, DELRPT+6!
RAERR("DIERR"	CREATE+107, CREATE+123
>> RAESIG	CREATE+99
RAFDA	CREATE+65~, CREATE+116!, PTR+13~, DELRPT+5!, DELRPT+6!
RAFDA(	CREATE+119, PTR+14
RAFDA(74	DELRPT+5*
RAFDAIEN	CREATE+65~
RAFDAIEN(1	CREATE+80*, CREATE+107, CREATE+108, CREATE+119, CREATE+123, CREATE+127, XIT+3
RAIEN	CREATE+65~, CREATE+116!, CREATE+118*, CREATE+119, PTR+13~
RAIEN(1	PTR+19
RAMDIV	CREATE+56~, CREATE+57*
RAMDV	CREATE+56~, CREATE+57*
RAMEMARR	CREATE+65~, CREATE+74
RAPRTSET	CREATE+65~, CREATE+134
RARIC	CREATE+134~*
>> RARPT	CREATE+23, CREATE+24, CREATE+43, CREATE+44, CREATE+127, CREATE+133, PTR+11, PTR+14, PTR+20
RARPTN	CREATE+133~*
RARSLT	PTR+13~
RARSLT("DIERR"	PTR+16
>> RATIMEOUT	CREATE+24
RATXT	CREATE+65~, CREATE+116!
>> RAVERF	CREATE+100
RAX	CREATE+65~, CREATE+85, CREATE+86, CREATE+87, CREATE+88, CREATE+89, CREATE+90, CREATE+97, CREATE+98, CREATE+99 , CREATE+100
RAXIT	CREATE+65~
RAY	CREATE+65~, CREATE+85*, CREATE+97
RAY2	CREATE+28~*, CREATE+57
RAY3	CREATE+28~, CREATE+29*, CREATE+35, CREATE+43, CREATE+58, CREATE+59
U	CREATE+23*, CREATE+35, CREATE+36, CREATE+43, CREATE+57, CREATE+58, CREATE+59, CREATE+133
Y	PTR+10, PTR+12, PTR+17, PTR+19, DELRPT~, DELRPT+5

Customize PDF page

Package: Radiology Nuclear Medicine

Routine: RARIC

Call Graph Total: 5

Caller Graph Total: 1