Routine: MAGDRPC3

Package	Total	Call Graph
Imaging	4	LOOKUP^MAGDRPCA CHK^MAGGSQI ENTRY^MAGLOG $$ISIHS^MAGSPID
CPT HCPCS Codes	1	$$CPT^ICPTCOD
Kernel	1	($$FMADD,$$NOW)^XLFDT
MailMan	1	SENDMSG^XMXAPI
Radiology Nuclear Medicine	1	($$ACCFIND,$$ACCRPT)^RAAPI
Registration	1	$$SITE^VASITE
VA FileMan	1	$$GET1^DIQ

Package	Total	Caller Graph
Imaging	3	MAG DICOM LOOKUP RAD STUDY MAG DICOM QUEUE IMAGE MAGBRTUT

Name	Comments	DBIA/ICR reference
RADLKUP(OUT,CASENUMB,STUDYDAT)	; RPC = MAG DICOM LOOKUP RAD STUDY ; Radiology patient/study lookup ; STUDYDAT is a vestigial input parameter, it is not used
QUEUE(OUT,IMAGE,APPNAM,LOCATION,ACCNUM,REASON,EMAIL,PRIOR,JBTOHD)	; RPC = MAG DICOM QUEUE IMAGE ; Add the DICOM study send image request to the queue
ENQUEUE(IMAGE,D0,PRIOR)	; Add an image to the DICOM send image request queue sub-file
FIND(DATE,CASE,NUM)	; ADC x-reference (Radiology patient file)
MMDDYY(DAY)	; YYYMMDD --> MMDDYY

Name	Field # of Occurrence
$$GET1^DIQ	RADLKUP+49, RADLKUP+79
$$CPT^ICPTCOD	RADLKUP+57
LOOKUP^MAGDRPCA	QUEUE+28
CHK^MAGGSQI	ENQUEUE+3
ENTRY^MAGLOG	QUEUE+59
$$ISIHS^MAGSPID	RADLKUP+79
$$ACCFIND^RAAPI	RADLKUP+23
$$ACCRPT^RAAPI	RADLKUP+47
$$SITE^VASITE	RADLKUP+79
$$FMADD^XLFDT	FIND+3
$$NOW^XLFDT	QUEUE+39
SENDMSG^XMXAPI	QUEUE+70

RPC Name	Call Tags
MAG DICOM LOOKUP RAD STUDY	RADLKUP
MAG DICOM QUEUE IMAGE	QUEUE

FileNo	Call Tags
^DIC(4 - [#4]	GET1^DIQ
^RA(72 - [#72]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^MAG(2005 - [#2005]	QUEUE+11, QUEUE+18, QUEUE+19, QUEUE+53, QUEUE+54
^MAGDOUTP(2006.574 - [#2006.574]	QUEUE+17, QUEUE+20, QUEUE+21, QUEUE+22, QUEUE+32, QUEUE+34, QUEUE+37, QUEUE+40, QUEUE+41, QUEUE+42 , QUEUE+43, QUEUE+45, ENQUEUE+10, ENQUEUE+11, ENQUEUE+15, ENQUEUE+16, ENQUEUE+18, ENQUEUE+20, ENQUEUE+21, ENQUEUE+22 , ENQUEUE+23
^RADPT - [#70]	RADLKUP+33, RADLKUP+36, RADLKUP+38, RADLKUP+41, RADLKUP+44, RADLKUP+46, RADLKUP+77, RADLKUP+81
^RADPT("ADC"	FIND+4
^RAMIS(71 - [#71]	RADLKUP+55, RADLKUP+71, RADLKUP+72
^RAMIS(73.1 - [#73.1]	RADLKUP+73
^RAO(75.1 - [#75.1]	RADLKUP+82
^TMP("XMERR"	QUEUE+72

Name	Line Occurrences
$$ENQUEUE	QUEUE+50, QUEUE+54
$$MMDDYY	FIND+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACCNUM	RADLKUP+3~, RADLKUP+47, RADLKUP+83, QUEUE~, QUEUE+26, QUEUE+30, QUEUE+40
APPNAM	QUEUE~, QUEUE+6, QUEUE+22, QUEUE+40, QUEUE+58, QUEUE+69
CASE	FIND~, FIND+4
CASENUMB	RADLKUP~, RADLKUP+21, RADLKUP+23
COUNT	QUEUE+2~, QUEUE+48, QUEUE+50, QUEUE+54*, QUEUE+59
CPTCODE	RADLKUP+4~, RADLKUP+50, RADLKUP+56, RADLKUP+57, RADLKUP+63
CPTNAME	RADLKUP+5~, RADLKUP+50, RADLKUP+57, RADLKUP+58*, RADLKUP+64
D0	QUEUE+2~, QUEUE+20, QUEUE+21, QUEUE+22, QUEUE+23, QUEUE+25, QUEUE+34*, QUEUE+35, QUEUE+40, QUEUE+41 , QUEUE+42, QUEUE+43, QUEUE+50, QUEUE+54, ENQUEUE~, ENQUEUE+10, ENQUEUE+11, ENQUEUE+16, ENQUEUE+18, ENQUEUE+20 , ENQUEUE+21, ENQUEUE+22
D1	RADLKUP+16~, RADLKUP+71, RADLKUP+72, QUEUE+2~, QUEUE+53, QUEUE+54, ENQUEUE+2~, ENQUEUE+10, ENQUEUE+11, ENQUEUE+18 , ENQUEUE+21, ENQUEUE+22
DATE	FIND~, FIND+2, FIND+3
DATETIME	RADLKUP+6~, RADLKUP+41*, RADLKUP+68
DAY	MMDDYY~, MMDDYY+1, MMDDYY+2
DFN	RADLKUP+36, RADLKUP+67, RADLKUP+81, QUEUE+2~, QUEUE+12, QUEUE+59
DIVISION	RADLKUP+7~, RADLKUP+78*, RADLKUP+79
DUZ	QUEUE+59, QUEUE+66
EMAIL	QUEUE~, QUEUE+68
EXAMSTS	RADLKUP+8~, RADLKUP+48, RADLKUP+49, RADLKUP+66
I	RADLKUP+16~, ENQUEUE+2~, ENQUEUE+6*
IMAGE	QUEUE~, QUEUE+5, QUEUE+11, QUEUE+18, QUEUE+50, QUEUE+53, QUEUE+54, QUEUE+59, ENQUEUE~, ENQUEUE+1 , ENQUEUE+3, ENQUEUE+5, ENQUEUE+11, ENQUEUE+21
JBTOHD	QUEUE~, QUEUE+9*, QUEUE+40
LIST	RADLKUP+16~
LOCATION	QUEUE~, QUEUE+7, QUEUE+21, QUEUE+40, ENQUEUE+22
LOG	QUEUE+2~, QUEUE+58*, QUEUE+59, QUEUE+63
NUM	FIND~, FIND+3
OK	QUEUE+2~, QUEUE+20, QUEUE+23, QUEUE+25
OLD	ENQUEUE+2~, ENQUEUE+10, ENQUEUE+11, ENQUEUE+13
OUT	RADLKUP~, RADLKUP+19!, QUEUE~, QUEUE+4!, QUEUE+5, QUEUE+6, QUEUE+7, QUEUE+14, QUEUE+26, QUEUE+29* , QUEUE+46, QUEUE+74, ENQUEUE+19
OUT(1	RADLKUP+21, RADLKUP+25, RADLKUP+29, RADLKUP+30, RADLKUP+31, RADLKUP+33, RADLKUP+38, RADLKUP+44, RADLKUP+53, RADLKUP+84
OUT(10	RADLKUP+67*
OUT(11	RADLKUP+68*
OUT(12	RADLKUP+69*
OUT(13	RADLKUP+76*
OUT(14	RADLKUP+79*
OUT(15	RADLKUP+82*
OUT(16	RADLKUP+83*
OUT(2	RADLKUP+59*
OUT(3	RADLKUP+60*
OUT(4	RADLKUP+61*
OUT(5	RADLKUP+62*
OUT(6	RADLKUP+63*
OUT(7	RADLKUP+64*
OUT(8	RADLKUP+65*
OUT(9	RADLKUP+66*
P	QUEUE+2~, QUEUE+18*, QUEUE+19, QUEUE+28, QUEUE+40
PRIOR	QUEUE~, QUEUE+8*, QUEUE+21, QUEUE+40, QUEUE+50, QUEUE+54, ENQUEUE~, ENQUEUE+22
PROBLEM	QUEUE+2~, QUEUE+48, QUEUE+60, ENQUEUE+4, ENQUEUE+5, ENQUEUE+6
PROBLEM(	ENQUEUE+4, ENQUEUE+5, ENQUEUE+6*
PROBLEM(1	QUEUE+62*
PROBLEM(2	QUEUE+63*
PROBLEM(3	QUEUE+64*
PROCDESC	RADLKUP+9~, RADLKUP+50, RADLKUP+56, RADLKUP+58, RADLKUP+69
PROCIEN	RADLKUP+10~, RADLKUP+48*, RADLKUP+53, RADLKUP+55, RADLKUP+62, RADLKUP+71, RADLKUP+72
RAA	RADLKUP+11~, RADLKUP+23, RADLKUP+47
RAA(1	RADLKUP+27, RADLKUP+47
RADPT1	RADLKUP+13~, RADLKUP+27*, RADLKUP+29, RADLKUP+33, RADLKUP+36, RADLKUP+38, RADLKUP+41, RADLKUP+44, RADLKUP+46, RADLKUP+59 , RADLKUP+77
RADPT2	RADLKUP+14~, RADLKUP+27*, RADLKUP+30, RADLKUP+38, RADLKUP+41, RADLKUP+44, RADLKUP+46, RADLKUP+60, RADLKUP+77, RADLKUP+81
RADPT3	RADLKUP+15~, RADLKUP+27*, RADLKUP+31, RADLKUP+44, RADLKUP+46, RADLKUP+61, RADLKUP+81
RAIX	RADLKUP+12~
REASON	QUEUE~, QUEUE+58, QUEUE+59
REQUESTDATETIME	QUEUE+2~, QUEUE+39*, QUEUE+40, QUEUE+41
RESULT	QUEUE+27~, QUEUE+28, QUEUE+29, QUEUE+30
STUDYDAT	RADLKUP~
STUID	QUEUE+2~, QUEUE+19*, QUEUE+20, QUEUE+42, QUEUE+43
TYPE	QUEUE+2~, QUEUE+12*, QUEUE+13, QUEUE+14, QUEUE+49, QUEUE+52
X	RADLKUP+16~, RADLKUP+23, RADLKUP+25, RADLKUP+46, RADLKUP+47, RADLKUP+48, RADLKUP+70, RADLKUP+74, RADLKUP+76, RADLKUP+77* , RADLKUP+78, RADLKUP+81, RADLKUP+82, QUEUE+2~, QUEUE+11, QUEUE+12, QUEUE+32, QUEUE+33, QUEUE+35, QUEUE+36 , QUEUE+37, ENQUEUE+2~, ENQUEUE+3, ENQUEUE+16, ENQUEUE+17, ENQUEUE+18, ENQUEUE+19, ENQUEUE+20, FIND+1~, FIND+3* , FIND+4
X(	ENQUEUE+6
X(0	ENQUEUE+3
XMERR	QUEUE+61~, QUEUE+71, QUEUE+72*
XMID	QUEUE+61~, QUEUE+66*, QUEUE+67, QUEUE+70
XMSUB	QUEUE+61~, QUEUE+69*, QUEUE+70
XMY	QUEUE+61~, QUEUE+70
XMY(	QUEUE+67, QUEUE+68
XMZ	QUEUE+61~, QUEUE+70
Z	RADLKUP+16~, RADLKUP+47, RADLKUP+55, RADLKUP+56, RADLKUP+65, RADLKUP+72, RADLKUP+73, RADLKUP+74

Customize PDF page

Package: Imaging

Routine: MAGDRPC3

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 3

Entry Points

External References

Used in RPC

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: