HL7ElementsXML() |
Top Previous Next |
Object: EHL7.HL7Vendors FileName: EHL7.dll
METHOD
Name: HL7ElementsXML() Parameters: 1) strSegment (Optional String) Returns: XML String Description: Returns an XML string with information for all of the HL7 Field Elements for the segment passed in strSegment
Example: Private Sub VendorTest() Dim myVendorObj As New EHL7.HL7Vendors Dim strVendorID As String Dim strXML As String
myVendorObj.VendorPath = "C:\EasyHL7" 'Process the XML strVendorID = myVendorObj.GetVendorID("Default","2.3") If strVendorID = "" Then MsgBox myVendorObj.LastError Set myVendorObj = Nothing Exit Sub End If If Not MyVendorObj.OpenVendor(strVendorID) Then MsgBox myVendorObj.LastError Set myVendorObj = Nothing Exit Sub End If strXML = myVendorObj.HL7ElementsXML("MSH")
End Sub
Example XML String:
<ELEMENTS COUNT="7"> <ITEM ID="BAD310CA-5769-4195-BD29-507A4FD83EFC" FIELDNUMBER="1" HL7DATATYPE="ID" FIELDLEN="3" REQUIRED="1" DESCRIPTION="Event Type Code" MAXCOMPONENTS="1" TABLEID="3" HL7ITEMNUM="99" /> <ITEM ID="32C5A651-4486-4F32-B425-0945F4E0A239" FIELDNUMBER="2" HL7DATATYPE="TS" FIELDLEN="26" REQUIRED="0" DESCRIPTION="Recorded Date/Time" MAXCOMPONENTS="1" TABLEID="0" HL7ITEMNUM="100" /> <ITEM ID="0380F0EE-6E5E-455A-9EFD-180291A2BCC4" FIELDNUMBER="3" HL7DATATYPE="TS" FIELDLEN="26" REQUIRED="0" DESCRIPTION="Date/Time Planned Event" MAXCOMPONENTS="1" TABLEID="0" HL7ITEMNUM="101" /> <ITEM ID="33EE5665-716A-4971-8C68-41B4C7163A53" FIELDNUMBER="4" HL7DATATYPE="IS" FIELDLEN="3" REQUIRED="0" DESCRIPTION="Event Reason Code" MAXCOMPONENTS="1" TABLEID="62" HL7ITEMNUM="102" /> <ITEM ID="5E68C282-ABBB-497B-B52C-435EA2A060C6" FIELDNUMBER="5" HL7DATATYPE="XCN" FIELDLEN="60" REQUIRED="0" DESCRIPTION="Operator ID" MAXCOMPONENTS="1" TABLEID="188" HL7ITEMNUM="103" /> <ITEM ID="8337C2CC-88F5-4208-A9E6-CB6527D946AB" FIELDNUMBER="6" HL7DATATYPE="TS" FIELDLEN="26" REQUIRED="0" DESCRIPTION="Event Occurred" MAXCOMPONENTS="2" TABLEID="0" HL7ITEMNUM="1278" /> <ITEM ID="7817163C89F49D42AF975AACD06EDF47" FIELDNUMBER="7" HL7DATATYPE="CE" FIELDLEN="20" REQUIRED="0" DESCRIPTION="New Segment" MAXCOMPONENTS="6" TABLEID="0" HL7ITEMNUM="0" /> </ELEMENTS>
*Notes: The ID attribute is the GUID assigned to the Element by EasyHL7. The TABLEID attribute is the HL7 Table ID.
|