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.