0
Yulichka_RUS
26.01.21
✎
22:55
|
Добрый вечер всем, делаю обработку которая по выбранному пакету документов формирует УПД и сразу сохраняет пакеты документов в пдф формате. Честно я не сильна в этом пока что. У меня получилось сформировать пакеты УПДшек, только они открываются в окне печати и я не могу придумать как их сохранить в пдф. Помогите пожалуйста
|
|
4
timurhv
27.01.21
✎
00:50
|
(0) Можно сразу получить двоичные данные в pdf
МассивФорматыСохранения = Новый Массив();
МассивФорматыСохранения.Добавить(ТипФайлаТабличногоДокумента.PDF);
НастройкиСохранения = УправлениеПечатью.НастройкиСохранения();
НастройкиСохранения.Вставить("ПодписьИПечать", Ложь);
НастройкиСохранения.Вставить("ФорматыСохранения", МассивФорматыСохранения);
ТаблицаКомандПечати = УправлениеПечатью.КомандыПечатиОбъекта(Метаданные.Документы.ИМЯДОКУМЕНТА);
КомандаПечати = ТаблицаКомандПечати.Найти("ИМЯКОМАНДЫПЕЧАТИ", "Идентификатор");
Если КомандаПечати <> Неопределено Тогда
КоллекцияПечатныхФорм = УправлениеПечатью.НапечататьВФайл(КомандаПечати, МассивДокументовДляПечатиУПД, НастройкиСохранения);
Для Каждого СтрокаФайла Из КоллекцияПечатныхФорм Цикл
СтруктураФайла = Новый Структура("Наименование, Расширение, Размер, ДвоичныеДанные");
СтруктураФайла.Вставить("Наименование", СтрокаФайла.ИмяФайла);
СтруктураФайла.Вставить("Расширение", "pdf");
СтруктураФайла.Вставить("Размер", СтрокаФайла.ДвоичныеДанные.Размер());
СтруктураФайла.Вставить("ДвоичныеДанные", СтрокаФайла.ДвоичныеДанные);
...
КонецЦикла;
КонецЕсли;
|
|