Routine: MAGDSTQ6

Information

MAGDSTQ6 ;WOIFO/PMK - Study Tracker - Patient Level Query/Retrieve Display; Sep 02, 2020@11:29:05

Call Graph

Call Graph Total: 3

Package	Total	Call Graph
Imaging	3	($$VISTA,$$YESNO)^MAGDSTQ ($$DATE,$$NAME,$$TIME)^MAGDSTQ6 $$GETNAME^MAGDUID2

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 2

Package	Total	Caller Graph
Imaging	2	MAGDSTQ5 MAGDSTQ6

Entry Points

Name	Comments	DBIA/ICR reference
PATIENT()	;
STUDY()	; display a study and select it
SERIES()	;
IMAGE()	;
SETKEYS(LEVEL)	; set query/retrieve keys
NUMBERS	; output patient, study, and series related counts
UID	;
NAME(DCMNAME)	; convert a DICOM person name to a readable format
DATE(DCMDATE,FORMAT)	; convert a DICOM date to a readable date
TIME(DCMTIME)	; convert a DICOM time to a readable time

External References

Name	Field # of Occurrence
$$VISTA^MAGDSTQ	UID+11, UID+17
$$YESNO^MAGDSTQ	PATIENT+16, STUDY+31, SERIES+16, IMAGE+9
$$DATE^MAGDSTQ6	PATIENT+4, STUDY+7
$$NAME^MAGDSTQ6	PATIENT+3, STUDY+13, STUDY+14
$$TIME^MAGDSTQ6	STUDY+9
$$GETNAME^MAGDUID2	UID+18

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: "Name: ",$$NAME^MAGDSTQ6(PNAME) Line Location: PATIENT+3
Function Call: WRITE	Prompt: ?47,"DOB: ",$$DATE^MAGDSTQ6(DOB,"SHORT") Line Location: PATIENT+4
Function Call: WRITE	Prompt: ?65,"Sex: ",SEX Line Location: PATIENT+5
Function Call: WRITE	Prompt: !?2,"ID: ",PID Line Location: PATIENT+6
Function Call: WRITE	Prompt: ?47,"Ethnicity: ",ETHNICITY Line Location: PATIENT+7
Function Call: WRITE	Prompt: !,"Other PID: ",PIDOTHER Line Location: PATIENT+8
Function Call: WRITE	Prompt: ! Line Location: PATIENT+9
Function Call: WRITE	Prompt: !,"Accession No: ",ACNUMB Line Location: STUDY+6
Function Call: WRITE	Prompt: ?55,"Study Date: ",$$DATE^MAGDSTQ6(STUDYDATE,"SHORT") Line Location: STUDY+7
Function Call: WRITE	Prompt: !,"Description: ",DESCRIPTION Line Location: STUDY+8
Function Call: WRITE	Prompt: ?55,"Study Time: ",$$TIME^MAGDSTQ6(STUDYTIME) Line Location: STUDY+9
Function Call: WRITE	Prompt: !,"Study ID: ",STUDYID Line Location: STUDY+10
Function Call: WRITE	Prompt: ?55,"CPT Code: ",CPTCODE,?72,CPTNAME Line Location: STUDY+11
Function Call: WRITE	Prompt: !!,"Requesting Physician: ",$$NAME^MAGDSTQ6(REQDOC) Line Location: STUDY+13
Function Call: WRITE	Prompt: !,"Referring Physician: ",$$NAME^MAGDSTQ6(REFDOC) Line Location: STUDY+14
Function Call: WRITE	Prompt: !,"Institution: ",INSTNAME Line Location: STUDY+15
Function Call: WRITE	Prompt: ! Line Location: STUDY+16
Function Call: WRITE	Prompt: !,"Reason for Study:",REASON,! Line Location: STUDY+17
Function Call: WRITE	Prompt: ! Line Location: STUDY+23
Function Call: WRITE	Prompt: !,$S(MODALITIES[",":"Modalities",1:"Modality") Line Location: STUDY+25
Function Call: WRITE	Prompt: ": ",MODALITIES,! Line Location: STUDY+26
Function Call: WRITE	Prompt: !,"Modality: ",MODALITY," Series Number: ",SERIESNO Line Location: SERIES+10
Function Call: WRITE	Prompt: !!,"Modality: ",MODALITY," Series Number: ",SERIESNO,! Line Location: SERIES+13
Function Call: WRITE	Prompt: !!,"Image attributes:" Line Location: IMAGE+3
Function Call: WRITE	Prompt: !,"Image Number: ",IMAGENO Line Location: IMAGE+6
Function Call: WRITE	Prompt: !,"Number of Patient Related Studies: ",NPATIENTRST Line Location: NUMBERS+7
Function Call: WRITE	Prompt: ", Series: ",NPATIENTRSE Line Location: NUMBERS+8
Function Call: WRITE	Prompt: ", Images: ",NPATIENTRI Line Location: NUMBERS+9
Function Call: WRITE	Prompt: !,"Number of Study Related Series: ",NSTUDYRS Line Location: NUMBERS+15
Function Call: WRITE	Prompt: ", Images: ",NSTUDYRI Line Location: NUMBERS+16
Function Call: WRITE	Prompt: !,"Number of Series Related Images: ",NSERIESRI Line Location: NUMBERS+21
Function Call: WRITE	Prompt: !,"Study UID: ",STUDYUID Line Location: UID+2
Function Call: WRITE	Prompt: !,"Series UID:",SERIESUID Line Location: UID+5
Function Call: WRITE	Prompt: !,"SOP UID: ",SOPUID Line Location: UID+8
Function Call: WRITE	Prompt: !,"SOP Class: " Line Location: UID+10
Function Call: WRITE	Prompt: "* Unknown UID: <<",SOPCLASS,">> *" Line Location: UID+14
Function Call: WRITE	Prompt: $P(^MAGDICOM(2006.539,IPTR,0),"^",2) Line Location: UID+15
Function Call: WRITE	Prompt: $$GETNAME^MAGDUID2(SOPCLASS) Line Location: UID+18
Function Call: WRITE	Prompt: ! Line Location: UID+22

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^MAGDICOM(2006.539 - [#2006.539]	UID+13, UID+15
^TMP("MAG"	SERIES+9, SETKEYS+1, SETKEYS+4, SETKEYS+5, SETKEYS+6, SETKEYS+7, SETKEYS+8, SETKEYS+9, SETKEYS+10, SETKEYS+11* , SETKEYS+12, SETKEYS+13, SETKEYS+17, SETKEYS+18, SETKEYS+19, SETKEYS+20, SETKEYS+21, SETKEYS+22, SETKEYS+23, SETKEYS+24 , SETKEYS+25, SETKEYS+26, SETKEYS+27, SETKEYS+31, SETKEYS+32, SETKEYS+33, SETKEYS+34, SETKEYS+35, SETKEYS+39, SETKEYS+40
^XTMP(	PATIENT+2, PATIENT+12, STUDY+5, STUDY+20, SERIES+5, SERIES+8, IMAGE+5, SETKEYS+3, SETKEYS+16, SETKEYS+30 , SETKEYS+38, NUMBERS+4, NUMBERS+5, NUMBERS+6, NUMBERS+13, NUMBERS+14, NUMBERS+20

Label References

Name	Line Occurrences
$$PATIENT	STUDY+2
$$SERIES	IMAGE+1
$$STUDY	SERIES+2
NUMBERS	PATIENT+14, STUDY+22, SERIES+12
SETKEYS	PATIENT+19, STUDY+34, SERIES+19, IMAGE+12
UID	STUDY+29, SERIES+14, IMAGE+7

Naked Globals

Name	Field # of Occurrence
^(	PATIENT+2, STUDY+5, SERIES+5, IMAGE+5, SETKEYS+3, SETKEYS+16, SETKEYS+30, SETKEYS+38

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ACNUMB	STUDY+6, SETKEYS+17
>> CARET	PATIENT+16, STUDY+31, SERIES+16, IMAGE+9
>> CPTCODE	STUDY+11
>> CPTNAME	STUDY+11
DATE	DATE+1~, DATE+7, DATE+11, DATE+13
DAY	DATE+1~, DATE+4, DATE+6, DATE+7, DATE+11
DCMDATE	DATE~, DATE+2, DATE+4
DCMNAME	NAME~, NAME+2, NAME+3, NAME+4, NAME+5, NAME+6
DCMTIME	TIME~, TIME+2
>> DESCRIPTION	STUDY+8, SETKEYS+18
>> DOB	PATIENT+4, SETKEYS+6
>> ETHNICITY	PATIENT+7, SETKEYS+9
FIRST	NAME+1~, NAME+4*, NAME+7, NAME+8
FORMAT	DATE~, DATE+3*, DATE+5
>> HOSTNAME	PATIENT+2, PATIENT+12, STUDY+5, STUDY+20, SERIES+5, SERIES+8, IMAGE+5, SETKEYS+3, SETKEYS+16, SETKEYS+30 , SETKEYS+38, NUMBERS+4, NUMBERS+5, NUMBERS+6, NUMBERS+13, NUMBERS+14, NUMBERS+20
HOUR	TIME+1~, TIME+2*, TIME+3
>> IMAGENO	IMAGE+6
>> INCORRECT	PATIENT+17, STUDY+32, SERIES+17, IMAGE+10
>> INSTNAME	STUDY+15, SETKEYS+19
IPTR	UID+12~, UID+13*, UID+14, UID+15
>> JIMAGE	IMAGE+5, IMAGE+13, SETKEYS+38
>> JPATIENT	PATIENT+2, PATIENT+12, PATIENT+20, STUDY+5, STUDY+20, SERIES+5, SERIES+8, IMAGE+5, SETKEYS+3, SETKEYS+16 , SETKEYS+30, SETKEYS+38, NUMBERS+2, NUMBERS+4, NUMBERS+5, NUMBERS+6, NUMBERS+13, NUMBERS+14, NUMBERS+20
>> JSERIES	SERIES+5, SERIES+8, SERIES+20, IMAGE+5, SETKEYS+30, SETKEYS+38, NUMBERS+18, NUMBERS+20
>> JSTUDY	STUDY+5, STUDY+20, STUDY+35, SERIES+5, SERIES+8, IMAGE+5, SETKEYS+16, SETKEYS+30, SETKEYS+38, NUMBERS+11 , NUMBERS+13, NUMBERS+14, NUMBERS+20
LAST	NAME+1~, NAME+4*, NAME+7
LEVEL	PATIENT+19, STUDY+34, SERIES+19, IMAGE+12, SETKEYS~, SETKEYS+1, SETKEYS+13, SETKEYS+27, SETKEYS+35, NUMBERS+3 , NUMBERS+12, NUMBERS+19
>> MAGXTMP	PATIENT+2, PATIENT+12, STUDY+5, STUDY+20, SERIES+5, SERIES+8, IMAGE+5, SETKEYS+3, SETKEYS+16, SETKEYS+30 , SETKEYS+38, NUMBERS+4, NUMBERS+5, NUMBERS+6, NUMBERS+13, NUMBERS+14, NUMBERS+20
MIDDLE	NAME+1~, NAME+5*, NAME+7, NAME+10
MINUTE	TIME+1~, TIME+2*, TIME+3
>> MODALITIES	STUDY+24, STUDY+25, STUDY+26
>> MODALITY	SERIES+9*, SERIES+10, SERIES+13, SETKEYS+31
MONTH	DATE+1~, DATE+4, DATE+6, DATE+7, DATE+10*, DATE+11
NAME	NAME+1~, NAME+7, NAME+8, NAME+9, NAME+10, NAME+11, NAME+12, NAME+13
NPATIENTRI	SETKEYS+12, NUMBERS+1~, NUMBERS+6*, NUMBERS+9
NPATIENTRSE	SETKEYS+11, NUMBERS+1~, NUMBERS+5*, NUMBERS+8
NPATIENTRST	SETKEYS+10, NUMBERS+1~, NUMBERS+4*, NUMBERS+7
NSERIESRI	SETKEYS+34, NUMBERS+1~, NUMBERS+20*, NUMBERS+21
NSTUDYRI	SETKEYS+26, NUMBERS+1~, NUMBERS+14*, NUMBERS+16
NSTUDYRS	SETKEYS+25, NUMBERS+1~, NUMBERS+13*, NUMBERS+15
>> PID	PATIENT+6, SETKEYS+5
>> PIDOTHER	PATIENT+8, SETKEYS+8
>> PNAME	PATIENT+3, SETKEYS+4
PREFIX	NAME+1~, NAME+6*, NAME+11
PROMPT	STUDY+1~, SERIES+1~
>> QRSTACK	PATIENT+2, PATIENT+12, STUDY+5, STUDY+20, SERIES+5, SERIES+8, SERIES+9, IMAGE+5, SETKEYS+1, SETKEYS+3 , SETKEYS+4, SETKEYS+5, SETKEYS+6, SETKEYS+7, SETKEYS+8, SETKEYS+9, SETKEYS+10, SETKEYS+11, SETKEYS+12, SETKEYS+13 , SETKEYS+16, SETKEYS+17, SETKEYS+18, SETKEYS+19, SETKEYS+20, SETKEYS+21, SETKEYS+22, SETKEYS+23, SETKEYS+24, SETKEYS+25 , SETKEYS+26, SETKEYS+27, SETKEYS+30, SETKEYS+31, SETKEYS+32, SETKEYS+33, SETKEYS+34, SETKEYS+35, SETKEYS+38, SETKEYS+39 , SETKEYS+40, NUMBERS+4, NUMBERS+5, NUMBERS+6, NUMBERS+13, NUMBERS+14, NUMBERS+20
>> REASON	STUDY+17
>> REFDOC	STUDY+14, SETKEYS+24
>> REQDOC	STUDY+13
>> RETURN	STUDY+2, SERIES+2, IMAGE+1*
SECOND	TIME+1~, TIME+2*, TIME+3
>> SERIESNO	SERIES+10, SERIES+13, SETKEYS+32
>> SERIESUID	SETKEYS+33, UID+4, UID+5
>> SEX	PATIENT+5, SETKEYS+7
>> SOPCLASS	UID+9, UID+13, UID+14, UID+18
>> SOPUID	SETKEYS+39, UID+7, UID+8
>> STUDYDATE	STUDY+7, SETKEYS+22
>> STUDYID	STUDY+10, SETKEYS+20
>> STUDYTIME	STUDY+9, SETKEYS+23
>> STUDYUID	SETKEYS+21, UID+1, UID+2
SUFFIX	NAME+1~, NAME+6*, NAME+12
TIME	TIME+1~, TIME+3*, TIME+4
VAR	PATIENT+1~, PATIENT+2~, STUDY+4~, STUDY+5~, SERIES+4~, SERIES+5~, IMAGE+4~, IMAGE+5~, SETKEYS+3~, SETKEYS+16~ , SETKEYS+30~, SETKEYS+38~
>> X	PATIENT+16, PATIENT+17, STUDY+31, STUDY+32, SERIES+16, SERIES+17, IMAGE+9, IMAGE+10
YEAR	DATE+1~, DATE+4*, DATE+7, DATE+11

Customize PDF page

Package: Imaging