Формирование печатной формы документа

1. user1809279 14.11.24 14:38 Сейчас в теме
Поскольку убрали метод УправлениеПечатьюБП.ДобавитьФаксимилеВФоне(ТабДок, Ссылка)

Процедура СформироватьПечатнуюФорму(ТабДокумент, ОбъектыПечати) Экспорт

ПараметрыВывода = Новый Структура;
ПараметрыВывода.Вставить("ДоступнаПечатьПоКомплектно", Ложь);
ПараметрыВывода.Вставить("ЗаголовокФормы", "");
ПараметрыВывода.Вставить("ИмяФайлаПоВходящимНомерам", Истина);
ПараметрыВывода.Вставить("КодЯзыка", "ru");
ПараметрыВывода.Вставить("ПараметрыОтправки", Новый Структура("Получатель, Текст, Тема", Неопределено, "", ""));

ПодписиИПечати = ПодписиИПечатиТабличногоДокумента(ТабДокумент);
ПодписиИПечатиОбластей = УправлениеПечатью.ПодписиИПечатиОбластей(ОбъектыПечати);

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

РисункиТабличногоДокумента = ПодписиИПечати;
Для Каждого СохраненныйРисунок Из РисункиТабличногоДокумента Цикл
НовыйРисунок = ТабДокумент.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Картинка);
ЗаполнитьЗначенияСвойств(НовыйРисунок, СохраненныйРисунок);
НовыйРисунок.Линия = Новый Линия(ТипЛинииРисункаТабличногоДокумента.НетЛинии);
КонецЦикла;

ДанныеПечатиРисунковТабличногоДокумента = УправлениеПечатью.ПодписиИПечатиТабличногоДокумента(ОбъектыПечати, ТабДокумент, "ru");
Для Каждого ПодписиИПечатиОбласти Из ПодписиИПечатиОбластей Цикл
ИмяОбласти = ПодписиИПечатиОбласти.Ключ;
Если ДанныеПечатиРисунковТабличногоДокумента[ИмяОбласти] = Неопределено Тогда
ДанныеПечатиРисунковТабличногоДокумента[ИмяОбласти] = Новый Соответствие();
КонецЕсли;
Для Каждого Элемент Из ПодписиИПечатиОбласти.Значение Цикл
ДанныеПечатиРисунковТабличногоДокумента[ИмяОбласти][Элемент.Ключ] = Элемент.Значение;
КонецЦикла;
КонецЦикла;

УправлениеПечатью.ДобавитьПодписьИПечать(ТабДокумент, ДанныеПечатиРисунковТабличногоДокумента);
КонецПроцедуры

Функция ПодписиИПечатиТабличногоДокумента(ТабличныйДокумент) Экспорт

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

Для Каждого Рисунок Из ТабличныйДокумент.Рисунки Цикл
Если УправлениеПечатью.ЭтоПодписьИлиПечать(Рисунок) Тогда
ОписаниеРисунка = Новый Структура("Лево,Верх,Ширина,Высота,Картинка,Владелец,ЦветФона,Имя,Линия,
|РазмерКартинки,ВертикальноеПоложение,ГоризонтальноеПоложение");
ЗаполнитьЗначенияСвойств(ОписаниеРисунка, Рисунок);
РисункиТабличногоДокумента.Добавить(ОписаниеРисунка);
КонецЕсли;
КонецЦикла;

Возврат РисункиТабличногоДокумента;

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

используют метод УправлениеПечатью.ДобавитьПодписьИПечать

ТабДок = СформироватьПечатнуюФорму(ТЗ.ДокументСчета);

Но как обратиться к процедуре чтоб сформировать, если табличный документ формируется с этой процедуры?
По теме из базы знаний
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
Оставьте свое сообщение

Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот