|
Внешние печатные формы, не выводится макет | ☑ | ||
---|---|---|---|---|
0
jinny84
06.06.22
✎
12:27
|
Добрый день. Есть внешняя печатная форма, но при нажатие на печать с клиента, макет на печать не выводится, при этом не каких ошибок нет, не подскажите как исправить:
<CODE> Функция Печать(Идентификатор,назначение,МассивОбъектов) Экспорт //Адрес = ; //обр = ВнешниеОбработки.Создать(Адрес, Ложь); //обр.СсылкаНаОбъект = ЭтотОбъект.СсылкаНаОбъект; //Возврат обр.Печать(); ЗаполнитьРеквизитыПечати(); Если НЕ ПроверитьЗаполнение() Тогда Возврат Неопределено; КонецЕсли; ТабДок = Новый ТабличныйДокумент; Макет = ЭтотОбъект.ПолучитьМакет("ПФ_MXL_УПД"); ОбластьМакета = Макет.ПолучитьОбласть("Шапка"); СтруктураДанныеПечатиШапки = ДанныеПечатиШапки(назначение); ОбластьМакета.Параметры.Заполнить(СтруктураДанныеПечатиШапки); //ОбластьМакета.Параметры.ИдентификаторГосКонтракта = "Идентификатор государственного контракта, договора (соглашения) (при наличии): " + // СтруктураДанныеПечатиШапки.ИдентификаторГосКонтракта; ТабДок.Вывести(ОбластьМакета); ОбластьМакета = Макет.ПолучитьОбласть("ЗаголовокТаблицы"); ТабДок.Вывести(ОбластьМакета); ТабДок.ПовторятьПриПечатиСтроки = ТабДок.Области.ЗаголовокТаблицы; ОбластьМакета = Макет.ПолучитьОбласть("Строка"); ТаблицаПечатиТоваров = ТаблицаПечатиТоваров(назначение); // ТаблицаПечатиТоваров = ТаблицаПечатиТоваров(МассивОбъектов); Для каждого СтрокаТаблицы Из ТаблицаПечатиТоваров Цикл ОбластьМакета.Параметры.Заполнить(СтрокаТаблицы); ТабДок.Вывести(ОбластьМакета); КонецЦикла; ОбластьМакета = Макет.ПолучитьОбласть("Итого"); ОбластьМакета.Параметры.ИтогоСтоимость = ТаблицаПечатиТоваров.Итог("Стоимость"); ОбластьМакета.Параметры.ИтогоСуммаНДС = ТаблицаПечатиТоваров.Итог("СуммаНДС"); ОбластьМакета.Параметры.ИтогоВсего = ТаблицаПечатиТоваров.Итог("Всего"); ТабДок.Вывести(ОбластьМакета); ОбластьМакета = Макет.ПолучитьОбласть("Подвал"); СтруктураДанныеПечатиПодвала = ДанныеПечатиПодвала(назначение); ОбластьМакета.Параметры.Заполнить(СтруктураДанныеПечатиПодвала); ТабДок.Вывести(ОбластьМакета); ОбластьМакета = Макет.ПолучитьОбласть("ПодвалНакладной"); СтруктураДанныеПечатиПодвалаНакладной = ДанныеПечатиПодвалаНакладной(назначение); ОбластьМакета.Параметры.Заполнить(СтруктураДанныеПечатиПодвалаНакладной); ТабДок.Вывести(ОбластьМакета); ТабДок.ОриентацияСтраницы = ОриентацияСтраницы.Ландшафт; ТабДок.АвтоМасштаб = Истина; ТабДок.КлючПараметровПечати = "MTF-10122, универсальный передаточный документ"; ТабДок.ВерхнийКолонтитул.НачальнаяСтраница = 2; ТабДок.ВерхнийКолонтитул.ВертикальноеПоложение = ВертикальноеПоложение.Низ; ТабДок.ВерхнийКолонтитул.ТекстСлева = СтруктураДанныеПечатиШапки.Номер; ТабДок.ВерхнийКолонтитул.ТекстСправа = "Лист [&НомерСтраницы]"; ТабДок.ВерхнийКолонтитул.Выводить = Истина; КоличествоСтраниц = ТабДок.КоличествоСтраниц(); ПредставлениеКоличестваЛистов = "Документ составлен на " + КоличествоСтраниц + " " + ФормаМножественногоЧисла(КоличествоСтраниц, "листе", "листах", "листах"); ОбластьКоличествоЛистов = ТабДок.НайтиТекст("#КоличествоЛистов"); ОбластьКоличествоЛистов.Текст = ПредставлениеКоличестваЛистов; //ТабДок.Показать(""); Возврат ТабДок; КонецФункции </CODE> |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |