Framework EDI Reference. Methods and Properties
ediDataElement. RepeatNumber

Returns the instance of an element in a repeating sequence. The first instance has a repeat number of 1.

Syntax:

• <lNumber>  = object.RepeatNumber

Example

Dim oEdiDoc As Fredi.ediDocument
Dim oDataElement As Fredi.ediDataElement
Dim oDataElements As Fredi.ediDataElements
Dim oDataSegment As Fredi.ediDataSegment
Dim sValString As String

....

Set oDataSegment = oEdiDoc.FirstDataSegment
Set oDataSegment = oDataSegment.GetDataSegmentByPos("\UNB\UNH\PLD\TRV\TRV")

' Get the object containing the collection of elements.
Set oDataElements = oDataSegment.DataElements

For Each oDataElement In oDataElements

' Show element repeat number.
sValString = sValString & oDataElement.Position & vbTab & oDataElement.ID & vbTab & "REPEAT NUMBER: " & oDataElement.RepeatNumber & vbCrLf

Next

MsgBox "List of elements: " & vbCrLf & vbCrLf & sValString

Sample

P_RepeatNumber.zip