InsertSegment

Object Method - InsertSegment()

Parent Object - EasyHL7Message

Returns - Object


Name: InsertSegment(ByVal oSegment)

Parameters: 1. oSegment (Fully Formed Segment Object - See CloneSegment)

 

Returns: A NEW object that has been inserted into the message.

 

Example:

 

Dim oSegment1, oSegmentClone

With MyMessage1

'MyMessage1 is an open EasyHL7Message object

 oSegment1 = .GetSegment("PID")

oSegmentClone = .CloneSegment(oSegment1)

End With

With MyMessage2

'MyMessage2 is an open EasyHL7Message object

oSegmentClone = .InsertSegment(oSegmentClone)

'oSegmentClone was added to the end of MyMessage2

End With

 

See Also: InsertSegment, InsertSegmentBefore, InsertSegmentAfter, CloneSegment