Routine: MAGDRPCB

Package	Total	Call Graph
VA FileMan	3	LIST^DIC (FILE,UPDATE)^DIE ($$GET1,GETS)^DIQ
Kernel	2	$$DT^XLFDT $$UP^XLFSTR
Radiology Nuclear Medicine	2	ACCFIND^RAAPI $$RAPTREG^RAMAGU04
CPT HCPCS Codes	1	$$MOD^ICPTMOD

Package	Total	Caller Graph
Imaging	11	MAG DICOM ADD CAMERA EQUIP RM MAG DICOM GET HOSP LOCATION MAG DICOM GET RAD CAMERA MAG DICOM GET RAD CPT MOD MAG DICOM GET RAD DX CODE MAG DICOM GET RAD FILM MAG DICOM GET RAD ORDERS MAG DICOM GET RAD PERSON MAG DICOM GET USERNAME MAG DICOM SET IMAGING LOCATION MAGVIM05

Name	Comments	DBIA/ICR reference
FILM(RESULTS,FILM)	; RPC = MAG DICOM GET RAD FILM
DXCODE(RESULTS,DXCODE)	; RPC = MAG DICOM GET RAD DIAGNOSTIC CODE
CAMERA(RESULTS,CAMERA)	; RPC = MAG DICOM GET RAD CAMERA
CPTMOD(RESULTS,CPTMOD,MAGDT)	; RPC = MAG DICOM GET RAD CPT MOD ; CPTMOD = partial CPT modifier match
LOOKUP(RESULTS,SRCHVAL,FILE,XREF,FIELDS,SCREEN,MAX)	; search file
RADLST(RESULTS,MAGRADCLASS,NAME)	;
SCRUSR(IEN)	;
GETLOC(RESULTS,LOCATION)	; RPC = MAG DICOM GET HOSP LOCATION
USERNAME(RESULT)	; RPC = MAG DICOM GET USERNAME
ORDERS(ARRAY,DFN)	; RPC = MAG DICOM GET RAD ORDERS ; look up radiology orders
ORDERERR(ARRAY,MSG,ERRNUMB)	; handle FilMan errors in ORDER subroutine
IMAGELOC(RESULT,RAOIEN,RAMLC)	; RPC = MAG DICOM SET IMAGING LOCATION
ADDROOM(RETURN,RAEXAM)	; RPC = MAG DICOM ADD CAMERA EQUIP RM

Name	Field # of Occurrence
LIST^DIC	LOOKUP+10, RADLST+16, ORDERS+67, ADDROOM+14
FILE^DIE	IMAGELOC+24
UPDATE^DIE	ADDROOM+23
$$GET1^DIQ	SCRUSR+3, USERNAME+1, ORDERS+23, ORDERS+36, ORDERS+51, ORDERS+58, IMAGELOC+14, IMAGELOC+18, IMAGELOC+22, ADDROOM+8 , ADDROOM+10
GETS^DIQ	ORDERS+49
$$MOD^ICPTMOD	CPTMOD+7
ACCFIND^RAAPI	ORDERS+46
$$RAPTREG^RAMAGU04	ORDERS+13
$$DT^XLFDT	CPTMOD+3, RADLST+3, ORDERS+6
$$UP^XLFSTR	LOOKUP+4, RADLST+11

RPC Name	Call Tags
MAG DICOM ADD CAMERA EQUIP RM	ADDROOM
MAG DICOM GET HOSP LOCATION	GETLOC
MAG DICOM GET RAD CAMERA	CAMERA
MAG DICOM GET RAD CPT MOD	CPTMOD
MAG DICOM GET RAD DX CODE	DXCODE
MAG DICOM GET RAD FILM	FILM
MAG DICOM GET RAD ORDERS	ORDERS
MAG DICOM GET RAD PERSON	RADLST
MAG DICOM GET USERNAME	USERNAME
MAG DICOM SET IMAGING LOCATION	IMAGELOC

FileNo	Call Tags
^VA(200 - [#200]	GET1^DIQ, LIST^DIC
70.02	GET1^DIQ
70.03	GETS^DIQ
^RAO(75.1 - [#75.1]	GET1^DIQ
75.1125	LIST^DIC
^RA(79.1 - [#79.1]	GET1^DIQ
79.12	LIST^DIC

Name	Line Occurrences (* Changed, ! Killed)
^RADPT("AO"	ORDERS+37, ORDERS+38, ORDERS+39, ORDERS+40
^RAMIS(71 - [#71]	ORDERS+29, ORDERS+30
^RAO(75.1 - [#75.1]	ORDERS+22, ORDERS+25
^TMP(	LOOKUP+6, RADLST+4, ORDERS+43, ORDERS+65
^VA(200 - [#200]	SCRUSR+7, SCRUSR+8

Name	Line Occurrences
LOOKUP	FILM+1, DXCODE+1, CAMERA+1, CPTMOD+5, GETLOC+2
ORDERERR	ORDERS+50, ORDERS+68, ADDROOM+15, ADDROOM+24

Name	Field # of Occurrence
^("I"	ORDERS+74

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACNUMB	ORDERS+2~, ORDERS+52, ORDERS+53, ORDERS+55, ORDERS+57
ARRAY	ORDERS~, ORDERS+5!, ORDERS+50, ORDERS+68, ORDERERR~, ORDERERR+2!
ARRAY(	ORDERS+78, ORDERERR+5, ORDERERR+6*
ARRAY(1	ORDERS+8, ORDERS+14, ORDERS+21, ORDERS+78, ORDERERR+8*
ARRAY(2	ORDERS+15*
CAMERA	CAMERA~, CAMERA+1
CASENUMB	ORDERS+2~, ORDERS+54*, ORDERS+55
CNT	LOOKUP+1~
CPTMOD	CPTMOD~, CPTMOD+5
DFN	ORDERS~, ORDERS+6*, ORDERS+7, ORDERS+8, ORDERS+13, ORDERS+14, ORDERS+22
DIERR	ORDERS+2~, IMAGELOC+1~
DT	RADLST+3*, SCRUSR+4, GETLOC+17
DUZ	USERNAME+1
DXCODE	DXCODE~, DXCODE+1
ERRNUMB	ORDERERR~, ORDERERR+8
ERROR	ORDERS+2~, ORDERS+21, ORDERS+22, ORDERS+50, ORDERS+62
EXAMDATA	ORDERS+2~, ORDERS+45*, ORDERS+52, ORDERS+54
EXAMDATE	ORDERS+2~, ORDERS+51*, ORDERS+55, ORDERS+57
FIELDS	LOOKUP~, LOOKUP+10, ORDERS+2~, ORDERS+46, ORDERS+47, ORDERS+49
FILE	LOOKUP~, LOOKUP+10
FILM	FILM~, FILM+1
HIT	ADDROOM+1~, ADDROOM+16, ADDROOM+17, ADDROOM+19
I	CPTMOD+2~, CPTMOD+6, CPTMOD+7, LOOKUP+1~, LOOKUP+19, LOOKUP+20, LOOKUP+22, RADLST+1~, RADLST+25, RADLST+26* , RADLST+28, GETLOC+1~, GETLOC+5, GETLOC+6, GETLOC+7, GETLOC+16, GETLOC+20, ORDERS+2~, ORDERS+71, ORDERS+73 , ORDERERR+1~, ORDERERR+3, ORDERERR+5, ORDERERR+6, ADDROOM+1~, ADDROOM+16, ADDROOM+17
IEN	SCRUSR~, SCRUSR+3, SCRUSR+7, SCRUSR+8
IEN1	SCRUSR+1~, SCRUSR+6, SCRUSR+7, SCRUSR+8
IENS	ORDERS+2~, ORDERS+44, ORDERS+45, ORDERS+49, ADDROOM+1~, ADDROOM+7, ADDROOM+8
IMAGLOCN	ORDERS+2~, ORDERS+58*, ORDERS+59
INACTDAT	ORDERS+2~, ORDERS+30*, ORDERS+31
INACTIVE	GETLOC+1~, GETLOC+16*, GETLOC+17
LIST	GETLOC+1~, GETLOC+2
LIST(	GETLOC+7, GETLOC+16, GETLOC+20
LIST(1	GETLOC+6
LOCATION	GETLOC~, GETLOC+2
LOCNAME	ADDROOM+1~, ADDROOM+10*, ADDROOM+19, ADDROOM+25
MAGDT	CPTMOD~, CPTMOD+3*
MAGEXAM	ORDERS+3~
MAGFDA	IMAGELOC+1~, ADDROOM+1~
MAGFDA(	IMAGELOC+23, ADDROOM+22
MAGMSG	LOOKUP+1~, RADLST+1~, SCRUSR+1~, ORDERS+3~, ORDERS+48!, ORDERS+50, ORDERS+66!, ORDERS+68, IMAGELOC+1~, IMAGELOC+25 , ADDROOM+1~, ADDROOM+15, ADDROOM+24
MAGRADCLASS	RADLST~, RADLST+8, SCRUSR+8
MAGTMP	LOOKUP+1~, LOOKUP+6, LOOKUP+7, LOOKUP+10, LOOKUP+11, LOOKUP+20, LOOKUP+22, LOOKUP+26, RADLST+1~, RADLST+4 , RADLST+5, RADLST+16, RADLST+17, RADLST+26, RADLST+28, RADLST+32
MAGTMPEXAM	ORDERS+3~, ORDERS+43*, ORDERS+45, ORDERS+48, ORDERS+49, ORDERS+80
MAGTMPMOD	ORDERS+3~, ORDERS+65*, ORDERS+66, ORDERS+67, ORDERS+80
MAX	LOOKUP~, LOOKUP+3
MAXNR	LOOKUP+1~, LOOKUP+2, LOOKUP+3, LOOKUP+10, LOOKUP+14, RADLST+1~, RADLST+2*, RADLST+16, RADLST+20
MODCOUNT	ORDERS+3~, ORDERS+69*, ORDERS+71
MODDATA	ORDERS+3~, ORDERS+65*, ORDERS+69, ORDERS+73, ORDERS+74
MODIEN	ORDERS+4~, ORDERS+73*, ORDERS+74
MODIFIER	ORDERS+4~, ORDERS+70, ORDERS+72, ORDERS+74*, ORDERS+76
MSG	ORDERS+4~, ORDERERR~
NAME	RADLST~, RADLST+11, RADLST+12, RADLST+16
NODE	ORDERERR+1~, ORDERERR+3, ORDERERR+4, ORDERERR+5, ORDERERR+6
OK	SCRUSR+1~, SCRUSR+6, SCRUSR+7, SCRUSR+8, SCRUSR+10
ORDER	ORDERS+3~, ORDERS+26!, ORDERS+27, ORDERS+32, ORDERS+34, ORDERS+35, ORDERS+36, ORDERS+41, ORDERS+42, ORDERS+57* , ORDERS+59, ORDERS+76, ORDERS+78
OUTSIDESTUDY	ADDROOM+1~, ADDROOM+13*, ADDROOM+17, ADDROOM+19, ADDROOM+22, ADDROOM+25
PROCIEN	ORDERS+4~, ORDERS+28*, ORDERS+29, ORDERS+30, ORDERS+32
RACNI	ORDERS+4~, ORDERS+40*, ORDERS+42, ORDERS+44
RADFN	ORDERS+4~, ORDERS+38*, ORDERS+39, ORDERS+40, ORDERS+44, ORDERS+51, ORDERS+58
RADIMGLOC	ADDROOM+1~, ADDROOM+8*, ADDROOM+9, ADDROOM+10, ADDROOM+14, ADDROOM+22
RADTI	ORDERS+4~, ORDERS+39*, ORDERS+40, ORDERS+41, ORDERS+44, ORDERS+51, ORDERS+58
RAEXAM	ADDROOM~, ADDROOM+4, ADDROOM+7, ADDROOM+9
RAMLC	IMAGELOC~, IMAGELOC+9*, IMAGELOC+10, IMAGELOC+11, IMAGELOC+18, IMAGELOC+19, IMAGELOC+23
RAOIEN	ORDERS+4~, ORDERS+21, ORDERS+22, ORDERS+23, ORDERS+25, ORDERS+27, ORDERS+36, ORDERS+37, ORDERS+38, ORDERS+39 , ORDERS+40, ORDERS+67, IMAGELOC~, IMAGELOC+4*, IMAGELOC+5, IMAGELOC+6, IMAGELOC+14, IMAGELOC+15, IMAGELOC+22, IMAGELOC+23 , IMAGELOC+26, IMAGELOC+29
RC	ORDERS+4~, ORDERS+13*, ORDERS+15
REACTIVE	GETLOC+1~, GETLOC+16*, GETLOC+17
RESULT	USERNAME~, USERNAME+1, IMAGELOC~, IMAGELOC+3!, IMAGELOC+6, IMAGELOC+11, IMAGELOC+15, IMAGELOC+19, IMAGELOC+25, IMAGELOC+26* , IMAGELOC+29*
RESULTS	FILM~, FILM+1, DXCODE~, DXCODE+1, CAMERA~, CAMERA+1, CPTMOD~, CPTMOD+5, LOOKUP~, LOOKUP+7! , RADLST~, RADLST+5!, GETLOC~, GETLOC+3!
RESULTS(	CPTMOD+7, LOOKUP+22, RADLST+28, GETLOC+20
RESULTS(1	CPTMOD+6, LOOKUP+12, LOOKUP+14, LOOKUP+15, LOOKUP+19, LOOKUP+21, LOOKUP+22, RADLST+9, RADLST+18, RADLST+20 , RADLST+21, RADLST+25, RADLST+27, RADLST+28, GETLOC+5, GETLOC+19*
RETURN	ADDROOM~, ADDROOM+2!, ADDROOM+15, ADDROOM+24
RETURN(0	ADDROOM+4, ADDROOM+9, ADDROOM+19, ADDROOM+25
ROOMS	ADDROOM+1~
ROOMS("DILIST"	ADDROOM+16, ADDROOM+17
SCR	CPTMOD+2~, CPTMOD+4*, CPTMOD+5
SCREEN	LOOKUP~, LOOKUP+10
SRCHVAL	LOOKUP~, LOOKUP+4, LOOKUP+5, LOOKUP+10
STATUS	ORDERS+4~, ORDERS+23*, ORDERS+24, ORDERS+34
STUDYDAT	ORDERS+4~
TERMDT	SCRUSR+1~, SCRUSR+3*, SCRUSR+4
TODAY	ORDERS+4~, ORDERS+6*, ORDERS+31
TYPE	GETLOC+1~, GETLOC+7*, GETLOC+13
U	LOOKUP+13, RADLST+19, SCRUSR+8, ORDERS+30
X	LOOKUP+1~, LOOKUP+11, LOOKUP+12, LOOKUP+13, RADLST+1~, RADLST+15, RADLST+16, RADLST+17*, RADLST+18, RADLST+19 , ORDERS+4~
XREF	LOOKUP~, LOOKUP+10
Z	ORDERS+4~, ORDERS+25*, ORDERS+28, ORDERS+35

Customize PDF page

Package: Imaging

Routine: MAGDRPCB

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 11

Entry Points

External References

Used in RPC

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items

Name	Field # of Occurrence
$T(	LOOKUP+6, RADLST+4, RADLST+15, ORDERS+43, ORDERS+65
$T(ACCFIND^RAAPI	ORDERS+46