Gets the next Data Segment in the document.
Syntax:
Returns
Returns an object of type FREDI.ediDataSegment.
Example
Dim oSegment as Fredi.ediDataSegment
Dim oEdiDoc As Fredi.ediDocument
:
Set oSegment = oEdiDoc.FirstDataSegment
While Not oSegment Is Nothing
sSegmentID = oSegment.ID
sLoopSection = oSegment.LoopSection
nArea = oSegment.Area
:
Set oSegment = oSegment.Next
Wend