...
(13)
Цитата |
---|
&НаКлиенте
Процедура Печать(ИдентификаторПечатнойФормы, ОбъектыНазначения) Экспорт
КоллекцияПечатныхФорм = ВывестиТабличныйДокументВКоллекцию(ИдентификаторПечатнойФормы, ОбъектыНазначения);
МодульУправлениеПечатьюКлиент = ОбщегоНазначенияКлиент.ОбщийМодуль("УправлениеПечатьюКлиент");
МодульУправлениеПечатьюКлиент.ПечатьДокументов(КоллекцияПечатныхФорм);
КонецПроцедуры |
По данной схеме сыпятся ошибки.
Вот такой вариант остается рабочим и сегодня.
Пример описания
Функция СведенияОВнешнейОбработке() Экспорт
ПараметрыРегистрации = Новый Структура;
ПараметрыРегистрации.Вставить("Вид", "ПечатнаяФорма");
ПараметрыРегистрации.Вставить("Назначение", ПолучитьНазначениеОбработки());
ПараметрыРегистрации.Вставить("Наименование", НСтр("ru = 'Заказ покупателя (Заказ на поиск и Заказ на самовывоз)'"));
ПараметрыРегистрации.Вставить("Версия", "20230327");
ПараметрыРегистрации.Вставить("БезопасныйРежим", Ложь);
ПараметрыРегистрации.Вставить("Информация", НСтр("ru = 'Заказ покупателя (Заказ на поиск и Заказ на самовывоз)'"));
ТаблицаКоманд = ПолучитьТаблицуКоманд();
ДобавитьКоманду(ТаблицаКоманд,
НСтр("ru = 'Заказ на поиск'"),
"ЗаказНаПоиск",
//"ВызовСерверногоМетода",
//"ОткрытиеФормы",
"ВызовКлиентскогоМетода",
Истина,
"ПечатьMXL");
ДобавитьКоманду(ТаблицаКоманд,
НСтр("ru = 'Заказ на самовывоз'"),
"ЗаказНаСамовывоз",
//"ВызовСерверногоМетода",
//"ОткрытиеФормы",
"ВызовКлиентскогоМетода",
Истина,
"ПечатьMXL");
ПараметрыРегистрации.Вставить("Команды", ТаблицаКоманд);
Возврат ПараметрыРегистрации;
КонецФункции
В форме
&НаКлиенте
Процедура Печать(ИмяКоманды, МассивОбъектов, ПараметрыПечати = неопределено, КоллекцияПечатныхФорм = неопределено, ОбъектыПечати = неопределено, ПараметрыВывода = неопределено) Экспорт
ВыполняемаяКоманда = Параметры;
ПараметрыОткрытия = Новый Структура("ИсточникДанных, ПараметрыИсточника");
ПараметрыОткрытия.ИсточникДанных = ВыполняемаяКоманда.ДополнительнаяОбработкаСсылка;
ПараметрыОткрытия.ПараметрыИсточника = Новый Структура("ИдентификаторКоманды, ОбъектыНазначения");
ПараметрыОткрытия.ПараметрыИсточника.ИдентификаторКоманды = ВыполняемаяКоманда.ИдентификаторКоманды;
ПараметрыОткрытия.ПараметрыИсточника.ОбъектыНазначения = ВыполняемаяКоманда.ОбъектыНазначения;
ОткрытьФорму("ОбщаяФорма.ПечатьДокументов", ПараметрыОткрытия);
КонецПроцедуры // Печать()