IMetaHierarchyAttributes.MoveAllTo

Синтаксис

MoveAllTo(Attributes: IMetaAttributesSet; LevelTo: IMetaHierarchyLevel; [IndexTo: Integer = -1);

Параметры

Attributes - набор атрибутов, который необходимо переместить.

LevelTo - уровень иерархии, на который нужно переместить набор атрибутов.

IndexTo - индекс позиции иерархии, в который нужно переместить набор атрибутов. Необязательный параметр.

Описание

Метод MoveAllTo осуществляет перемещение набора атрибутов на указанный уровень.

Пример

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

Sub Main;

Var

Mb: Imetabase;

Rubr: IRubricator;

Facts: IMetaDictionary;

Hierarchy: IMetaHierarchy;

HAttributes: IMetaHierarchyAttributes;

Begin

Mb := MetabaseClass.Active;

Rubr := MB.ItemById("OBJ_FC").Bind As IRubricator;

Facts := Rubr.Facts;

Hierarchy := Facts.DefaultHierarchy;

HAttributes := Hierarchy.Attributes;

HAttributes.MoveAllTo(HAttributes, Hierarchy.Levels.Item(0));

End Sub Main;

После выполнения примера все атрибуты будут перемещены на верхний уровень иерархии.

См. также:

IMetaHierarchyAttributes