Доброе утро.
Конфигурация УТ 11 (11.5.22.72). Версия модуля 4.3.0.5.
Поломался экспорт печатных форм.
В типовой процедуре "Печать" модуля менеджера обработки ПечатьСчетовНаОплату требуется чтобы в параметре "ПараметрыПечати" было свойство "Представление".
| Код |
|---|
// Формирует печатные формы.
//
// Параметры:
// МассивОбъектов - см. УправлениеПечатьюПереопределяемый.ПриПечати.МассивОбъектов
// ПараметрыПечати - см. УправлениеПечатьюПереопределяемый.ПриПечати.ПараметрыПечати
// КоллекцияПечатныхФорм - см. УправлениеПечатьюПереопределяемый.ПриПечати.КоллекцияПечатныхФорм
// ОбъектыПечати - см. УправлениеПечатьюПереопределяемый.ПриПечати.ОбъектыПечати
// ПараметрыВывода - см. УправлениеПечатьюПереопределяемый.ПриПечати.ПараметрыВывода
//
Процедура Печать(МассивОбъектов, ПараметрыПечати, КоллекцияПечатныхФорм, ОбъектыПечати, ПараметрыВывода) Экспорт
Если УправлениеПечатью.НужноПечататьМакет(КоллекцияПечатныхФорм, "СчетНаОплату") Тогда
СтруктураТипов = ОбщегоНазначенияУТ.СоответствиеМассивовПоТипамОбъектов(МассивОбъектов);
УправлениеПечатью.ВывестиТабличныйДокументВКоллекцию(
КоллекцияПечатныхФорм,
"СчетНаОплату",
ПараметрыПечати.Представление,
СформироватьПечатнуюФормуСчетНаОплату(СтруктураТипов, ОбъектыПечати, ПараметрыПечати));
КонецЕсли;
|
Пока локально починил (для всех типов печатных форм не проверял). Добавив в процедуру "ОбработатьСобытиеТиповогоРобота" общего модуля "Б24_КА_РоботыИТриггерыСервер" добавил свойство в параметр следующим образом: ПараметрыПечати.Вставить("Представление", ПечатнаяФорма);
| Код |
|---|
ИначеЕсли ПечатнаяФорма = "Акт об оказании услуг" Тогда
ПараметрыПечати.Вставить("ОтображатьСкидки", Истина);
мИменаМакетов.Добавить("Акт");
ИмяМенеджераПечати = "Обработка.ПечатьАктОбОказанииУслуг";
ИначеЕсли ПечатнаяФорма = "Расходная накладная" Тогда
мИменаМакетов.Добавить("РеализацияТоваровУслуг");
ИмяМенеджераПечати = "Документ." + ИмяОбъекта;
ИначеЕсли ПечатнаяФорма = "ТОРГ-12 без услуг" Тогда
ПараметрыПечати.Вставить("ВыводитьУслуги", Ложь);
мИменаМакетов.Добавить("ТОРГ12");
ИмяМенеджераПечати = "Обработка.ПечатьОбщихФорм";
ИначеЕсли ПечатнаяФорма = "Коммерческое предложение" Тогда
ПараметрыПечати.Вставить("ОтображатьСкидки", Истина);
мИменаМакетов.Добавить("КоммерческоеПредложениеКлиенту");
ИмяМенеджераПечати = "Документ." + ИмяОбъекта;
КонецЕсли;
ПараметрыПечати.Вставить("Представление", ПечатнаяФорма); |
