Routine: MAGDQR20

Package	Total	Call Graph
Imaging	7	(DIMGINF,GETDINUM,GETDSER,GETRSER,GETSER,RTRVDIMG,RTRVIMG,SRTMAGTI,TSTSER,WASGNSER,WRSERUID,WRTMAGM,WRTSER)^MAGDQR20 ($$GETSNUM,WRTOUT)^MAGDQR21 $$INFO^MAGGAII ($$FILE,$$ISDEL)^MAGGI11 CHK^MAGGSQI GROUP^MAGGTIG IMAGEINF^MAGGTU3
RPC Broker	1	$$RTRNFMT^XWBLIB
VA FileMan	1	$$GET1^DIQ

Package	Total	Caller Graph
Imaging	2	MAGDQR20 MAGDQR21

Entry Points

Name	Comments	DBIA/ICR reference
WRTIMG(SERIESARRAY,D0,REQDFN,STUMO,INCDEL,INCSERD)	; Retrieve Image info and output to IMAGE INFO line
RTRVIMG(TMP,D0,REQDFN,INCDEL)	; Retrieve info for either single or group image
RTRVDIMG(MAGRY,MAGIEN)	; Get Deleted images and output the info
DIMGINF(MAGRY,IEN)	; Retrieve Deleted images
WRTMAGM(TMP,STUMO)	; Save series to TMP
GETSER(D0,SERIES,SERID,INCDEL)	; Populate SERIES array for File 2005 and 2005.1
GETRSER(D0,SERIES,SERID)	; Populate SERIES array for File 2005
GETDSER(D0,SERIES,SERID)	; Populate SERIES array for File 2005.1
GETDINUM(GRPIEN,CHLDIEN,SNUM,INUM)	; Get DICOM Serial Number and Image Number for Child IEN from Audit Image
WRTSER(D0,SERIESARRAY,SERIES,SNUM,SERID,REQDFN,INCSERD)	; Output to TMP based on SERIES array ; refresh temp image index ; SERIES(UID _ DCOM SERIES NUM, DCOM IMAGE NUM, OBJECT GROUP)=""
SRTMAGTI(INUM,I0,REQDFN)	; Save IMAGE_IEN and GROUP_IEN lines ; if dup study instance UID, purge image info and bail out ; unless pt is specified and this image is for that pt
WRSERUID(UID,D0,INCSERD)	; Output SERIES_IEN line
WASGNSER(SNUM,SERIESARRAY)	; Output SERIES_NUMBER line
TSTSER(SNUM,SERIESARRAY,SERIESNUM)	; Validate SERIES NUMBER

Name	Field # of Occurrence
$$GET1^DIQ	SRTMAGTI+34, WRSERUID+15
DIMGINF^MAGDQR20	RTRVIMG+12
GETDINUM^MAGDQR20	GETDSER+8
GETDSER^MAGDQR20	GETSER+6
GETRSER^MAGDQR20	GETSER+4
GETSER^MAGDQR20	WRTIMG+12
RTRVDIMG^MAGDQR20	RTRVIMG+7
RTRVIMG^MAGDQR20	WRTIMG+9
SRTMAGTI^MAGDQR20	WRTSER+16
TSTSER^MAGDQR20	WASGNSER+3
WASGNSER^MAGDQR20	WRTSER+24
WRSERUID^MAGDQR20	WRTSER+22
WRTMAGM^MAGDQR20	WRTIMG+10
WRTSER^MAGDQR20	WRTIMG+13
$$GETSNUM^MAGDQR21	SRTMAGTI+32
WRTOUT^MAGDQR21	WRTIMG+15, WRTSER+25, WRSERUID+4, WRSERUID+5, WRSERUID+6, WRSERUID+13, WRSERUID+16, WASGNSER+8
$$INFO^MAGGAII	RTRVDIMG+15, DIMGINF+3
$$FILE^MAGGI11	RTRVIMG+2, WRTMAGM+11, WRTMAGM+17, GETSER+10, SRTMAGTI+10
$$ISDEL^MAGGI11	RTRVIMG+12
CHK^MAGGSQI	SRTMAGTI+24
GROUP^MAGGTIG	RTRVIMG+6
IMAGEINF^MAGGTU3	RTRVIMG+11
$$RTRNFMT^XWBLIB	RTRVDIMG+5

FileNo	Call Tags
^MAG(2005 - [#2005]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	DIMGINF+8, DIMGINF+9
^MAG(	RTRVIMG+4, WRTMAGM+12, WRTMAGM+18, WRTMAGM+19, WRTMAGM+23, GETSER+11, SRTMAGTI+11, SRTMAGTI+14
^MAG(2005 - [#2005]	GETSER+4, GETRSER+8, GETRSER+9, GETRSER+11
^MAG(2005.1 - [#2005.1]	RTRVDIMG+13, DIMGINF+4, DIMGINF+7, GETDSER+7, GETDSER+9, GETDINUM+5, GETDINUM+6
^TMP("MAG"	WRTIMG+6!, WRTIMG+7!, WRTIMG+15, WRTIMG+17!, WRTIMG+18!, WRTMAGM+10, WRTMAGM+21, WRTMAGM+24, WRTSER+9!, WRTSER+20 , WRTSER+25, WRTSER+27!, SRTMAGTI+12!, SRTMAGTI+15, SRTMAGTI+16, SRTMAGTI+17, SRTMAGTI+18, SRTMAGTI+20, SRTMAGTI+26, SRTMAGTI+29* , SRTMAGTI+30!, SRTMAGTI+32, SRTMAGTI+34, WRSERUID+10
^TMP("MAGGTIG"	RTRVIMG+13, RTRVDIMG+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ANY	GETRSER+1~, GETRSER+6, GETRSER+10
CHLDIEN	GETDINUM~, GETDINUM+7
D	WRTMAGM+1~, WRTMAGM+8*, WRTMAGM+9, WRTMAGM+10, WRTMAGM+11, WRTMAGM+12, WRTMAGM+19, WRTMAGM+21, WRTMAGM+23
D0	WRTIMG~, WRTIMG+9, WRTIMG+12, WRTIMG+13, RTRVIMG~, RTRVIMG+2, RTRVIMG+4, RTRVIMG+6, RTRVIMG+7, RTRVIMG+11 , RTRVIMG+12, GETSER~, GETSER+4, GETSER+6, GETSER+10, GETSER+11, GETSER+13, GETRSER~, GETRSER+8, GETRSER+9 , GETDSER~, GETDSER+7, GETDSER+8, WRTSER~, WRTSER+22, WRSERUID~, WRSERUID+6, WRSERUID+15
D1	GETRSER+1~, GETRSER+6, GETRSER+8, GETRSER+9, GETDINUM+1~, GETDINUM+3, GETDINUM+5, GETDINUM+6
EXIST	DIMGINF+1~, DIMGINF+4*, DIMGINF+5, DIMGINF+6
G	WRTMAGM+1~, WRTMAGM+13, WRTMAGM+17, WRTMAGM+18, WRTMAGM+20, WRTMAGM+23*, WRTMAGM+24
GRPIEN	GETDINUM~, GETDINUM+5, GETDINUM+6, SRTMAGTI+6~, SRTMAGTI+19*, SRTMAGTI+20
I	WRTIMG+1~, WRTIMG+15, WRTMAGM+1~, WRTMAGM+4, WRTMAGM+6*, WRTMAGM+7
I0	GETRSER+5~, GETRSER+9, GETRSER+10, GETRSER+11, GETRSER+13, GETDSER+4~, GETDSER+5, GETDSER+7, GETDSER+8, GETDSER+9 , GETDSER+11, GETDINUM+1~, GETDINUM+6, GETDINUM+7, WRTSER+5~, WRTSER+14, WRTSER+16*, SRTMAGTI~, SRTMAGTI+10, SRTMAGTI+11 , SRTMAGTI+12, SRTMAGTI+14, SRTMAGTI+18, SRTMAGTI+24, SRTMAGTI+30, SRTMAGTI+34
IEN	DIMGINF~, DIMGINF+3, DIMGINF+4, DIMGINF+7
IMGINFO	SRTMAGTI+7~, SRTMAGTI+30*, SRTMAGTI+32
INCDEL	WRTIMG~, WRTIMG+9, WRTIMG+12, RTRVIMG~, RTRVIMG+7, RTRVIMG+12, GETSER~, GETSER+6
INCSERD	WRTIMG~, WRTIMG+5, WRTIMG+13, WRTSER~, WRTSER+8, WRTSER+22, WRSERUID~, WRSERUID+2*, WRSERUID+14
INUM	GETRSER+3~, GETRSER+10, GETRSER+12, GETRSER+13, GETDSER+2~, GETDSER+8, GETDSER+11, GETDINUM~, GETDINUM+2, GETDINUM+5 , GETDINUM+7, GETDINUM+11, WRTSER+4~, WRTSER+12, WRTSER+13*, WRTSER+16, SRTMAGTI~, SRTMAGTI+29
M	WRTMAGM+1~, WRTMAGM+14, WRTMAGM+15, WRTMAGM+16, WRTMAGM+21, WRTMAGM+22, WRTMAGM+24, WRSERUID+1~, WRSERUID+9, WRSERUID+10 , WRSERUID+11
MAGCHILD	RTRVDIMG+1~, RTRVDIMG+11, RTRVDIMG+13, RTRVDIMG+15
MAGCT	RTRVDIMG+1~, RTRVDIMG+10, RTRVDIMG+14, RTRVDIMG+16, RTRVDIMG+18
MAGFIL	RTRVIMG+1~, RTRVIMG+2, RTRVIMG+4, GETSER+1~, GETSER+10, GETSER+11, SRTMAGTI+3~, SRTMAGTI+10*, SRTMAGTI+11, SRTMAGTI+14
MAGFILD	WRTMAGM+2~, WRTMAGM+11*, WRTMAGM+12, WRTMAGM+19, WRTMAGM+23
MAGFILE	RTRVDIMG+1~, RTRVDIMG+15*, RTRVDIMG+16
MAGFILG	WRTMAGM+2~, WRTMAGM+17*, WRTMAGM+18
MAGIEN	RTRVDIMG~, RTRVDIMG+13
MAGINFO	DIMGINF+1~, DIMGINF+3*, DIMGINF+10
MAGR0	SRTMAGTI+3~, SRTMAGTI+9, SRTMAGTI+11, SRTMAGTI+12, SRTMAGTI+19
MAGRY	RTRVDIMG~, RTRVDIMG+3, RTRVDIMG+6*, RTRVDIMG+7, RTRVDIMG+10, RTRVDIMG+16, RTRVDIMG+18, DIMGINF~
MAGRY(0	DIMGINF+10*
MAGRY(1	DIMGINF+11*
MAGTI	WRTSER+3~, WRTSER+7, WRTSER+25, SRTMAGTI+5~, SRTMAGTI+15, SRTMAGTI+16, SRTMAGTI+17, SRTMAGTI+18, SRTMAGTI+20, SRTMAGTI+26 , SRTMAGTI+29, SRTMAGTI+32, SRTMAGTI+34*
P	WRTMAGM+1~, WRTMAGM+19*, WRTMAGM+20
REQDFN	WRTIMG~, WRTIMG+9, WRTIMG+13, RTRVIMG~, RTRVIMG+6, RTRVIMG+11, WRTSER~, WRTSER+16, SRTMAGTI~, SRTMAGTI+12 , SRTMAGTI+25
SERID	WRTIMG+2~, WRTIMG+12, WRTIMG+13, GETSER~, GETSER+4, GETSER+6, GETRSER~, GETDSER~, WRTSER~
SERID(	GETSER+13, GETRSER+13, GETDSER+11*, WRTSER+22
SERIES	WRTIMG+3~, WRTIMG+12, WRTIMG+13, GETSER~, GETSER+4, GETSER+6, GETSER+8, GETRSER~, GETDSER~, WRTSER~
SERIES(	WRTIMG+13, GETSER+13, GETRSER+13, GETDSER+11*, WRTSER+13, WRTSER+16
SERIESARRAY	WRTIMG~, WRTIMG+13, WRTSER~, WRTSER+24, WASGNSER~, WASGNSER+3, TSTSER~
SERIESARRAY(	WASGNSER+5, WASGNSER+9*, TSTSER+8
SERIESNUM	WASGNSER+1~, WASGNSER+3, WASGNSER+4, WASGNSER+5, WASGNSER+8, WASGNSER+9, TSTSER~, TSTSER+9
SERIESTEST	TSTSER+1~, TSTSER+2, TSTSER+3, TSTSER+4, TSTSER+5, TSTSER+6, TSTSER+7*, TSTSER+8, TSTSER+9
SGN	TSTSER+1~, TSTSER+4*, TSTSER+5, TSTSER+7
SNUM	WRTIMG+4~, WRTIMG+13, GETRSER+2~, GETRSER+10, GETRSER+12, GETRSER+13, GETDSER+1~, GETDSER+8, GETDSER+11, GETDINUM~ , GETDINUM+2, GETDINUM+5, GETDINUM+7, GETDINUM+10, WRTSER~, WRTSER+13, WRTSER+16, WRTSER+22, WRTSER+24, WASGNSER~ , WASGNSER+3, TSTSER~, TSTSER+2
STUMO	WRTIMG~, WRTIMG+10, WRTMAGM~
STUMO(	WRTMAGM+22*
TMP	WRTIMG+4~, WRTIMG+9, WRTIMG+10, RTRVIMG~, RTRVIMG+6, RTRVIMG+7, RTRVIMG+13*, RTRVIMG+14, WRTMAGM~, WRTMAGM+3 , WRTMAGM+6, WRTMAGM+7
U	DIMGINF+7, DIMGINF+9
U1	GETSER+1~, GETSER+9, GETSER+11, GETSER+12, GETSER+13, GETRSER+4~, GETRSER+11, GETRSER+12, GETRSER+13, GETDSER+3~ , GETDSER+9, GETDSER+10*, GETDSER+11
UID	WRTSER+6~, WRTSER+22, SRTMAGTI+4~, SRTMAGTI+14, SRTMAGTI+17, WRSERUID~, WRSERUID+5, WRSERUID+10
X	RTRVIMG+1~, RTRVIMG+11, RTRVIMG+12, RTRVDIMG+1~, RTRVDIMG+5, WRTMAGM+1~, WRTMAGM+7, WRTMAGM+8, WRTMAGM+10, WRTMAGM+12* , WRTMAGM+13, WRTMAGM+14, GETRSER+1~, GETRSER+9, GETRSER+10, GETDINUM+1~, GETDINUM+6, GETDINUM+7, SRTMAGTI+3~, SRTMAGTI+24 , WRSERUID+1~, WRSERUID+9, WRSERUID+10, WRSERUID+11, WRSERUID+13, WRSERUID+15*, WRSERUID+16
X(0	RTRVIMG+14, SRTMAGTI+25, SRTMAGTI+26
Z	DIMGINF+1~, DIMGINF+5, DIMGINF+7, DIMGINF+8, DIMGINF+9, DIMGINF+11

Customize PDF page

Package: Imaging

Routine: MAGDQR20

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 2

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Local Variables

Legend: