в последней релизе перестало работать:
внешняя обработка, рассылка програмнно упд на почту с печатями
убрали ДобавитьФаксимилеВФоне!!
походу надо заменить на что то новое, что изобрели 1с, но не приклеивается ни чего к этому коду ДобавитьФаксимилеПриОтправке это не хочет
подскажите как сейчас в новом релизе реализовать??
внешняя обработка, рассылка програмнно упд на почту с печатями
Если Макет ="ПФ_MXL_Акт" Тогда
//упд с печатями и подписями
КоллекцияПечатныхФорм = УправлениеПечатью.ПодготовитьКоллекциюПечатныхФорм ("УниверсальныйПередаточныйДокументКомплект");
ОбъектыПечати = Новый СписокЗначений;
ПараметрыВывода = УправлениеПечатью.ПодготовитьСтруктуруПараметровВывода();
МассивОбъектов = Новый Массив();
МассивОбъектов.Добавить(Документ);
ПараметрыПечати = Новый Структура;
ПараметрыПечати.Вставить("ДополнитьКомплектВнешнимиПечатнымиФормами", Ложь);
ИменаФайлов = Новый Соответствие;
ПечатныеФормы = Новый Массив;
УправлениеПечатью.ВывестиТабличныйДокументВКоллекцию(КоллекцияПечатныхФорм, "УниверсальныйПередаточныйДокументКомплект", "УПД",
УчетНДС.ПечатьКомплектаУПД(КоллекцияПечатныхФорм, МассивОбъектов, ОбъектыПечати, ИменаФайлов, ПараметрыПечати),,, ИменаФайлов);
ТабДок = КоллекцияПечатныхФорм[0].ТабличныйДокумент;
УправлениеПечатьюБП.ДобавитьФаксимилеВФоне(ТабДок,Документ);
Возврат ТабДок; Показатьубрали ДобавитьФаксимилеВФоне!!
походу надо заменить на что то новое, что изобрели 1с, но не приклеивается ни чего к этому коду ДобавитьФаксимилеПриОтправке это не хочет
подскажите как сейчас в новом релизе реализовать??
По теме из базы знаний
- Печатные формы для БП 3.0: УПД, ТОРГ-12, Акт, Счет-фактура, Доверенность, Счет
- УТ 11, КА 2, ERP 2: Настраиваемые под каждую организацию печать и подпись ответственных лиц в печатных формах (ТОРГ-12, Счёт-фактура, УПД, УКД, Заказ клиента, Акт сверки, М-15 и др.)
- Внешние печатные формы с факсимиле и без
- Вывод факсимиле в табличные документы (УПД, УКД, Счёт-фактура, ТОРГ-12 и др.) для 1С УТ 11.5, КА 2.5, ERP 2.5, УНФ 3, Розница 3
- УПД с факсимиле (с печатью, подписью и доверенностью) для УТ 11
Найденные решения
Пробуй
ТабличныйДокумент = КоллекцияПечатныхФорм[0].ТабличныйДокумент;
ПодписиИПечатиОбластей = УправлениеПечатью.ПодписиИПечатиОбластей(ОбъектыПечати, ПараметрыВывода);
ДанныеПечатиРисунковТабличногоДокумента = УправлениеПечатью.ПодписиИПечатиТабличногоДокумента(ОбъектыПечати, ТабличныйДокумент, "");
Для Каждого ПодписиИПечатиОбласти Из ПодписиИПечатиОбластей Цикл
ИмяОбласти = ПодписиИПечатиОбласти.Ключ;
Если ДанныеПечатиРисунковТабличногоДокумента[ИмяОбласти] = Неопределено Тогда
ДанныеПечатиРисунковТабличногоДокумента[ИмяОбласти] = Новый Соответствие();
КонецЕсли;
Для Каждого Элемент Из ПодписиИПечатиОбласти.Значение Цикл
ДанныеПечатиРисунковТабличногоДокумента[ИмяОбласти][Элемент.Ключ] = Элемент.Значение;
КонецЦикла;
КонецЦикла;
УправлениеПечатью.ДобавитьПодписьИПечать(ТабличныйДокумент, ДанныеПечатиРисунковТабличногоДокумента);
Возврат ТабличныйДокумент;
ПоказатьОстальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(3)
Костыль, конечно, но костыль хороший, полезный - снижается зависимость от возможных приколов программистов 1С, с одним из которых вы сейчас и столкнулись.
а это отправляется по почте клиентам
Значит, для отправки по почте не использовать типовой макет из конфигурации, а добавить в обработку свой, с факсимиле.
Костыль, конечно, но костыль хороший, полезный - снижается зависимость от возможных приколов программистов 1С, с одним из которых вы сейчас и столкнулись.
(5)
Возможно, придется скопировать и другие процедуры, в частности МожноВывестиФаксимиле() и УправлениеКартинкойФаксимиле() - не знаю, их тоже удалили или оставили? Проверить не на чем, последний доступный релиз - 3.0.146.35.
прямое с исправление текста обработки
Дак, тут все зависит от объема исправлений: в подобных случаях всегда можно скопировать в свою обработку код отсутствующей процедуры из релиза, где она еще была и вызывать уже ее.
Возможно, придется скопировать и другие процедуры, в частности МожноВывестиФаксимиле() и УправлениеКартинкойФаксимиле() - не знаю, их тоже удалили или оставили? Проверить не на чем, последний доступный релиз - 3.0.146.35.
Копай в сторону УправлениеПечатью.ДобавитьПодписьИПечать()
Вместо:
Используй:
Поищи в конфигурации по названиям функций, чтобы найти примеры их применения
Вместо:
УправлениеПечатьюБП.ДобавитьФаксимилеВФоне(ТабДок,Документ);Используй:
ПодписиИПечатиОбластей = УправлениеПечатью.ПодписиИПечатиОбластей(ОбъектыПечати, ПараметрыВывода);
УправлениеПечатью.ДобавитьПодписьИПечать(КоллекцияПечатныхФорм[0].ТабличныйДокумент, ПодписиИПечатиОбластей);
ТабДок = КоллекцияПечатныхФорм[0].ТабличныйДокумент;Поищи в конфигурации по названиям функций, чтобы найти примеры их применения
Пробуй
ТабличныйДокумент = КоллекцияПечатныхФорм[0].ТабличныйДокумент;
ПодписиИПечатиОбластей = УправлениеПечатью.ПодписиИПечатиОбластей(ОбъектыПечати, ПараметрыВывода);
ДанныеПечатиРисунковТабличногоДокумента = УправлениеПечатью.ПодписиИПечатиТабличногоДокумента(ОбъектыПечати, ТабличныйДокумент, "");
Для Каждого ПодписиИПечатиОбласти Из ПодписиИПечатиОбластей Цикл
ИмяОбласти = ПодписиИПечатиОбласти.Ключ;
Если ДанныеПечатиРисунковТабличногоДокумента[ИмяОбласти] = Неопределено Тогда
ДанныеПечатиРисунковТабличногоДокумента[ИмяОбласти] = Новый Соответствие();
КонецЕсли;
Для Каждого Элемент Из ПодписиИПечатиОбласти.Значение Цикл
ДанныеПечатиРисунковТабличногоДокумента[ИмяОбласти][Элемент.Ключ] = Элемент.Значение;
КонецЦикла;
КонецЦикла;
УправлениеПечатью.ДобавитьПодписьИПечать(ТабличныйДокумент, ДанныеПечатиРисунковТабличногоДокумента);
Возврат ТабличныйДокумент;
Показать
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот