БП3 Как во внешнюю печатную форму на УФ добавить выбор руководителя?
☑
0
Велимудр
05.02.15
✎
11:02
Есть внешняя форма акта, нужно при печати запросить ФИО руководителя.
Но т.к. функция "печать()" находится в модуле объекта, то не дает использовать никакие клиентские процедуры.
Как быть? Может в типовом механизме печати предусмотрено что то для взаимодействия с клиентом?
1
Naumov
05.02.15
✎
11:03
нужно делать внешнюю форму в режиме открытия формы. В этой форме выбирать все, что нужно и печатать.
2
deniseek
05.02.15
✎
11:03
(0) Зачем?
3
Велимудр
05.02.15
✎
11:07
(1) А как это сделать?
4
deniseek
05.02.15
✎
11:10
(3) В фнкции регистрации внешней обработки что у вас? вот там нужно изменить
5
Велимудр
05.02.15
✎
11:12
Сейчас посмотрю
6
Велимудр
05.02.15
✎
11:30
ДобавитьКоманду(ТаблицаКоманд,
НСтр("ru = 'Акт об оказании услуг (внешний)'"),
"Акт об оказании услуг (внешний)",
"ВызовСерверногоМетода",
Истина,
"ПечатьMXL");
7
deniseek
05.02.15
✎
11:35
(6) Вот в бсп:
Функция СведенияОВнешнейОбработке() Экспорт
ПараметрыРегистрации = ДополнительныеОтчетыИОбработки.СведенияОВнешнейОбработке("2.2.2.1");
ПараметрыРегистрации.Вид = ДополнительныеОтчетыИОбработкиКлиентСервер.ВидОбработкиПечатнаяФорма();
ПараметрыРегистрации.Версия = "1.3";
ПараметрыРегистрации.Назначение.Добавить("Документ._ДемоСчетНаОплатуПокупателю");
НоваяКоманда = ПараметрыРегистрации.Команды.Добавить();
НоваяКоманда.Представление = НСтр("ru = 'Счет на оплату (внешняя печатная форма)'");
НоваяКоманда.Идентификатор = "СчетЗаказ";
НоваяКоманда.Использование = ДополнительныеОтчетыИОбработкиКлиентСервер.ТипКомандыВызовСерверногоМетода();
НоваяКоманда.ПоказыватьОповещение = Истина;
НоваяКоманда.Модификатор = "ПечатьMXL";
НоваяКоманда = ПараметрыРегистрации.Команды.Добавить();
НоваяКоманда.Представление = НСтр("ru = 'Комплект документов (внешняя печатная форма)'");
НоваяКоманда.Идентификатор = "СчетЗаказ,СчетЗаказ,СчетЗаказ2";
НоваяКоманда.Использование = ДополнительныеОтчетыИОбработкиКлиентСервер.ТипКомандыВызовСерверногоМетода();
НоваяКоманда.ПоказыватьОповещение = Истина;
НоваяКоманда.Модификатор = "ПечатьMXL";
НоваяКоманда = ПараметрыРегистрации.Команды.Добавить();
НоваяКоманда.Представление = НСтр("ru = 'Гарантийное письмо (внешняя печатная форма)'");
НоваяКоманда.Идентификатор = "ГарантийноеПисьмо";
НоваяКоманда.Использование = ДополнительныеОтчетыИОбработкиКлиентСервер.ТипКомандыВызовСерверногоМетода();
НоваяКоманда.ПоказыватьОповещение = Истина;
НоваяКоманда.Модификатор = "ПечатьMXL";
Возврат ПараметрыРегистрации;
КонецФункции
8
deniseek
05.02.15
✎
11:35
(6) Обратите внимание на ПараметрыРегистрации.Вид = ДополнительныеОтчетыИОбработкиКлиентСервер.ВидОбработкиПечатнаяФорма();
Выдавать глобальные идеи — это удовольствие; искать сволочные маленькие ошибки — вот настоящая работа. Фредерик Брукс-младший