Вывод Структуры на печать в табличный документ



ТабДок = Новый ТабличныйДокумент;

Макет = Справочники.Контрагенты.ПолучитьМакет("ПечатьСтруктуры");

ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");

ОбластьПодвал = Макет.ПолучитьОбласть("Подвал");

ОбластьДетальныхЗаписей = Макет.ПолучитьОбласть("Детали");



ТабДок.Очистить();

ТабДок.Вывести(ОбластьЗаголовок);

//Перебор СТРУКТУРЫ и вывод в Табличный документ. РК - Структура с данными

Для Каждого Элемент из РК Цикл

//Сообщить(Элемент.Ключ + ": " + Элемент.Значение);

Если ТипЗнч(Элемент.Значение) = Тип("Структура") Тогда

Для Каждого ЭлементВ из Элемент.Значение Цикл

ОбластьДетальныхЗаписей.Параметры.Заполнить(ЭлементВ); ТабДок.Вывести(ОбластьДетальныхЗаписей);

КонецЦикла;

Иначе

ОбластьДетальныхЗаписей.Параметры.Заполнить(Элемент); ТабДок.Вывести(ОбластьДетальныхЗаписей);

КонецЕсли;

КонецЦикла;

ТабДок.Вывести(ОбластьПодвал);

УниверсальныеМеханизмы.НапечататьДокумент(ТабДок); // или ТабДок.Показать();




✍️ @odin1C_rus