CustomLayout : Boolean;
The CustomLayout property determines whether an arbitrary title is used in the data area. If the property is set to True, the arbitrary title is used.
The default property value is False.
Sub Main;
Var
MB: IMetabase;
MObj: IMetabaseObject;
Report: IPrxReport;
DIs: IPrxDataIslands;
DI: IPrxDataIsland;
Prop: IPrxDataIslandProperties;
Dim : IDimInstance;
DimProp : IPrxDataIslandDimension;
Cap : IPrxDataIslandDimensionLayoutNode;
Begin
MB := MetabaseClass.Active;
MObj := MB.ItemById("Report").Edit;
Report := MObj As IPrxReport;
DIs := Report.DataIslands;
DI := DIs.Item(0).Edit;
Prop := DI.Properties;
Dim := DI.Slice.LeftHeader.Item(0).Dimension;
DimProp := Prop.Dimension(Dim.Dimension);
DimProp.CustomLayout := True;
Cap := DimProp.Layout.RootNodes.Add;
Cap.DimElement(Dim) := 0;
Cap.Caption := "RF";
DI.Save;
MObj.Save;
End Sub Main;
After executing the example an arbitrary title is set for the dimension located in rows of the data area.
Report - identifier of the regular report, which sheet contains a data area.
See also: