IsDimElement : Boolean;
The IsDimElement property returns True if the element of the arbitrary title is bound to a dimension element, otherwise it returns False.
The following example assumes that there is the Report object with the IPrxReport type.
Sub UserProc;
Var
Report: IPrxReport;
DIs: IPrxDataIslands;
DI: IPrxDataIsland;
Prop: IPrxDataIslandProperties;
Dim : IDimInstance;
DimProp : IPrxDataIslandDimension;
RN : IPrxDataIslandDimensionLayoutNodes;
Element, Child : IPrxDataIslandDimensionLayoutNode;
Begin
DIs := Report.DataIslands;
DI := DIs.Item(0).Edit;
Prop := DI.Properties;
Dim := DI.Slice.LeftHeader.Item(0).Dimension;
DimProp := Prop.Dimension(Dim.Dimension);
RN := DimProp.Layout.RootNodes;
Element := RN.Item(0).Children.Item(16);
If Element.IsDimElement Then
Child := Element.Children.Add;
Child.Caption := Dim.Elements.Name(35);
Child.DimElement(Dim) := 35;
Else
Debug.WriteLine(False)
End If;
DI.Save;
End Sub UserProc;
Executing the example creates a child element if the specified element of arbitrary title is bound to a dimension element. If it is not bound, no element is created, and the console window displays the specified message.
See also: