IRubricator.FactAndValuesDimension

Синтаксис Fore

FactAndValuesDimension: IDimensionModel;

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

FactAndValuesDimension:  Prognoz.Platform.Interop.Dimensions.IDimensionModel;

Описание

Свойство FactAndValuesDimension возвращает измерение атрибутов базы данных временных рядов.

Комментарии

В измерение атрибутов входят атрибуты показателей, которые являются ссылками на справочник, а также атрибут «Значение».

Пример Fore

Для выполнения примера в предполагается наличие формы, содержащей компонент DimensionTree с идентификатором «DimensionTree1» и компонент UiDimension с идентификатором «UiDimension1». Компонент «UiDimension1» является источником данных для «DimensionTree1».

В репозитории предполагается наличие базы данных временных рядов с идентификатором «TSBD».

Добавьте ссылки на системные сборки: Cubes, Metabase.

Sub UserProc;
Var
    mb: IMetabase;
    TSDB: IRubricator;
Begin
    // Получаем текущий репозиторий
    MB := MetabaseClass.Active;
    // Получаем базу данных временных рядов
    TSDB := MB.ItemById("TSDB").Bind As IRubricator;
    // Отображаем измерение атрибутов в компоненте DimensionTree1
    UiDimension1.Dimension := TSDB.FactAndValuesDimension;
    UiDimension1.Active := True;
End Sub UserProc;

В результате выполнения примера в компоненте «DimensionTree1» будет отображено измерение атрибутов базы данных временных рядов.

Пример Fore.NET

Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore. Вместо компонентов Fore используйте их Fore.NET аналоги.

Imports Prognoz.Platform.Interop.Cubes;
Imports Prognoz.Platform.Interop.Dimensions;
Imports Prognoz.Platform.Interop.Metabase;
…
Public Sub UserProc();
Var
    mb: IMetabase;
    TSDB: IRubricator;
Begin
    // Получаем текущий репозиторий
    MB := Self.Metabase;
    // Получаем базу данных временных рядов
    TSDB := MB.ItemById["TSDB"].Bind() As IRubricator;
    // Отображаем измерение атрибутов в компоненте DimensionTree1
    uiDimensionNet1.Dimension := TSDB.FactAndValuesDimension;
    uiDimensionNet1.Active := True;
End Sub UserProc;

См. также:

IRubricator