Routine: RA45PST2

Package	Total	Call Graph
Radiology Nuclear Medicine	2	MAILQ2^RA45PST PROC^RAO7MFN
Kernel	1	$$S^%ZTLOAD
VA Fileman	1	UPDATE^DIE

Entry Points

Name	Comments	DBIA/ICR reference
ENQ2	;The second process must be tasked off that will identify all the
SUB()	;return the next available subscript (arithmetic progression)
FILECM(RAIEN,RACM,RAI)	;Files contrast medium into the CONTRAST MEDIA (#125)
STOP	;inform the user that the task has been stopped
SETMP(SUB,NME,CPT,CMU,MSG,FMT)	;set the ^TMP("RA PROC UPDATE 45",$J) global
VERSION	;;5.0;Radiology/Nuclear Medicine;45;Mar 16, 1998
KILLQ2	;kill & quit

External References

Name	Field # of Occurrence
$$S^%ZTLOAD	ENQ2+37, ENQ2+70
UPDATE^DIE	FILECM+14
MAILQ2^RA45PST	ENQ2+48, ENQ2+88
PROC^RAO7MFN	ENQ2+73

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ORD(101.43 - [#101.43]	ENQ2+21, ENQ2+22, ENQ2+23, ENQ2+26
^RAMIS(71 - [#71]	ENQ2+30, ENQ2+33, ENQ2+36, ENQ2+59, ENQ2+60, ENQ2+61, ENQ2+66, ENQ2+71, ENQ2+80, FILECM+10 , FILECM+11
^TMP("RA PROC UPDATE 45"	ENQ2+48, ENQ2+58!, ENQ2+88, KILLQ2+2!, SETMP+15, STOP+1, SUB+1

Label References

Name	Line Occurrences
$$SUB	STOP+1
FILECM	ENQ2+32
KILLQ2	ENQ2+51
SETMP	ENQ2+31, ENQ2+39, ENQ2+72, ENQ2+81
STOP	ENQ2+44, ENQ2+85

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CMU	SETMP~, SETMP+9
CPT	SETMP~, SETMP+11, SETMP+12
DT	ENQ2+61
FMT	SETMP~, SETMP+11, SETMP+12, SETMP+13, SETMP+14
I	ENQ2+65, ENQ2+66, ENQ2+70!, SETMP+8~, SETMP+9*
MSG	SETMP~, SETMP+10
NME	SETMP~, SETMP+10
RACM	ENQ2+65, ENQ2+66, ENQ2+72, ENQ2+81, KILLQ2+1!, FILECM~, FILECM+10, FILECM+13
RACPT	ENQ2+38*, ENQ2+39, KILLQ2+1!
RACPTB	ENQ2+63*, ENQ2+72, ENQ2+81, KILLQ2+1!
RACT	ENQ2+20, ENQ2+37, ENQ2+58, ENQ2+70, KILLQ2+1!
RAD1	FILECM+11*, FILECM+13, FILECM+14!
RAFDA	FILECM+11!, FILECM+14!
RAFDA(	FILECM+13*
RAFDA(71	FILECM+12*
RAI	ENQ2+32*, KILLQ2+1!, FILECM~, FILECM+12
RAIEN	FILECM~, FILECM+10, FILECM+11, FILECM+12, FILECM+13
RAMIS	KILLQ2+1!
RAMIS(0	ENQ2+36, ENQ2+38, ENQ2+60, ENQ2+62, ENQ2+63
RAOI	ENQ2+26*, ENQ2+31, KILLQ2+1!
RAOI(2	ENQ2+26*, ENQ2+27, ENQ2+30, ENQ2+31, ENQ2+32, ENQ2+33, ENQ2+36, ENQ2+39
RAOICM	ENQ2+23*, ENQ2+31, ENQ2+32, ENQ2+39, KILLQ2+1!
RAOIPT	ENQ2+24*, KILLQ2+1!
RAOIRA	ENQ2+23*, ENQ2+24, KILLQ2+1!
RAPNAME	ENQ2+36, ENQ2+39, ENQ2+60, ENQ2+63*, ENQ2+72, ENQ2+73, ENQ2+81, KILLQ2+1!
RAPTY	ENQ2+62*, ENQ2+63, KILLQ2+2!
RASTAT	ENQ2+61*, ENQ2+73, KILLQ2+2!
RAX	ENQ2+20, ENQ2+21, ENQ2+22, KILLQ2+2!, SETMP+8~, SETMP+9, SETMP+13, SETMP+14
RAY	ENQ2+22, ENQ2+23, ENQ2+26, ENQ2+58, ENQ2+59, ENQ2+60, ENQ2+61, ENQ2+66, ENQ2+71, ENQ2+72 , ENQ2+73, ENQ2+80, ENQ2+81, KILLQ2+2!, SETMP+8~, SETMP+10, SETMP+11, SETMP+12, SETMP+13, SETMP+14* , SETMP+15
SUB	SETMP~, SETMP+15
U	ENQ2+23, ENQ2+24, ENQ2+26, ENQ2+31, ENQ2+36, ENQ2+38, ENQ2+60, ENQ2+62, ENQ2+63
>> ZTQUEUED	ENQ2+20
>> ZTREQ	ENQ2+20*
ZTSTOP	ENQ2+20, ENQ2+21, ENQ2+37, ENQ2+44, ENQ2+51, ENQ2+59, ENQ2+70*, ENQ2+71, ENQ2+85, KILLQ2+2!

Customize PDF page

Package: Radiology Nuclear Medicine

Routine: RA45PST2

Information

Source Information

Call Graph

Call Graph Total: 4

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: