IAdoMdDimension.Cubes

Fore Syntax

Fore.NET Syntax

Cubes: Prognoz.Platform.Interop.ForeCollections.IStringList;

Description

The Cubes property returns the collection of cubes that contain the current ADOMD dictionary in their structure.

Fore Example

Executing the example requires that the repository contains an ADOMD catalog with the ADOMDTest identifier. The catalog includes the ADOMD dictionary with the DimTest identifier.

Sub UserProc;
Var
    MB: IMetabase;
    Dim: IAdoMdDimension;
    Cubes: IStringList;
    s: String;
Begin
    MB := MetabaseClass.Active;
    Dim := MB.ItemByIdNamespace("DimTest", MB.GetObjectKeyById("ADOMDTest")).Bind As IAdoMdDimension;
    Cubes := Dim.Cubes;
    For Each s In Cubes Do
        Debug.WriteLine(s);
    End For;
End Sub UserProc;

The list of cubes, structure of which includes the selected dictionary is displayed in the development environment output after executing the example.

Fore.NET Example

Executing the example requires that the repository contains an ADOMD catalog with the ADOMDTest identifier. The catalog includes the ADOMD dictionary with the DimTest identifier.

Imports Prognoz.Platform.Interop.AdoMd;
Imports Prognoz.Platform.Interop.ForeCollections;
Imports Prognoz.Platform.Interop.Metabase;

Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    Dim: IAdoMdDimension;
    s: String;
Begin
    MB := Params.Metabase;
    Dim := MB.ItemByIdNamespace["DimTest", MB.GetObjectKeyById("ADOMDTest")].Bind() As IAdoMdDimension;
    For Each s In Dim.Cubes Do
        System.Diagnostics.Debug.WriteLine(s);
    End For;
End Sub;

The list of cubes, structure of which includes the selected dictionary is displayed in the development environment output after executing the example.