Naming(Index: Integer): IPrxDataIslandNaming;
Naming[Index: integer]: Prognoz.Platform.Interop.Report.IPrxDataIslandNaming;
Index. Index of elements name.
The Naming property returns the object containing dimension elements name.
Name index is passed by the Index parameter.
Executing the example requires a form that contains the Button component with the Button1 identifier and the UiReport component with the UiReport1 identifier. A regular report with a configured hierarchy is used as a data source. Example is the OnClick event handler for the Button1 component.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
Report: IPrxReport;
DI: IPrxDataIsland;
DimModel: IDimensionModel;
DIProp: IPrxDataIslandProperties;
Top: IPrxDataIslandDimension;
Level: IPrxDataIslandLevel;
Naming: IPrxDataIslandNaming;
NamingCount: Integer;
Begin
Report := UiReport1.Instance As IPrxReport;
DI := Report.DataIslands.Item(0);
DimModel := DI.Slice.TopHeader.Item(0).Dimension.Dimension;
DIProp := DI.Properties;
Top := DIProp.Dimension(DimModel);
Level := Top.Level(DimModel.Levels.Item(0));
Naming := Level.Naming(0);
NamingCount := Level.NamingCount;
End Sub Button1OnClick;
After executing the example the Naming variable contains the first name of the elements of the set dimension located in the dimension by columns, the NamingCount variable contains the number of the rows for names of the elements of the first dimension located in the dimension by columns.
The requirements and result of Fore.NET Example execution match with those in the Fore Example. Use Fore.NET analogs instead of Fore components.
Add links to the Dimensions, ForeSystem and Report system assemblies.
Imports Prognoz.Platform.Interop.Dimensions;
Imports Prognoz.Platform.Interop.ForeSystem;
Imports Prognoz.Platform.Interop.Report;
…
Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
Report: IPrxReport;
DI: IPrxDataIsland;
DimModel: IDimensionModel;
DIProp: IPrxDataIslandProperties;
Top: IPrxDataIslandDimension;
Level: IPrxDataIslandLevel;
Naming: IPrxDataIslandNaming;
NamingCount: Integer;
Begin
Report := uiReportNet1.ReportUi.Instance As IPrxReport;
DI := Report.DataIslands.Item[0];
DimModel := DI.Slice.TopHeader.Item[0].Dimension.Dimension;
DIProp := DI.Properties;
Top := DIProp.Dimension[DimModel];
Level := Top.Level[DimModel.Levels.Item[0]];
Naming := Level.Naming[0];
NamingCount := Level.NamingCount;
End Sub;
See also: