2085: If l_header_rec.order_source_id = 0 And
2086: l_xml_message_id Is Null Then
2087: Select Oe_Xml_Message_Seq_S.nextval
2088: Into l_xml_message_id 2089: From dual; 2090: l_header_rec.xml_message_id := l_xml_message_id;
2091: End IF;
2092: Exception
2093: When Others Then