0
Zoeh
28.02.22
✎
07:49
|
ПечатныеФормы = УправлениеПечатью.СформироватьПечатныеФормы(ИмяМенеджераПечати, ИменаМакетов, МассивОбъектов, ПараметрыПечати, ДопустимыеТипыОбъектовПечати);
ТабДокУПД= ПечатныеФормы.КоллекцияПечатныхФорм[0].ТабличныйДокумент;
ПараметрыПечати = Новый Структура("ДополнитьКомплектВнешнимиПечатнымиФормами");
ПараметрыПечати.Вставить("ДополнитьКомплектВнешнимиПечатнымиФормами", Ложь);
ПараметрыПечати.Вставить("ИмяПараметровПечати","АктСверкиСПечатью");
СведенияОДокументе = Новый ТаблицаЗначений;
СведенияОДокументе.Колонки.Добавить("ДанныеШапки");
Нстр = СведенияОДокументе.Добавить();
СведенияОДокументеСтукт = Новый Структура;
СведенияОДокументеСтукт.Вставить("Документ",МассивОбъектов[0]);
СведенияОДокументеСтукт.Вставить("ГлавныйБухгалтер",Объект.ГлавныйБухгалтер);
СведенияОДокументеСтукт.Вставить("Руководитель",Объект.Руководитель);
СведенияОДокументеСтукт.Вставить("Организация",МассивОбъектов[0].Организация);
//Запрос = Новый Запрос();
//Запрос.УстановитьПараметр("МассивДокументов", МассивОбъектов);
//Запрос.Текст = ПолучитьТекстЗапросаДляФормированияПечатнойФормыАктСверки();
//
//Шапка = Запрос.Выполнить().Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам, "Документ");
//
//УправлениеПечатьюБП.ДополнитьДокументПодписьюИПечатью(ТабДокУПД, Шапка, МассивОбъектов, ПараметрыПечати);
Нстр.ДанныеШапки = СведенияОДокументеСтукт;
ОбъектыПечати = Новый СписокЗначений;
ОбъектыПечати.Добавить(МассивОбъектов[0]);
УправлениеПечатьюБП.ДополнитьДокументПодписьюИПечатью(ТабДокУПД, Нстр, ОбъектыПечати, ПараметрыПечати);
ИмяФайла = "d:\АктСверки.pdf";
ТабДокУПД.Записать(ИмяФайла, ТипФайлаТабличногоДокумента.PDF);
|
|