IAdoMdDimension.Cubes

Синтаксис Fore

Синтаксис Fore.NET

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

Описание

Свойство Cubes возвращает коллекцию кубов, в структуру которых входит текущий справочник ADOMD.

Пример Fore

Для выполнения примера предполагается наличие в репозитории каталога ADOMD с идентификатором «ADOMDTest». В каталоге имеется справочник ADOMD с идентификатором «DimTest».

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;

При выполнении примера в консоль среды разработки будет выведен список кубов, в структуру которых входит указанный справочник.

Пример Fore.NET

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;

См. также:

IAdoMdDimension