Routine: MAGIP183

Package	Total	Call Graph
Imaging	5	MAGIP183^MAGDHPS ($$CP,ABTMSG,MES)^MAGKIDS INS^MAGQBUT4 CLEAR^MAGUERR DUMP^MAGUERR1
Kernel	3	($$FMTE,$$NOW)^XLFDT $$ADD^XPDMENU BMES^XPDUTL
VA FileMan	2	^DIC UPDATE^DIE

Entry Points

Name	Comments	DBIA/ICR reference
ERROR	;
PRE	;
POS	;
UPDATE()	; ; This subroutine creates the MAGD PATHOLOGY entry in the ; HLO SUBSCRIPTION REGISTRY (file 779.4).
NEW7794	; create an entry in the HLO SUBSCRIPTION REGISTRY (file 779.4)
NEW7794A(NAME,DESCRIPTION,OWNER)	; create the entry in file 779.4
UPDTMENU	; set the DISPLAY ORDER for MAG CONFIGURE IHE PACS HL7 I/F

Name	Field # of Occurrence
^DIC	NEW7794A+4
UPDATE^DIE	NEW7794A+14
MAGIP183^MAGDHPS	POS+8, POS+10
$$CP^MAGKIDS	POS+5
ABTMSG^MAGKIDS	ERROR+3
MES^MAGKIDS	NEW7794A+6, NEW7794A+8, NEW7794A+16, NEW7794A+18, UPDTMENU+9, UPDTMENU+12
INS^MAGQBUT4	POS+14
CLEAR^MAGUERR	POS+2
DUMP^MAGUERR1	ERROR+3
$$FMTE^XLFDT	POS+13
$$NOW^XLFDT	POS+13, POS+14
$$ADD^XPDMENU	UPDTMENU+7
BMES^XPDUTL	POS+13

Name	Line Occurrences
Function Call: WRITE	Prompt: !!!,"Setting DICOM Text Gateway to use Radiology HL7 V2.4 protocols -- PASS 1" Line Location: POS+7
Function Call: WRITE	Prompt: !!!,"Setting DICOM Text Gateway to use Radiology HL7 V2.4 protocols -- PASS 2" Line Location: POS+9
Routine Call	DIC Line Location: NEW7794A+4
Routine Call	DIE Line Location: NEW7794A+14

Name	Field # of Occurrence
CALLBACK	POS+1~
DESCRIPTION	NEW7794+1~, NEW7794+4*, NEW7794+6, NEW7794A~, NEW7794A+13
DIC	NEW7794A+1~, NEW7794A+4*
DIC(0	NEW7794A+4*
DIERR	NEW7794A+1~, NEW7794A+15
DUZ	POS+14
I	NEW7794A+1~, NEW7794A+17*, NEW7794A+18
IENS	NEW7794A+1~, NEW7794A+10*, NEW7794A+11, NEW7794A+12, NEW7794A+13
MAGERR	NEW7794A+1~
MAGERR("DIERR"	NEW7794A+17, NEW7794A+18
MAGFDA	NEW7794A+1~
MAGFDA(	NEW7794A+11, NEW7794A+12, NEW7794A+13*
MAGIENS	NEW7794A+1~
MENU	UPDTMENU+1~, UPDTMENU+2*, UPDTMENU+6, UPDTMENU+7
MSG	UPDTMENU+1~, UPDTMENU+6*, UPDTMENU+9, UPDTMENU+12
NAME	NEW7794+1~, NEW7794+3*, NEW7794+6, NEW7794A~, NEW7794A+4, NEW7794A+6, NEW7794A+8, NEW7794A+11, NEW7794A+16
OPTION	UPDTMENU+1~, UPDTMENU+3*, UPDTMENU+7
ORDER	UPDTMENU+1~, UPDTMENU+5*, UPDTMENU+7
OWNER	NEW7794+1~, NEW7794+5*, NEW7794+6, NEW7794A~, NEW7794A+12
SYNONYM	UPDTMENU+1~, UPDTMENU+4*, UPDTMENU+6, UPDTMENU+7
X	NEW7794A+1~, NEW7794A+4, UPDTMENU+1~, UPDTMENU+7, UPDTMENU+8, UPDTMENU+12
>> XPDA	POS+14
>> XPDABORT	ERROR+1*
>> XPDNM	ERROR+1, POS+14
Y	NEW7794A+1~, NEW7794A+5

Name	Field # of Occurrence
$T(	POS+5