Routine: INHVIHS

Entry Points

Name	Comments	DBIA/ICR reference
TRICORE	;-- parse tricore messages
GE	;-- parse the pacs msg
LABCORP	;-- parse labcorp messages
NPL	;-- parse paml messages
DEST	;-- this is the main routine driver
RLAB	;-- parse ref lab messages
SQUEST	;-- parse sonora quest messages
UNILAB	;-- parse unilab messages
PAML	;-- parse paml messages
THREEM	;-- parse 3M inbound stuff
MARSH	;-- parse tricore messages
QUEST	;-- parse quest messages
PYXIS	;-- Pyxis
MEDITECH	;-- parse the Meditech message
RML	;-- parse rml messages

Name	Line Occurrences
DEST	PYXIS+4

Name	Field # of Occurrence
>> BHLDEST	DEST+1, DEST+17, PYXIS+1, PYXIS+3, THREEM+1, THREEM+3, MEDITECH+1, MEDITECH+12, RLAB+1, RLAB+3 , QUEST+1, QUEST+3, LABCORP+1, LABCORP+4, UNILAB+1, UNILAB+4, RML+1, RML+4, SQUEST+1, SQUEST+4 , TRICORE+1, TRICORE+4, PAML+1, PAML+4, MARSH+1, MARSH+4, NPL+1, NPL+4, GE+1*, GE+4
>> INDEST("ADTA01"	DEST+2, MEDITECH+2
>> INDEST("ADTA02"	DEST+3, MEDITECH+3
>> INDEST("ADTA03"	DEST+4, MEDITECH+4
>> INDEST("ADTA04"	DEST+5, MEDITECH+5
>> INDEST("ADTA05"	MEDITECH+6*
>> INDEST("ADTA06"	MEDITECH+7*
>> INDEST("ADTA08"	DEST+6, THREEM+2, MEDITECH+8*
>> INDEST("ADTA11"	MEDITECH+9*
>> INDEST("ADTA28"	DEST+7, MEDITECH+10
>> INDEST("ADTA31"	DEST+8, MEDITECH+11
>> INDEST("DFTP03"	PYXIS+2*
>> INDEST("MFKZ01"	DEST+10*
>> INDEST("MFNZ01"	DEST+9*
>> INDEST("ORU"	LABCORP+3, UNILAB+3, RML+3, SQUEST+3, TRICORE+3, PAML+3, MARSH+3, NPL+3, GE+3*
>> INDEST("ORUR01"	DEST+11, RLAB+2, QUEST+2, LABCORP+2, UNILAB+2, RML+2, SQUEST+2, TRICORE+2, PAML+2, MARSH+2 , NPL+2, GE+2
>> INDEST("RDSO01"	DEST+12*
>> INDEST("VXQV01"	DEST+13*
>> INDEST("VXRV02"	DEST+14*
>> INDEST("VXUV04"	DEST+16*
>> INDEST("VXXV03"	DEST+15*