Проверка на принадлежность ссылки иерархии

Функция ЭтаСсылкаВИерархии(Ссылка,Родитель) Экспорт

Запрос = Новый Запрос;
ТекстЗапроса = "ВЫБРАТЬ
|	ТаблицаИсточник.Ссылка КАК Ссылка
|ИЗ
|	&ИмяСправочника КАК ТаблицаИсточник
|ГДЕ
|	ТаблицаИсточник.Ссылка В ИЕРАРХИИ(&Родитель)
|	И ТаблицаИсточник.Ссылка = &Ссылка";

ТекстЗапроса = СтрЗаменить(ТекстЗапроса, "&ИмяСправочника",ОбщегоНазначения.ИмяТаблицыПоСсылке(Ссылка));

Запрос.Текст = ТекстЗапроса;
Запрос.УстановитьПараметр("Родитель",Родитель);
Запрос.УстановитьПараметр("Ссылка",Ссылка);

Результат = Запрос.Выполнить();

Возврат Не Результат.Пустой();

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