GetVendorXML()

Object: EHL7.HL7Vendors

FileName: EHL7.dll

METHOD

Name: GetVendorXML()

Parameters: strVendorID (String) the GUID VendorID

Returns: XML String

Description: Returns an XML string with information for the vendorID passed in strVendorID.  No vendor is required to be currently open to call this method.

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

strXML = myVendorObj.GetVendorXML(strVendorID)

If strXML = "" Then

    MsgBox myVendorObj.LastError

    Set myVendorObj = Nothing

    Exit Sub

End If

End Sub

Example XML String:

<VENDOR ID="63578DEA-9541-4663-B484-111919054FBC" NAME="Default"

DESCRIPTION="EasyHL7 default vendor for version 2.3" VERSION="2.3" FIELDSEPARATOR="|"

ENCODINGCHARS="^~\&" PARSINGCHARS="0B|1C,0D|0D" />

*Notes: The ID attribute is the GUID assigned to the vendor, this ID is used frequently throughout the system.  In the EasyHL7.exe program, this method is used to initialize the XML string necessary to send to the UpdateVendor() method when making changes to the vendor record.