IMetaHierarchyPosition.Offset

Синтаксис

Offset: Integer;

Описание

Свойство Offset возвращает число уровней от вершины иерархии до текущей позиции.

Пример

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

Sub Main;

Var

Mb: Imetabase;

Rubr: IMetabaseObject;

RubrInst: IRubricatorInstance;

Facts: IMetaDictionaryInstance;

Hierarchy: IMetaHierarchy;

HInstance: IMetaHierarchyInstance;

Position: IMetaHierarchyPosition;

Begin

Mb := MetabaseClass.Active;

Rubr := MB.ItemById("OBJ_FC").Edit;

RubrInst := Rubr.Open(Null) As IRubricatorInstance;

Facts := RubrInst.GetDictionary(RubricatorDictionary.Facts);

Hierarchy := Facts.Dictionary.DefaultHierarchy;

HInstance := Facts.OpenHierarchy(Hierarchy);

Position := HInstance.GetPathPosition("0");

Debug.WriteLine("Количество уровней от вершины: " + Position.Offset.ToString);

Debug.WriteLine("Родительский уровень: " + Position.Parent.Level.Name);

Debug.WriteLine("Уровень: " + Position.Level.Name);

Debug.WriteLine("Индекс уровня: " + Position.LevelIndex.ToString);

End Sub Main;

После выполнения примера в окно консоли будет выведена информация о позиции элемента справочника показателей, расположенного по пути «0».

См. также:

IMetaHierarchyPosition