Нахождение родителя стр 1

Нахождение родителя

Допустим имеем многоуровневый справочник и надо по текущему элементу, независимо на каком он уровне находится определить корневого родителя.

Алгоритм поиска заключается в следующем: от уровня где находится текущий элемент справочника поднимаемся на уровень вверх и просматриваем значение атрибута Родитель. Как только он окажется пустым - значит это корневой родитель.

Функцию поместим в глобальный модуль.

Функция НахождениеРодителя(Эл) Экспорт

Род = Эл;

Пока ПустоеЗначение(Род.Родитель)=0 Цикл

Род = Род.Родитель;

КонецЦикла;

Возврат Род;

КонецФункции

Теперь достаточно в любом модуле вызвать эту функцию: КорневойРодитель=НахождениеРодителя(<Наш элемент>);

Примечание: вроде бы в коде ничего особенного, но он настолько лаконичен, что я не мог удержаться, чтобы не привести его. Автор этого кода VZ, он прислал его мне несколько лет назад. Судя по форуму Т1С, ветераны в строю. Удачи тебе, Валера!