ValueKind: MetaAttributeKind;
Свойство ValueKind определяет тип атрибута наблюдений, значения по которому необходимо загрузить либо сохранить.
По умолчанию свойству установлено значение MetaAttributeKind.None, при этом будет осуществляться загрузка по атрибуту «Значение» (тип атрибута MetaAttributeKind.Value).
Для выполнения примера предполагается наличие в репозитории базы данных временных рядов с идентификатором «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;
После выполнения примера будут загружены и выведены в консоль среды разработки последние данные по двум атрибутам базы данных временных рядов:
по атрибуту показателей - Ключ
по атрибуту наблюдений - Ревизия
См. также: