Framework EDI Reference. Methods and Properties
ediDataElement. IsComposite

Indicates if a data element is a composite data element.

Syntax:

• <True/False> = object. IsComposite

Remarks

A composite element contains a collection of sub elements.

Example

Dim oAllElements As Fredi.ediDataElements
Dim oDataSegment As Fredi.ediDataSegment

....

' Get first data segment in document.
Set oDataSegment = oEdiDoc.FirstDataSegment

' Get a data segment.
Set oDataSegment = oDataSegment.GetDataSegmentByPos("\ISA\GS\ST\PO1\SLN\SLN")

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

For i = 1 To oAllElements.Count

Dim oDataElement As Fredi.ediDataElement
Dim sElmType As String

Set oDataElement = oAllElements.DataElement(i)

' Show if element is simple element or composite element.
If oDataElement.IsComposite Then

sElmType = "COMPOSITE"

Else

sElmType = "SIMPLE"

End If

sElements = sElements & oDataElement.Position & vbTab & oDataElement.ID & vbTab & sElmType & vbCrLf

Next

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

Sample

P_IsComposite.zip