SegmentHL7

<----------New In Version 4.x---------->

Object: EHL7.EHL7Message

FileName: EHL7.dll

PROPERTY

Name: SegmentHL7(oSegment)

Parameter: oSegment (Segment Object)

DataType: String

Mode: Readonly

Description: Returns the segment passed in oSegment in HL7 format, on failure an empty string ("") is returned and IsError is set to True.

Example:

Dim oPID As Object 

With oMSG   'oMSG is a loaded EHL7Message Object

   MsgBox .SegmentHL7(.MSHObject)

   If Not .SegmentExists("PID") Then 

       MsgBox "No PID Segment"

   Else

       Set oPID = .GetSegment("PID")

       MsgBox .SegmentHL7(oPID)

   End If

End With

See Also: SegmentValue(), InsertSegment(), ReplaceSegment()