Routine: RAHLROUT

Information

RAHLROUT ;HIRMFO/CRT - Rad/Nuc Med HL7 Interfaces Routing Logic; Aug 28, 2020@10:06:28

Source file <RAHLROUT.m>

Package	Total	Call Graph
Health Level Seven	1	INIT^HLFNC2
Radiology Nuclear Medicine	1	FORMAT^RAHLTCPB

Name	Comments	DBIA/ICR reference
RADIV	; Get the Division from the HL7 message, Piece 3 of Piece 21 of OBR.
RAHLL	; Check field .129 in Division File #79 for specific interfaces. ; ; If Receiving App listed as interface for this division, set and quit.
LINK(IEN)	; Return LINK information for subscriber ; INPUT - IEN: IEN of protocol file ; OUTPUT - SUBSCRIBER PROTOCOL^LOGICAL LINK in HLL("LINKS",1)

Name	Field # of Occurrence
INIT^HLFNC2	RADIV+4
FORMAT^RAHLTCPB	RADIV+14, RADIV+25

Name	Line Occurrences (* Changed, ! Killed)
^HLCS(870 - [#870]	LINK+9
^ORD(101 - [#101]	RAHLL+4, LINK+7, LINK+9
^RA(79 - [#79]	RAHLL+6

Name	Line Occurrences
LINK	RAHLL+6

Name	Field # of Occurrence
>> HL	RADIV+3*, RADIV+4
>> HL("ECH"	RADIV+15, RADIV+26
>> HL("EIDS"	RAHLL+4, RAHLL+6
>> HL("FS"	RADIV+2, RADIV+10, RADIV+11, RADIV+13, RADIV+18, RADIV+20, RADIV+24
>> HL("VER"	RADIV+7, RADIV+8, RADIV+15, RADIV+26
>> HLL("LINKS"	LINK+9*
>> HLNEXT	RADIV+9
>> HLNODE	RADIV+10, RADIV+11, RADIV+13, RADIV+18, RADIV+19
>> HLQUIT	RADIV+9
I	RADIV+6~, RADIV+9*
IEN	LINK~, LINK+4*, LINK+7, LINK+9
>> INT	RADIV+4
J	RADIV+6~, RADIV+20*, RADIV+21
>> RADVSN	RADIV+7, RADIV+9, RADIV+15, RADIV+26*, RAHLL+6
RAECH	RADIV+8~*, RADIV+15, RADIV+26
>> RAEID	RADIV+4
RAHLAPP	RADIV+6~, RAHLL+4*, RAHLL+5, RAHLL+6
RANODE	RADIV+19~, RADIV+21, RADIV+24
RANODE(	RADIV+20, RADIV+21
RAPC	RADIV+6~, RADIV+7*, RADIV+11, RADIV+13, RADIV+18, RADIV+20, RADIV+24
X	RADIV+12~, RADIV+13, RADIV+15, RADIV+23~, RADIV+24, RADIV+26