IRubricatorFactorIO.FactDataKind

Синтаксис

FactDataKind: MetaAttributeKind;

Описание

Свойство FactDataKind определяет тип атрибута показателей, значения по которому необходимо загрузить либо сохранить.

Пример

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

Sub Main;

Var

MB: IMetabase;

RubInst: IRubricatorInstance;

Cub: ICubeInstance;

Dest: ICubeInstanceDestination;

Exe: ICubeInstanceDestinationExecutor;

Mat, DataMatr: IMatrix;

It: IMatrixIterator;

Begin

MB := MetabaseClass.Active;

RubInst := MB.ItemById("OBJ_RUBRICATOR").Open(Null) As IRubricatorInstance;

Cub := RubInst As ICubeInstance;

Dest := Cub.Destinations.DefaultDestination;

Exe := Dest.CreateExecutor;

//Атрибут показателей

(Exe As IRubricatorFactorIO).FactDataKind := MetaAttributeKind.Key;

//Атрибут наблюдений

(Exe As IRubricatorFactorIO).ValueKind := MetaAttributeKind.Revision;

Exe.PrepareExecute(Null);

Exe.PerformExecute;

Mat := Exe.Matrix;

//Значения по атрибуту Ключ

DataMatr := (CubeClass.ExecuteResult(Mat) As IRubricatorExecuteResult).Factors;

It := DataMatr.CreateIterator;

It.Move(IteratorDirection.First);

While It.Valid Do

Debug.WriteLine(It.Values(0));

It.Move(IteratorDirection.Next);

End While;

//Значения по атрибуту Ревизия

DataMatr := (CubeClass.ExecuteResult(Mat) As IRubricatorExecuteResult).Values;

It := DataMatr.CreateIterator;

It.Move(IteratorDirection.First);

While It.Valid Do

Debug.WriteLine(It.Values(0));

It.Move(IteratorDirection.Next);

End While;

End Sub Main;

После выполнения примера будут загружены и выведены в консоль среды разработки последние данные по двум атрибутам базы:

• по атрибуту показателей - Ключ;

• по атрибуту наблюдений - Ревизия.

См. также:

IRubricatorFactorIO