Добрый день. Подскажиет как получить всех родетелей елемента справочника
kostya77 @ Сегодня, 15:23 необходимо зарегистрироваться для просмотра ссылки
,
ПолныйКод()
Синтаксис:
ПолныйКод()
Назначение:
Возвращает строку, содержащую полный код выбранного элемента справочника со всеми вышестоящими уровнями, разделенными символом /.
volodya1122
19.02.24, 16:21
kostya77 @ 15.02.24, 14:23
необходимо зарегистрироваться для просмотра ссылки
,
Якщо потрібно ссилки на кожнного родителя
// ЭлСправ- ссилка на конкректний елемент справочника
Если Метаданные.Справочники.МойСправочник.ОграничиватьКоличествоУровней тогда
МаксимумУровней=Метаданные.Справочники.МойСправочник.КоличествоУровней;
иначе
МаксимумУровней=100; // хватає з великим запасорв в реальних базах
КонецЕсли;
Сообщить(ЭлСправ.ПолныйКод());
Ел1=ЭлСправ;
Для к=1 по МаксимумУровней цикл
Ел1=Ел1.Родитель; // по ссилці
Если Ел1=Справочники.МойСправочник.ПустаяСсылка() тогда
Прервать;
КонецЕсли;
Сообщить("-"+к+"-"+Ел1.Наименование);
КонецЦикла;
Этот код от 1С 8.
andrew76 @ Сегодня, 20:06
необходимо зарегистрироваться для просмотра ссылки
,
Запрос = СоздатьОбъект("Запрос");
ТекстЗапроса =
"//{{ЗАПРОС(Сформировать)
|Обрабатывать НеПомеченныеНаУдаление;
|Период с ДатаАкт по ДатаАкт;
|Сотр = Справочник.Сотрудники.ТекущийЭлемент;
|Без итогов;
|группировка Сотр;
|"//}}ЗАПРОС
;
// Если ошибка в запросе, то выход из процедур
Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
Возврат;
КонецЕсли;
Пока Запрос.Группировка() = 1 Цикл
Сообщить(Запрос.Сотр.ПолныйКод());
КонецЦикла;
Родитель = СсылкаНаОбъект.Родитель;
Пока Родитель.Выбран() = 1 Цикл
Сообщить(Родитель);
Родитель = Родитель.Родитель;
КонецЦикла;