Автоматическая отправка документов "Счет покупателю" в формате PDF через ЭДО

18.03.24

Интеграция - ЭДО и ОФД

+4 –

Расширение предназначено для автоматической отправки документов «Счет на оплату покупателю» в формате PDF через ЭДО штатными механизмами конфигурации. Расширение для автоматической отправки документов «Счет покупателю» в формате PDF через ЭДО.

Скачать файл

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование		По подписке [?]	Купить один файл
Расширение для автоматической отправки документов «Счет покупателю» в формате PDF через ЭДО : .cfe 64,41Kb ver:1.4 54	54	Скачать (10 SM)	Купить за 4 550 руб.

Расширение для автоматической отправки документов «Счет покупателю» в формате PDF через ЭДО.

Возможности расширения: Отправка документов «Счет на оплату покупателю» в формате PDF через ЭДО, тем контрагентам которым это необходимо.

Установка и использование расширения:

Расширение предназначено для конфигурации «Бухгалтерия предприятия, редакция 3.0» релиза 3.0.149.28.
Может использоваться на платформе 8.3.22.х и старше
Подключение: Установить Расширение может пользователь с полными правами.Установка производится в меню Администрирование – Печатные формы, отчеты и обработки – Расширения. В открывшейся форме необходимо по кнопке Добавить из файла, выбрать файл расширения. После добавления файла расширения в список необходимо в открывшейся форме отключить флаг Безопасный режим и перезапустить программу.

Инструкция по использованию:

После подключения расширения и после каждого обновления надо с помощью обработки из меню «Администрирование – Сервис - Заполнение регистров сведений (PDF в ЭДО)» заполнить регистры сведений: кнопка «Заполнить регистры».

В контрагенте в меню «ЭДО – Настройки отправки документов» у документа «Счет покупателю» устанавливаем формат отправки «PDF» и флажок «Не обновлять версию формата автоматически».

Теперь счета покупателя для этого контрагента будут формироваться в формате «PDF» как при создании из формы документа «Счет покупателю» через меню «ЭДО – Просмотреть электронный документ», так и из обработки «Текущие дела по ЭДО» по кнопке «Создать, подписать, оправить».

В результате формируется «Исходящий документ ЭДО» с видом «Счет на оплату» и заполненными полями: «Номер», «Дата» и «Сумма», с вложением файла печатной формы счета в формате «*.pdf». При отправке из обработки «Текущие дела по ЭДО» документ сразу подписывается и отправляется контрагенту.

Тестировалась на релизе "БП 3.0.149.28" платформа 8.3.23.х.

Проверено на следующих конфигурациях и релизах:

Бухгалтерия предприятия, редакция 3.0, релизы 3.0.149.28

PDF ЭДО ПДФ Счет покупателю

+4 –

См. также

Интеграция 1С с приложением "Госключ" Электронная подпись

Бюджетный учет ЭДО и ОФД Бухгалтер Пользователь Платформа 1С v8.3 1С:Бухгалтерия государственного учреждения 1С:Документооборот 1С:ERP Управление предприятием 2 1С:Зарплата и кадры государственного учреждения 3 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Зарплата и Управление Персоналом 3.x 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Россия Бухгалтерский учет Бюджетный учет Платные (руб)

Расширение для автоматизации процесса подписания электронных документов в мобильном приложении "Госключ" с видом подписи УКЭП/УНЭП, которое подходит для электронного подписания бухгалтерских документов, список которых утвержден в приказе Минфина №61н «Об утверждении унифицированных форм электронных документов бухгалтерского учета…»

500000 руб.

06.11.2024 574 1 0

Государственные контракты в УТ 11.5, КА 2.5.с выгрузкой в ЕИС (Госзакупки)

Регламентированный учет и отчетность Обмен с ГосИС ЭДО и ОФД Бухгалтер Пользователь Платформа 1С v8.3 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Оптовая торговля, дистрибуция, логистика Россия Управленческий учет Платные (руб)

Работаете по контрактной схеме, сталкивались с проблемой, что в контракте жестко указаны наименование, цена, единица измерения товара. И не все готовы создавать новую номенклатуру под каждый контракт или менять наименование и единицу измерения для уже имеющейся. Тем более, бывает так, что контракт - это формальность. Контракт не описывает жесткие условия поставки, нужно соблюсти правильность в предоставлении документов. Данное решение позволит вам оперировать своей номенклатурой при оформлении реализаций по государственному контракту в УТ 11.5 и КА 2.5.11, в то же время выводить на печать документы, соответствующие данным контракта. Реализована выгрузка для сайта госзакупок (ЕИС) по 44-ФЗ.

60000 руб.

19.12.2022 12234 34 20

Согласование документов для физических лиц “Подпислон”

ЭДО и ОФД Учет документов 8.3.14 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Россия Платные (руб)

ПОДПИСЫВАЙТЕ ДОКУМЕНТЫ С ФИЗЛИЦАМИ ПО СМС. Ваши клиенты и сотрудники смогут подписывать документы простой электронной подписью (ПЭП) без визита к вам в офис. С телефона или компьютера без установки приложений и регистраций.

29990 руб.

28.05.2024 1531 5 0

Загрузка данных из ОФД в 1С:Бухгалтерию 3.0, 1С:КА 2.4, 2.5, УНФ 1.6/3.0 о денежных поступлениях (чеках)

Кассовые операции ЭДО и ОФД Бухгалтер Платформа 1С v8.3 Бухгалтерский учет 1С:Управление нашей фирмой 1.6 1С:Бухгалтерия 3.0 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 Россия Бухгалтерский учет Платные (руб)

Согласно 54-ФЗ по правилам ведения кассовых операций необходимо оформлять приходные кассовые ордера (ПКО) и расходные кассовые ордера (РКО) на основании чеков ККМ. Все данные о чеках, можно взять на сайте оператора фискальных данных (ОФД). Обработка загрузки данных из ОФД в 1С сделает за вас в 1С - ПКО и РКО, Операции по платежным картам или Отчет о розничных продажах (может создать номенклатуру в 1С, указать налоги и др. реквизиты в документах в зависимости от налогообложения ККМ в торговой точке).

5640 руб.

09.08.2017 152178 903 372

549

Загрузка чеков в 1С из ФНС в документы БП, УНФ, ERP, КА и УТ

Кассовые операции Файловый обмен (TXT, XML, DBF), FTP ЭДО и ОФД Программист Бухгалтер Пользователь Платформа 1С v8.3 Бухгалтерский учет 1С:Управление нашей фирмой 1.6 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 Россия Бухгалтерский учет Налоговый учет Управленческий учет Платные (руб)

В публикации размещены специализированные обработки для загрузки кассовых чеков в базах 1С (для локальных баз): 1С:БП 3.0, 1С:УНФ 3.0, 1С:КА. 2.5, 1С:ERP Управление предприятием, ред. 2 и 1С:УТ 11.5. Вы просто сканируете QR коды с бумажных и электронных чеков c помощью мобильного приложения ФНС и чеки автоматически (без ручного ввода) загружаются в документы 'Авансовый отчет', 'Расходы предпринимателя', 'Путевой лист', 'Приходная накладная', 'Поступление (акты, накладные, УПД)', 'Приобретение товаров и услуг', 'Отчет о розничных продажах' и 'Поступление денежных документов'.

12960 руб.

19.08.2020 69383 343 80

225

Выгрузка УПД в формате XML для ЭДО

Файловый обмен (TXT, XML, DBF), FTP ЭДО и ОФД Программист Бухгалтер Платформа 1С v8.3 Оперативный учет 1С:Управление торговлей 10 1С:Управление нашей фирмой 1.6 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 Бухгалтерский учет Платные (руб)

Данные обработки позволяют выгружать документ УПД в формате xml. (В ФАЙЛ) для ЭДО в 1С: УТ, БП, КА версии ПРОФ и БАЗОВЫЕ

2400 руб.

25.09.2019 94095 1145 608

499

Автоматизация подписания внутренних электронных документов 1С БГУ 2

Регламентированный учет и отчетность ЭДО и ОФД Платформа 1С v8.3 1С:Бухгалтерия государственного учреждения Государственные, бюджетные структуры Россия Бухгалтерский учет Платные (руб)

Три расширения для автоматизации, настройки и заполнения подписантов для внутреннего ЭДО из документов 1С БГУ 2

12000 руб.

22.11.2023 2001 19 12

Загрузка в 1С документов поступления из файла XML (ЭДО формат 820) для БП 3.0, УТ10/11, КА2.5, УПП1.3

ЭДО и ОФД Загрузка и выгрузка в Excel Бухгалтер Бухгалтерский учет 1С:Управление торговлей 10 1С:Управление производственным предприятием 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Бухгалтерский учет Платные (руб)

Кто получает документы в формате XML из различных сервисов ЭДО (формат 820 приказ ФНС 31 мая 2019) и набивает их вручную в 1С, тот наверняка хотел бы автоматизировать этот процесс. Поддержка конфигураций: Бухгалтерии 3, УПП 1.3, 1С:КА 2.4 и 1С:КА 2.5, УТ10, УТ11.4 и УТ11.5.

3600 руб.

11.02.2020 93009 301 156

222

Комментарии

Подписаться на ответы Инфостарт бот

Свернуть все

1. Гость 25.03.22 15:58

Добрый день! Работает ли данная обработка в облачной версии БП 3.0?

3. sevarm 64 25.03.22 19:22 Сейчас в теме

(1) Добрый день! Не проверял, но должно работать, т.к. используются типовые методы конфигурации, за исключением того что файл PDF вставляется в электронный документ.

2. sevarm 64 25.03.22 19:21 Сейчас в теме

Добрый день! Не проверял, но должно работать, т.к. используются типовые методы конфигурации, за исключением того что файл PDF вставляется в электронный документ.

4. пользователь 25.07.22 12:52

Сообщение было скрыто модератором.

...

6. пользователь 25.07.22 16:21

Сообщение было скрыто модератором.

...

5. пользователь 25.07.22 16:19

Сообщение было скрыто модератором.

...

7. s-a-n-t-a 03.08.22 21:12 Сейчас в теме

Здравствуйте. В базе Бухгалтерия предприятия, редакция 3.0 (3.0.116.27) перестало все работать. "Значение не является значением объектного типа (НовыйДокумент)
{ОбщийМодуль.ИнтерфейсДокументовЭДОВызовСервера.Модуль(14)}:Если ПараметрыОткрытия.НовыйДокумент Тогда
{пдф_ОтправкаСчетовЧерезЭДОвPDF ОбщийМодуль.ИнтерфейсДокументовЭДОКлиент.Модуль(48)}:ПараметрыПросмотра = ИнтерфейсДокументовЭДОВызовСервера.ПараметрыПросмотраЭлектронногоДокументаПоОбъектуУчета(ОбъектУчета, ДополнительныеПараметры);
{ОбщийМодуль.ИнтерфейсДокументовЭДОКлиент.Модуль(732)}:ОткрытьЭлектронныйДокументОбъектаУчета(Форма.Объект.Ссылка);
{ОбщийМодуль.ОбменСКонтрагентамиКлиент.Модуль(338)}:ИнтерфейсДокументовЭДОКлиент.КонтроллерСостояниеЭДОНажатие(Форма, СтандартнаяОбработка);
{Документ.СчетНаОплатуПокупателю.Форма.ФормаДокумента.Форма(646)}:ОбменСКонтрагентамиКлиент.СостояниеЭДОНажатие_ФормаДокумента(ЭтотОбъект, СтандартнаяОбработка);"

Обработка очень очень нужная, сможете исправить? И начальное заполнение форматов счетов на формат pdf (массовое) тоже перестало работать. Ничего не происходит и все. форматы не меняются xml на Pdf

9. user1811170 05.08.22 17:18 Сейчас в теме

(7) Можете сами исправления в расширение внести.

10. user1811170 05.08.22 17:22 Сейчас в теме

(9)Надо заменить в следующих модулях расширения процедуры и функции под спойлером:

Модуль ИнтеграцияЭДО:
Функция пдф_ОписаниеДанныхОбъектаУчета(ОбъектУчета, Параметры) Экспорт Результат = НовыйРезультатФормированияДанныхОбъектаУчета(); Формат = Параметры.Формат; ТипДокумента = Параметры.ТипДокумента; Если Не ЗначениеЗаполнено(Формат) ИЛИ ТипДокумента = Перечисления.ТипыДокументовЭДО.Прикладной Тогда Результат.СвязующийОбъектУчета = ОбъектУчета; Результат.Основания.Добавить(ОбъектУчета); Возврат Результат; КонецЕсли; Форматы = ЭлектронныеДокументыЭДО.ПоддерживаемыеФорматы(); ТипыДокументов = ЭлектронныеДокументыЭДО.СтандартныеТипыДокументов(); Если Формат = Форматы.CML208 Тогда Если ТипДокумента = ТипыДокументов.КаталогТоваров Тогда Результат = КаталогТоваров_ДанныеУчета(ОбъектУчета, Параметры); ИначеЕсли ТипДокумента = ТипыДокументов.ПрайсЛист Тогда Результат = ПрайсЛист_ДанныеУчета(ОбъектУчета, Параметры); ИначеЕсли ТипДокумента = ТипыДокументов.СчетНаОплату Тогда Результат = СчетНаОплату_ДанныеУчета(ОбъектУчета, Параметры); ИначеЕсли ТипДокумента = ТипыДокументов.ЗаказТовара Тогда Результат = ЗаказПоставщику_ДанныеУчета(ОбъектУчета, Параметры); ИначеЕсли ТипДокумента = ТипыДокументов.ОтветНаЗаказ Тогда Результат = ЗаказПокупателя_ДанныеУчета(ОбъектУчета, Параметры); ИначеЕсли ТипДокумента = ТипыДокументов.ОтчетОПродажахКомиссионногоТовара Тогда Результат = ОтчетОПродажах_ДанныеУчета(ОбъектУчета, Параметры); ИначеЕсли ТипДокумента = ТипыДокументов.ОтчетОСписанииКомиссионногоТовара Тогда Результат = ОтчетОСписании_ДанныеУчета(ОбъектУчета, Параметры); ИначеЕсли ТипДокумента = ТипыДокументов.РеквизитыОрганизации Тогда Результат = РеквизитыОрганизации_ДанныеУчета(ОбъектУчета, Параметры); Иначе СтрокаСообщенияИсключения = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку( НСтр("ru = 'Формат ""%1"" с типом документа ""%2"" не поддерживается.'"), Формат, ТипДокумента); ВызватьИсключение СтрокаСообщенияИсключения; КонецЕсли; ИначеЕсли Формат = Форматы.CML402 Тогда Если ТипДокумента = ТипыДокументов.ПередачаТоваровМеждуОрганизациями Тогда Результат = ПередачаТовараМеждуОрганизациями_ДанныеУчета(ОбъектУчета, Параметры); ИначеЕсли ТипДокумента = ТипыДокументов.ВозвратТоваровМеждуОрганизациями Тогда Результат = ВозвратТовараМеждуОрганизациями_ДанныеУчета(ОбъектУчета, Параметры); Иначе СтрокаСообщенияИсключения = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку( НСтр("ru = 'Формат ""%1"" с типом документа ""%2"" не поддерживается.'"), Формат, ТипДокумента); ВызватьИсключение СтрокаСообщенияИсключения; КонецЕсли; ИначеЕсли Формат = Форматы.ФНС.УПД.ИнформацияПродавца Тогда СтрокаСообщенияИсключения = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку( НСтр("ru = 'Формирование документа в формате ""%1"" не поддерживается.'"), Формат); ВызватьИсключение СтрокаСообщенияИсключения; ИначеЕсли Формат = Форматы.ФНС.УПД.ИнформацияПокупателя Тогда Результат = УПД_ИнформацияПокупателя_ДанныеУчета(ОбъектУчета, Параметры); ИначеЕсли Формат = Форматы.ФНС.УПД2019.ИнформацияПродавца Тогда Результат = УПД2019_ИнформацияПродавца_ДанныеУчета(ОбъектУчета, Параметры); ИначеЕсли Формат = Форматы.ФНС.УПД2019.ИнформацияПокупателя Тогда Результат = УПД2019_ИнформацияПокупателя_ДанныеУчета(ОбъектУчета, Параметры); ИначеЕсли Формат = Форматы.ФНС.УКД.ИнформацияПродавца Тогда Результат = УКД_ИнформацияПродавца_ДанныеУчета(ОбъектУчета, Параметры); ИначеЕсли Формат = Форматы.ФНС.УКД.ИнформацияПокупателя Тогда Результат = УКД_ИнформацияПокупателя_ДанныеУчета(ОбъектУчета, Параметры); ИначеЕсли Формат = Форматы.ФНС.УКД2020.ИнформацияПродавца Тогда Результат = УКД2020_ИнформацияПродавца_ДанныеУчета(ОбъектУчета, Параметры); ИначеЕсли Формат = Форматы.ФНС.УКД2020.ИнформацияПокупателя Тогда Результат = УКД2020_ИнформацияПокупателя_ДанныеУчета(ОбъектУчета, Параметры); ИначеЕсли Формат = Форматы.ФНС.ПередачаТоваров.ИнформацияПродавца Тогда Результат = ПередачаТоваров_ИнформацияПродавца_ДанныеУчета(ОбъектУчета, Параметры); ИначеЕсли Формат = Форматы.ФНС.ПередачаТоваров.ИнформацияПокупателя Тогда Результат = ПередачаТоваров_ИнформацияПокупателя_ДанныеУчета(ОбъектУчета, Параметры); ИначеЕсли Формат = Форматы.ФНС.ПередачаРабот.ИнформацияПродавца Тогда Результат = ПередачаУслуг_ИнформацияПродавца_ДанныеУчета(ОбъектУчета, Параметры); ИначеЕсли Формат = Форматы.ФНС.ПередачаРабот.ИнформацияПокупателя Или Формат = Форматы.ФНС.ПриемкаСдачаРабот.ИнформацияПокупателя Тогда Результат = ПередачаУслуг_ИнформацияПокупателя_ДанныеУчета(ОбъектУчета, Параметры); ИначеЕсли Формат = Форматы.ФНС.АктОРасхождениях.ИнформацияПокупателя Тогда Результат = АктОРасхождениях_ИнформацияПокупателя_ДанныеУчета(ОбъектУчета, Параметры); ИначеЕсли Формат = Форматы.БизнесСеть.КоммерческоеПредложение Тогда Результат = КоммерческоеПредложение_ДанныеУчета(ОбъектУчета, Параметры); ИначеЕсли Формат = Форматы.БизнесСеть.ЗапросКоммерческогоПредложения Тогда Результат = ЗапросКоммерческогоПредложения_ДанныеУчета(ОбъектУчета, Параметры); ИначеЕсли Формат = "PDF" Тогда //СеВа Результат = СчетНаОплату_ДанныеУчета(ОбъектУчета, Параметры); Иначе СтрокаСообщенияИсключения = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку( НСтр("ru = 'Формат ""%1"" не поддерживается.'"), Формат); ВызватьИсключение СтрокаСообщенияИсключения; КонецЕсли; // Нормализуем данные, которые приходят из переопределяемой части. Результат.Основания = ОбщегоНазначенияКлиентСервер.СвернутьМассив(Результат.Основания); Если Не ЗначениеЗаполнено(Результат.СвязующийОбъектУчета) Тогда Результат.СвязующийОбъектУчета = ОбъектУчета; КонецЕсли; Возврат Результат; КонецФункции

Модуль ИнтеграцияЭДО:

Функция пдф_ОписаниеДанныхОбъектаУчета(ОбъектУчета, Параметры) Экспорт

Результат = НовыйРезультатФормированияДанныхОбъектаУчета();

Формат = Параметры.Формат;
ТипДокумента = Параметры.ТипДокумента;
Если Не ЗначениеЗаполнено(Формат)
ИЛИ ТипДокумента = Перечисления.ТипыДокументовЭДО.Прикладной Тогда
Результат.СвязующийОбъектУчета = ОбъектУчета;
Результат.Основания.Добавить(ОбъектУчета);
Возврат Результат;
КонецЕсли;

Форматы = ЭлектронныеДокументыЭДО.ПоддерживаемыеФорматы();
ТипыДокументов = ЭлектронныеДокументыЭДО.СтандартныеТипыДокументов();

Если Формат = Форматы.CML208 Тогда

Если ТипДокумента = ТипыДокументов.КаталогТоваров Тогда

Результат = КаталогТоваров_ДанныеУчета(ОбъектУчета, Параметры);

ИначеЕсли ТипДокумента = ТипыДокументов.ПрайсЛист Тогда

Результат = ПрайсЛист_ДанныеУчета(ОбъектУчета, Параметры);

ИначеЕсли ТипДокумента = ТипыДокументов.СчетНаОплату Тогда

Результат = СчетНаОплату_ДанныеУчета(ОбъектУчета, Параметры);

ИначеЕсли ТипДокумента = ТипыДокументов.ЗаказТовара Тогда

Результат = ЗаказПоставщику_ДанныеУчета(ОбъектУчета, Параметры);

ИначеЕсли ТипДокумента = ТипыДокументов.ОтветНаЗаказ Тогда

Результат = ЗаказПокупателя_ДанныеУчета(ОбъектУчета, Параметры);

ИначеЕсли ТипДокумента = ТипыДокументов.ОтчетОПродажахКомиссионногоТовара Тогда

Результат = ОтчетОПродажах_ДанныеУчета(ОбъектУчета, Параметры);

ИначеЕсли ТипДокумента = ТипыДокументов.ОтчетОСписанииКомиссионногоТовара Тогда

Результат = ОтчетОСписании_ДанныеУчета(ОбъектУчета, Параметры);

ИначеЕсли ТипДокумента = ТипыДокументов.РеквизитыОрганизации Тогда

Результат = РеквизитыОрганизации_ДанныеУчета(ОбъектУчета, Параметры);

Иначе

СтрокаСообщенияИсключения = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Формат ""%1"" с типом документа ""%2"" не поддерживается.'"), Формат, ТипДокумента);

ВызватьИсключение СтрокаСообщенияИсключения;

КонецЕсли;

ИначеЕсли Формат = Форматы.CML402 Тогда

Если ТипДокумента = ТипыДокументов.ПередачаТоваровМеждуОрганизациями Тогда

Результат = ПередачаТовараМеждуОрганизациями_ДанныеУчета(ОбъектУчета, Параметры);

ИначеЕсли ТипДокумента = ТипыДокументов.ВозвратТоваровМеждуОрганизациями Тогда

Результат = ВозвратТовараМеждуОрганизациями_ДанныеУчета(ОбъектУчета, Параметры);

Иначе

СтрокаСообщенияИсключения = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Формат ""%1"" с типом документа ""%2"" не поддерживается.'"), Формат, ТипДокумента);

ВызватьИсключение СтрокаСообщенияИсключения;

КонецЕсли;

ИначеЕсли Формат = Форматы.ФНС.УПД.ИнформацияПродавца Тогда

СтрокаСообщенияИсключения = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Формирование документа в формате ""%1"" не поддерживается.'"), Формат);

ВызватьИсключение СтрокаСообщенияИсключения;

ИначеЕсли Формат = Форматы.ФНС.УПД.ИнформацияПокупателя Тогда

Результат = УПД_ИнформацияПокупателя_ДанныеУчета(ОбъектУчета, Параметры);

ИначеЕсли Формат = Форматы.ФНС.УПД2019.ИнформацияПродавца Тогда

Результат = УПД2019_ИнформацияПродавца_ДанныеУчета(ОбъектУчета, Параметры);

ИначеЕсли Формат = Форматы.ФНС.УПД2019.ИнформацияПокупателя Тогда

Результат = УПД2019_ИнформацияПокупателя_ДанныеУчета(ОбъектУчета, Параметры);

ИначеЕсли Формат = Форматы.ФНС.УКД.ИнформацияПродавца Тогда

Результат = УКД_ИнформацияПродавца_ДанныеУчета(ОбъектУчета, Параметры);

ИначеЕсли Формат = Форматы.ФНС.УКД.ИнформацияПокупателя Тогда

Результат = УКД_ИнформацияПокупателя_ДанныеУчета(ОбъектУчета, Параметры);

ИначеЕсли Формат = Форматы.ФНС.УКД2020.ИнформацияПродавца Тогда

Результат = УКД2020_ИнформацияПродавца_ДанныеУчета(ОбъектУчета, Параметры);

ИначеЕсли Формат = Форматы.ФНС.УКД2020.ИнформацияПокупателя Тогда

Результат = УКД2020_ИнформацияПокупателя_ДанныеУчета(ОбъектУчета, Параметры);

ИначеЕсли Формат = Форматы.ФНС.ПередачаТоваров.ИнформацияПродавца Тогда

Результат = ПередачаТоваров_ИнформацияПродавца_ДанныеУчета(ОбъектУчета, Параметры);

ИначеЕсли Формат = Форматы.ФНС.ПередачаТоваров.ИнформацияПокупателя Тогда

Результат = ПередачаТоваров_ИнформацияПокупателя_ДанныеУчета(ОбъектУчета, Параметры);

ИначеЕсли Формат = Форматы.ФНС.ПередачаРабот.ИнформацияПродавца Тогда

Результат = ПередачаУслуг_ИнформацияПродавца_ДанныеУчета(ОбъектУчета, Параметры);

ИначеЕсли Формат = Форматы.ФНС.ПередачаРабот.ИнформацияПокупателя
Или Формат = Форматы.ФНС.ПриемкаСдачаРабот.ИнформацияПокупателя Тогда

Результат = ПередачаУслуг_ИнформацияПокупателя_ДанныеУчета(ОбъектУчета, Параметры);

ИначеЕсли Формат = Форматы.ФНС.АктОРасхождениях.ИнформацияПокупателя Тогда

Результат = АктОРасхождениях_ИнформацияПокупателя_ДанныеУчета(ОбъектУчета, Параметры);

ИначеЕсли Формат = Форматы.БизнесСеть.КоммерческоеПредложение Тогда

Результат = КоммерческоеПредложение_ДанныеУчета(ОбъектУчета, Параметры);

ИначеЕсли Формат = Форматы.БизнесСеть.ЗапросКоммерческогоПредложения Тогда

Результат = ЗапросКоммерческогоПредложения_ДанныеУчета(ОбъектУчета, Параметры);

ИначеЕсли Формат = "PDF" Тогда //СеВа
Результат = СчетНаОплату_ДанныеУчета(ОбъектУчета, Параметры);

Иначе

СтрокаСообщенияИсключения = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Формат ""%1"" не поддерживается.'"), Формат);

ВызватьИсключение СтрокаСообщенияИсключения;

КонецЕсли;

// Нормализуем данные, которые приходят из переопределяемой части.
Результат.Основания = ОбщегоНазначенияКлиентСервер.СвернутьМассив(Результат.Основания);

Если Не ЗначениеЗаполнено(Результат.СвязующийОбъектУчета) Тогда
Результат.СвязующийОбъектУчета = ОбъектУчета;
КонецЕсли;

Возврат Результат;

КонецФункции

Модуль ИнтерфейсДокументовЭДОКлиент :
Процедура пдф_ОткрытьЭлектронныйДокументОбъектаУчета(ОбъектУчета, ПараметрыОткрытия = Неопределено) Экспорт Если ПараметрыОткрытия = Неопределено Тогда ПараметрыОткрытия = НовыеПараметрыОткрытияЭлектронногоДокумента(); КонецЕсли; //(СеВа Если ТипЗнч(ОбъектУчета) =Тип("ДокументСсылка.СчетНаОплатуПокупателю") Тогда ПараметрыПросмотра = ИнтерфейсДокументовЭДОВызовСервера.ПараметрыПросмотраЭлектронногоДокументаПоОбъектуУчета(ОбъектУчета, ПараметрыОткрытия); Если ПараметрыПросмотра.Свойство("ЭлектронныйДокумент") И ЗначениеЗаполнено(ПараметрыПросмотра.ЭлектронныйДокумент) Тогда ИначеЕсли ПараметрыПросмотра.ПредварительныйПросмотр =Неопределено Тогда ИначеЕсли ПараметрыПросмотра.ПредварительныйПросмотр.РезультатПоискаНастроек.Настройки.НастройкиОтправки.Формат ="PDF" Тогда ПараметрыФормы = Новый Структура; ИмяФайлаЭДО=""; МассивОбъектовП=Новый Массив; МассивОбъектовП.Добавить(ОбъектУчета); ДопПараметрыП=Новый Структура; ДопПараметрыП.Вставить("ДополнитьКомплектВнешнимиПечатнымиФормами",Ложь); ДопПараметрыП.Вставить("ДатаДок",""); ПараметрыПечати =Новый Структура("ЗаголовокФормы", ОбъектУчета); ПараметрыПечати.Вставить("ДополнительныеПараметры", ДопПараметрыП); ТабДокумент=Новый ТабличныйДокумент; ТабДокумент=пдф_ОбщийМодуль.ПечатьСчетаНаОплату(МассивОбъектовП, ДопПараметрыП, ИмяФайлаЭДО); ПараметрыФормы.Вставить("ТабличныйДокумент", ТабДокумент); ПараметрыФормы.Вставить("НаименованиеФайла", ИмяФайлаЭДО); ПараметрыФормы.Вставить("Основание", ОбъектУчета); ПараметрыФормы.Вставить("ОбъектУчета", ОбъектУчета); ОткрытьФормуЭлектронногоДокумента(ПараметрыФормы); Возврат; КонецЕсли; КонецЕсли; //)СеВа ПараметрыПросмотра = ИнтерфейсДокументовЭДОВызовСервера.ПараметрыПросмотраЭлектронногоДокументаПоОбъектуУчета( ОбъектУчета, ПараметрыОткрытия); ОткрытьЭлектронныйДокументПоПараметрамПросмотра(ПараметрыПросмотра); КонецПроцедуры

Модуль ИнтерфейсДокументовЭДОКлиент :

Процедура пдф_ОткрытьЭлектронныйДокументОбъектаУчета(ОбъектУчета, ПараметрыОткрытия = Неопределено) Экспорт

Если ПараметрыОткрытия = Неопределено Тогда
ПараметрыОткрытия = НовыеПараметрыОткрытияЭлектронногоДокумента();
КонецЕсли;

//(СеВа
Если ТипЗнч(ОбъектУчета) =Тип("ДокументСсылка.СчетНаОплатуПокупателю") Тогда
ПараметрыПросмотра = ИнтерфейсДокументовЭДОВызовСервера.ПараметрыПросмотраЭлектронногоДокументаПоОбъектуУчета(ОбъектУчета, ПараметрыОткрытия);
Если ПараметрыПросмотра.Свойство("ЭлектронныйДокумент") И ЗначениеЗаполнено(ПараметрыПросмотра.ЭлектронныйДокумент) Тогда

ИначеЕсли ПараметрыПросмотра.ПредварительныйПросмотр =Неопределено Тогда

ИначеЕсли ПараметрыПросмотра.ПредварительныйПросмотр.РезультатПоискаНастроек.Настройки.НастройкиОтправки.Формат ="PDF" Тогда
ПараметрыФормы = Новый Структура;

ИмяФайлаЭДО="";

МассивОбъектовП=Новый Массив;
МассивОбъектовП.Добавить(ОбъектУчета);

ДопПараметрыП=Новый Структура;
ДопПараметрыП.Вставить("ДополнитьКомплектВнешнимиПечатнымиФормами",Ложь);
ДопПараметрыП.Вставить("ДатаДок","");

ПараметрыПечати =Новый Структура("ЗаголовокФормы", ОбъектУчета);
ПараметрыПечати.Вставить("ДополнительныеПараметры", ДопПараметрыП);

ТабДокумент=Новый ТабличныйДокумент;
ТабДокумент=пдф_ОбщийМодуль.ПечатьСчетаНаОплату(МассивОбъектовП, ДопПараметрыП, ИмяФайлаЭДО);

ПараметрыФормы.Вставить("ТабличныйДокумент", ТабДокумент);
ПараметрыФормы.Вставить("НаименованиеФайла", ИмяФайлаЭДО);

ПараметрыФормы.Вставить("Основание", ОбъектУчета);
ПараметрыФормы.Вставить("ОбъектУчета", ОбъектУчета);

ОткрытьФормуЭлектронногоДокумента(ПараметрыФормы);
Возврат;
КонецЕсли;
КонецЕсли;
//)СеВа

ПараметрыПросмотра = ИнтерфейсДокументовЭДОВызовСервера.ПараметрыПросмотраЭлектронногоДокументаПоОбъектуУчета(
ОбъектУчета, ПараметрыОткрытия);

ОткрытьЭлектронныйДокументПоПараметрамПросмотра(ПараметрыПросмотра);

КонецПроцедуры

Модуль ЭлектронныеДокументыЭДО :
Процедура пдф_ПриЗаписиНовогоДокумента(ДокументОбъект, ОписаниеСообщения, КонтекстДиагностики, ОбъектыУчета = Неопределено) Экспорт Действие = Перечисления.ДействияПоЭДО.Сформировать; //(СеВа Если ОписаниеСообщения.Направление=Перечисления.НаправленияЭДО.Исходящий И ОписаниеСообщения.ВидСообщения =Справочники.ВидыДокументовЭДО.НайтиПоНаименованию("Счет на оплату") И ОбъектыУчета<>Неопределено Тогда ОбъектУчета =ОбъектыУчета[0]; ПараметрыОткрытия = ИнтерфейсДокументовЭДОКлиентСервер.НовыеПараметрыОткрытияЭлектронногоДокумента(); ПараметрыПросмотра = ИнтерфейсДокументовЭДОВызовСервера.ПараметрыПросмотраЭлектронногоДокументаПоОбъектуУчета(ОбъектУчета, ПараметрыОткрытия); Если ПараметрыПросмотра.Свойство("ЭлектронныйДокумент") И ЗначениеЗаполнено(ПараметрыПросмотра.ЭлектронныйДокумент) Тогда ИначеЕсли ПараметрыПросмотра.ПредварительныйПросмотр =Неопределено Тогда ИначеЕсли ПараметрыПросмотра.ПредварительныйПросмотр.РезультатПоискаНастроек.Настройки.НастройкиОтправки.Формат ="PDF" Тогда ПараметрыФормы = Новый Структура; ИмяФайлаЭДО=""; МассивОбъектовП=Новый Массив; МассивОбъектовП.Добавить(ОбъектУчета); ДопПараметрыП=Новый Структура; ДопПараметрыП.Вставить("ДополнитьКомплектВнешнимиПечатнымиФормами",Ложь); ДопПараметрыП.Вставить("ДатаДок",""); ПараметрыПечати =Новый Структура("ЗаголовокФормы", ОбъектУчета); ПараметрыПечати.Вставить("ДополнительныеПараметры", ДопПараметрыП); ТабДокумент=Новый ТабличныйДокумент; ТабДокумент=пдф_ОбщийМодуль.ПечатьСчетаНаОплату(МассивОбъектовП, ДопПараметрыП, ИмяФайлаЭДО); Поток = Новый ПотокВПамяти; ТабДокумент.Записать(Поток, ТипФайлаТабличногоДокумента.PDF); ДвоичныеДанныеФайла = Поток.ЗакрытьИПолучитьДвоичныеДанные(); ОписаниеСообщения.Данные.Содержание.Формат="PDF"; ОписаниеСообщения.Данные.Документ.ИмяФайла=ИмяФайлаЭДО+".pdf"; ОписаниеСообщения.Данные.Документ.ДвоичныеДанные=ДвоичныеДанныеФайла; КонецЕсли; КонецЕсли; //)СеВа СообщениеОбъект = СоздатьСообщение(ОписаниеСообщения, ДокументОбъект.Ссылка, ДокументОбъект); СостоянияЭлементовРегламента = РегламентыЭДО.НовыеСостоянияЭлементовРегламента(); ЗаполнитьЗначенияСвойств(СостоянияЭлементовРегламента.Добавить(), СообщениеОбъект); Если ЗначениеЗаполнено(ДокументОбъект.ИдентификаторыОснований) И ЗначениеЗаполнено(ОписаниеСообщения.Данные.Содержание) Тогда ОбновитьСвязанныеДокументы(ОписаниеСообщения.Данные.Содержание.ТипДокумента, ДокументОбъект.ИдентификаторыОснований.Выгрузить(), Действие, КонтекстДиагностики); КонецЕсли; ДополненияСостоянийЭДО = Неопределено; Если Не ДокументОбъект.ОбменБезПодписи Тогда Если СообщениеОбъект.Направление = Перечисления.НаправленияЭДО.Интеркампани Тогда МаршрутПодписания = МаршрутыПодписанияБЭД.МаршрутУказыватьПриСоздании(); СписокПодписантов = СписокПодписантовИнтеркампани(ДокументОбъект.Организация, ДокументОбъект.Контрагент); Иначе МаршрутПодписания = ДокументОбъект.МаршрутПодписания; СписокПодписантов = ДокументОбъект.СписокПодписантов.Выгрузить(); КонецЕсли; Если МаршрутПодписания = МаршрутыПодписанияБЭД.МаршрутУказыватьПриСоздании() И Не ЗначениеЗаполнено(СписокПодписантов) Тогда ВызватьИсключение НСтр("ru = 'Не заполнен список подписантов'"); КонецЕсли; ПараметрыМаршрута = СформироватьМаршрутПодписания(СообщениеОбъект, МаршрутПодписания, СписокПодписантов); ПараметрыОповещенияПодписантов = Новый Структура("СообщениеОбъект, ТаблицаПодписания", СообщениеОбъект, ПараметрыМаршрута.ТаблицаПодписания); ДокументОбъект.ДополнительныеСвойства.Вставить("ПараметрыОповещенияПодписантов", ПараметрыОповещенияПодписантов); Если ТипЗнч(ДокументОбъект.Ссылка) = Тип("ДокументСсылка.ЭлектронныйДокументВходящийЭДО") Тогда ВидПодписи = Перечисления.ВидыЭлектронныхПодписей.УсиленнаяКвалифицированная; Иначе ВидПодписи = ДокументОбъект.ВидПодписи; КонецЕсли; ДополненияСостоянийЭДО = ДополненияСостоянийЭДОПриПодписании(СообщениеОбъект, ВидПодписи, ПараметрыМаршрута.ВесМаршрута); КонецЕсли; СостояниеДокумента = УстановитьСостояниеДокументаПриФормировании(ДокументОбъект, СостоянияЭлементовРегламента, ДокументОбъект.Дата, ОбъектыУчета, КонтекстДиагностики, ДополненияСостоянийЭДО); ЗаписатьДействиеВЖурнал(Действие, ДокументОбъект, СостояниеДокумента, ДокументОбъект.Дата, СообщениеОбъект); КонецПроцедуры

Модуль ЭлектронныеДокументыЭДО :

Процедура пдф_ПриЗаписиНовогоДокумента(ДокументОбъект, ОписаниеСообщения, КонтекстДиагностики, ОбъектыУчета = Неопределено) Экспорт

Действие = Перечисления.ДействияПоЭДО.Сформировать;

//(СеВа
Если ОписаниеСообщения.Направление=Перечисления.НаправленияЭДО.Исходящий И ОписаниеСообщения.ВидСообщения =Справочники.ВидыДокументовЭДО.НайтиПоНаименованию("Счет на оплату")
И ОбъектыУчета<>Неопределено Тогда
ОбъектУчета =ОбъектыУчета[0];

ПараметрыОткрытия = ИнтерфейсДокументовЭДОКлиентСервер.НовыеПараметрыОткрытияЭлектронногоДокумента();

ПараметрыПросмотра = ИнтерфейсДокументовЭДОВызовСервера.ПараметрыПросмотраЭлектронногоДокументаПоОбъектуУчета(ОбъектУчета, ПараметрыОткрытия);
Если ПараметрыПросмотра.Свойство("ЭлектронныйДокумент") И ЗначениеЗаполнено(ПараметрыПросмотра.ЭлектронныйДокумент) Тогда

ИначеЕсли ПараметрыПросмотра.ПредварительныйПросмотр =Неопределено Тогда

ИначеЕсли ПараметрыПросмотра.ПредварительныйПросмотр.РезультатПоискаНастроек.Настройки.НастройкиОтправки.Формат ="PDF" Тогда
ПараметрыФормы = Новый Структура;

ИмяФайлаЭДО="";

МассивОбъектовП=Новый Массив;
МассивОбъектовП.Добавить(ОбъектУчета);

ДопПараметрыП=Новый Структура;
ДопПараметрыП.Вставить("ДополнитьКомплектВнешнимиПечатнымиФормами",Ложь);
ДопПараметрыП.Вставить("ДатаДок","");

ПараметрыПечати =Новый Структура("ЗаголовокФормы", ОбъектУчета);
ПараметрыПечати.Вставить("ДополнительныеПараметры", ДопПараметрыП);

ТабДокумент=Новый ТабличныйДокумент;
ТабДокумент=пдф_ОбщийМодуль.ПечатьСчетаНаОплату(МассивОбъектовП, ДопПараметрыП, ИмяФайлаЭДО);

Поток = Новый ПотокВПамяти;
ТабДокумент.Записать(Поток, ТипФайлаТабличногоДокумента.PDF);
ДвоичныеДанныеФайла = Поток.ЗакрытьИПолучитьДвоичныеДанные();

ОписаниеСообщения.Данные.Содержание.Формат="PDF";
ОписаниеСообщения.Данные.Документ.ИмяФайла=ИмяФайлаЭДО+".pdf";
ОписаниеСообщения.Данные.Документ.ДвоичныеДанные=ДвоичныеДанныеФайла;
КонецЕсли;
КонецЕсли;
//)СеВа

СообщениеОбъект = СоздатьСообщение(ОписаниеСообщения, ДокументОбъект.Ссылка, ДокументОбъект);

СостоянияЭлементовРегламента = РегламентыЭДО.НовыеСостоянияЭлементовРегламента();
ЗаполнитьЗначенияСвойств(СостоянияЭлементовРегламента.Добавить(), СообщениеОбъект);

Если ЗначениеЗаполнено(ДокументОбъект.ИдентификаторыОснований)
И ЗначениеЗаполнено(ОписаниеСообщения.Данные.Содержание) Тогда
ОбновитьСвязанныеДокументы(ОписаниеСообщения.Данные.Содержание.ТипДокумента,
ДокументОбъект.ИдентификаторыОснований.Выгрузить(), Действие, КонтекстДиагностики);
КонецЕсли;

ДополненияСостоянийЭДО = Неопределено;
Если Не ДокументОбъект.ОбменБезПодписи Тогда

Если СообщениеОбъект.Направление = Перечисления.НаправленияЭДО.Интеркампани Тогда
МаршрутПодписания = МаршрутыПодписанияБЭД.МаршрутУказыватьПриСоздании();
СписокПодписантов = СписокПодписантовИнтеркампани(ДокументОбъект.Организация, ДокументОбъект.Контрагент);
Иначе
МаршрутПодписания = ДокументОбъект.МаршрутПодписания;
СписокПодписантов = ДокументОбъект.СписокПодписантов.Выгрузить();
КонецЕсли;

Если МаршрутПодписания = МаршрутыПодписанияБЭД.МаршрутУказыватьПриСоздании()
И Не ЗначениеЗаполнено(СписокПодписантов) Тогда
ВызватьИсключение НСтр("ru = 'Не заполнен список подписантов'");
КонецЕсли;

ПараметрыМаршрута = СформироватьМаршрутПодписания(СообщениеОбъект, МаршрутПодписания, СписокПодписантов);

ПараметрыОповещенияПодписантов = Новый Структура("СообщениеОбъект, ТаблицаПодписания",
СообщениеОбъект, ПараметрыМаршрута.ТаблицаПодписания);

ДокументОбъект.ДополнительныеСвойства.Вставить("ПараметрыОповещенияПодписантов",
ПараметрыОповещенияПодписантов);

Если ТипЗнч(ДокументОбъект.Ссылка) = Тип("ДокументСсылка.ЭлектронныйДокументВходящийЭДО") Тогда
ВидПодписи = Перечисления.ВидыЭлектронныхПодписей.УсиленнаяКвалифицированная;
Иначе
ВидПодписи = ДокументОбъект.ВидПодписи;
КонецЕсли;

ДополненияСостоянийЭДО = ДополненияСостоянийЭДОПриПодписании(СообщениеОбъект, ВидПодписи,
ПараметрыМаршрута.ВесМаршрута);

КонецЕсли;

СостояниеДокумента = УстановитьСостояниеДокументаПриФормировании(ДокументОбъект, СостоянияЭлементовРегламента,
ДокументОбъект.Дата, ОбъектыУчета, КонтекстДиагностики, ДополненияСостоянийЭДО);

ЗаписатьДействиеВЖурнал(Действие, ДокументОбъект, СостояниеДокумента, ДокументОбъект.Дата, СообщениеОбъект);

КонецПроцедуры

8. пользователь 05.08.22 17:15

Сообщение было скрыто модератором.

...

11. KBDK 58 12.09.22 12:07 Сейчас в теме

Здравствуйте. Обработка выдаёт ошибку, сменить в Счете на формат PDF нет возможности. БП, редакция 3.0 (3.0.112.34), платформа 8.3.20.1674. Ошибка во вложении.

Прикрепленные файлы:

12. KBDK 58 12.09.22 14:25 Сейчас в теме

Вопрос снят, не ту обработку запускала. Спасибо.

13. s-a-n-t-a 01.10.22 19:53 Сейчас в теме

Здравствуйте. Почему-то вдруг без обновлений конфигурации, платформы и обработки (автоматическая установка патчей-обновлений так отключена) пропала возможность выбора формат PDF для счетов. Пришлось запускать обработку установки формата PDF для счетов. С чем это может быть связано? А настройки форматов эдо с контрагентами сохраняются при обновлениях?

14. sevarm 64 02.10.22 11:00 Сейчас в теме

(13) Настройки форматов у контрагентов сохраняются.

Почему сбрасывается регистр со списком доступных форматов я не нашел. Обычно при обновлении это было, но возможно и какое-то регламентированное задание шалит.

15. sergling 34 01.12.22 08:21 Сейчас в теме

был вопрос - разобрался

16. sergling 34 10.01.23 17:41 Сейчас в теме

На 3.0.128.10 отправка счета валится с ошибкой, переопределенные процедуры общих модулей требует корректировки под новые реалии.

пдф_ОтправкаСчетовЧерезЭДОвPDF ОбщийМодуль.ИнтеграцияЭДО.Модуль(136)}: Поле объекта не обнаружено (КоммерческоеПредложение)
{пдф_ОтправкаСчетовЧерезЭДОвPDF ОбщийМодуль.ФорматыЭДО_ФНС.Модуль(64)}: Поле объекта не обнаружено (КоммерческоеПредложение)

17. sevarm 64 10.01.23 21:30 Сейчас в теме

(16) Принял. Но смогу только к концу недели сделать.

18. sergling 34 11.01.23 10:43 Сейчас в теме

(17) я у себя решил этот вопрос, но наверное будет потребность у других пользователей, поэтому и отписался здесь. А так - спасибо за обработку. у моего клиента около 200 контрагентов в сбисе или тензоре, а там не все ладно с форматом счета. И кстати после обновления вроде бы не слетели форматы, боялся что придется опять перебивать его по всем контрагентам (буду наблюдать)

19. sevarm 64 16.01.23 09:20 Сейчас в теме

(16) Ошибки исправлены

20. VKuser188022734 17.02.23 12:01 Сейчас в теме

Добрый день, скажите пожалуйста по поводу абзаца

21. VKuser188022734 17.02.23 12:05 Сейчас в теме

Добрый день скажите пожалуйста, по поводу абзаца
"После подключения расширения и после каждого обновления надо с помощью обработки из меню «Администрирование – Сервис - Заполнение регистров сведений (PDF в ЭДО)» заполнить регистры сведений: кнопка «Заполнить регистры»."
После каждого обновления конфигурации или расширения? После обновления, если перезаполнить регистры останутся старые настройки?

22. sevarm 64 17.02.23 17:47 Сейчас в теме

(21) Сами настройки отправки для контрагентов сохраняются. После обновления конфигурации могут слетать настройки в служебных регистрах и кнопка "Заполнить регистры" добавляет нужные для отправки в PDF значения.

23. s-a-n-t-a 02.04.23 12:25 Сейчас в теме

Здравствуйте. В релизе БП 3.0.132.32 и выше опять перестало работать. Ошибка появляется при попытке нажатия в счете на ссылку "ЭДО не начат". Метод объекта не обнаружен (ДопустимоеИмяФайла)
{пдф_ОтправкаСчетовЧерезЭДОвPDF ОбщийМодуль.пдф_ОбщийМодуль.Модуль(11)}:ИмяФайлаЭДО = РаботаСФайламиБЭД.ДопустимоеИмяФайла(ИмяФайлаЭДО, Истина);
{пдф_ОтправкаСчетовЧерезЭДОвPDF ОбщийМодуль.ИнтерфейсДокументовЭДОКлиент.Модуль(62)}:ТабДокумент=пдф_ОбщийМодуль.ПечатьСчетаНаОплату(МассивОбъектовП, ДопПараметрыП, ИмяФайлаЭДО);
{ОбщийМодуль.ИнтерфейсДокументовЭДОКлиент.Модуль(606)}:ОткрытьЭлектронныйДокументОбъектаУчета(Форма.Объект.Ссылка);
{ОбщийМодуль.ОбменСКонтрагентамиКлиент.Модуль(302)}:ИнтерфейсДокументовЭДОКлиент.КонтроллерСостояниеЭДОНажатие(Форма, СтандартнаяОбработка);
{Документ.СчетНаОплатуПокупателю.Форма.ФормаДокумента.Форма(755)}:ОбменСКонтрагентамиКлиент.СостояниеЭДОНажатие_ФормаДокумента(ЭтотОбъект, СтандартнаяОбработка);

24. sevarm 64 02.04.23 17:51 Сейчас в теме

(23) Здравствуйте. Исправил. Тестировал на релизе 3.0.133.17.

25. s-a-n-t-a 10.04.23 07:26 Сейчас в теме

(24) Спасибо большое! Работает!

26. bacters 20.11.23 23:21 Сейчас в теме

8.3.22.2239 3.0.143.32
Выполнение операции: Выполнение действий по ЭДО.
Не удалось выполнить действия по ЭДО.
Формат "PDF" не поддерживается.
{ОбщийМодуль.ИнтеграцияЭДО.Модуль(1161)}:ВызватьИсключение СтрокаСообщенияИсключения;
{ОбщийМодуль.ЭлектронныеДокументыЭДО.Модуль(11357)}:ОписаниеДанных = ИнтеграцияЭДО.ОписаниеДанныхОбъектаУчета(ВыборкаНастроек.ОбъектУчета, ПараметрыФормирования);
{ОбщийМодуль.ЭлектронныеДокументыЭДО.Модуль(11245)}:ДобавитьПараметрыФормированияИсходящегоДокумента(ПараметрыВыполнения, ВыборкаНастроек,
{ОбщийМодуль.ЭлектронныеДокументыЭДО.Модуль(11180)}:ЗаполнитьПараметрыФормированияИсходящихДокументов(ПараметрыВыполнения,
{ОбщийМодуль.ЭлектронныеДокументыЭДО.Модуль(10699)}:НаборПараметровФормирования = ПараметрыФормированияДокумента(ПараметрыВыполнения,
{ОбщийМодуль.ЭлектронныеДокументыЭДО.Модуль(9805)}:ВыполнитьДействиеСформировать(ПараметрыВыполнения, РезультатДействий);
{ОбщийМодуль.ЭлектронныеДокументыЭДО.Модуль(4116)}:ПродолжитьВыполнениеДействийПоЭДО(ПараметрыВыполнения, РезультатДействий);
{(1)}:ЭлектронныеДокументыЭДО.ВыполнитьДействияПоЭДО(Параметры[0])
{ОбщийМодуль.ОбщегоНазначения.Модуль(9857)}:Возврат Вычислить(ИмяМетода + "(" + ПараметрыСтрока + ")"); // АПК:488 Исполняемый код безопасен.
{ОбщийМодуль.ДлительныеОперации.Модуль(1760)}:Результат = ОбщегоНазначения.ВызватьФункциюКонфигурации(ИмяФункции, ПараметрыПроцедуры);
{ОбщийМодуль.ДлительныеОперации.Модуль(1656)}:ВызватьФункцию(ВсеПараметры.ИмяПроцедуры, ВсеПараметры.ПараметрыПроцедуры, ПараметрыВыполнения);

[ОшибкаВоВремяВыполненияВстроенногоЯзыка, ИсключениеВызванноеИзВстроенногоЯзыка]

28. sevarm 64 21.11.23 07:28 Сейчас в теме

(26) Попробуйте регистры перезаполнить. Они иногда слетают на ровном месте.
После подключения расширения и после каждого обновления надо с помощью обработки из меню «Администрирование – Сервис - Заполнение регистров сведений (PDF в ЭДО)» заполнить регистры сведений: кнопка «Заполнить регистры».

27. sevarm 64 21.11.23 07:25 Сейчас в теме

29. user2009342 12.03.24 17:45 Сейчас в теме

Платформа. 8.3.22.1923. После обновления конфигурации на 3.0.149.18 выдает ошибку:
"Поле объекта не обнаружено (Направление)
{пдф_ОтправкаСчетовЧерезЭДОвPDF ОбщийМодуль.ЭлектронныеДокументыЭДО.Модуль(16)}:Если ОписаниеСообщения.Направление=Перечисления.НаправленияЭДО.Исходящий И ОписаниеСообщения.ВидСообщения =Справочники.ВидыДокументовЭДО.НайтиПоНаименованию("Счет на оплату")
{Документ.ЭлектронныйДокументИсходящийЭДО.Форма.ФормаПросмотра.Форма(96)}:ПараметрыЗаписи.ОписанияСообщений, ПараметрыЗаписи.КонтекстДиагностики, Основания.ВыгрузитьЗначения());
{Документ.ЭлектронныйДокументИсходящийЭДО.Форма.ФормаПросмотра.Форма(3657)}:Если Не Записать(ПараметрыЗаписи) Тогда
{Документ.ЭлектронныйДокументИсходящийЭДО.Форма.ФормаПросмотра.Форма(3515)}:РезультатЗаписи = ЗаписатьДокументНаСервере();
{Документ.ЭлектронныйДокументИсходящийЭДО.Форма.ФормаПросмотра.Форма(941)}:НачатьЗаписьДокумента(Оповещение);
{Документ.ЭлектронныйДокументИсходящийЭДО.Форма.ФормаПросмотра.Форма(845)}:ПроверитьЗаписьДокументаПередПодписанием(Оповещение);

[ОшибкаВоВремяВыполненияВстроенногоЯзыка, ОшибкаИспользованияВстроенногоЯзыка]"

31. sevarm 64 18.03.24 10:52 Сейчас в теме

(29) Ошибки, выявленные после изменения релиза, я исправил. Тестировал на релизе 3.0.149.28.

30. s-a-n-t-a 17.03.24 15:32 Сейчас в теме

Здравствуйте, в релизе 3.0.147.25 а может и дальше при подписании присланного электронного акта сверки возникает ошибка. Видимо это расширение мешает актам сверки. "Перезаполнение регистров" не помогает. Можно это исправить? Ошибка: "Выполнение операции: Выполнение действий по ЭДО.
Не удалось выполнить действия по ЭДО.
Формат "ON_AKTSVERPOL_1_972_02_05_01_01" не поддерживается.
{пдф_ОтправкаСчетовЧерезЭДОвPDF ОбщийМодуль.ИнтеграцияЭДО.Модуль(157)}:ВызватьИсключение СтрокаСообщенияИсключения;
{ОбщийМодуль.ЭлектронныеДокументыЭДО.Модуль(15129)}:ОписаниеДанных = ИнтеграцияЭДО.ОписаниеДанныхОбъектаУчета(НаборОбъектовУчета, ПараметрыФормирования);
{ОбщийМодуль.ЭлектронныеДокументыЭДО.Модуль(15038)}:СообщениеОбъект = СоздатьОтветноеСообщениеПоОбъектамУчета(СвойстваОсновногоФайла, ПараметрыДокумента,
{ОбщийМодуль.ЭлектронныеДокументыЭДО.Модуль(4690)}:РезультатФормирования = СформироватьОтвет(ЭлектронныйДокумент, КонтекстДиагностики, ДанныеОбъектаУчета);
{ОбщийМодуль.ЭлектронныеДокументыЭДО.Модуль(14873)}:СформироватьОтветПоДокументу(Выборка.ЭлектронныйДокумент, РезультатДействий,
{ОбщийМодуль.ЭлектронныеДокументыЭДО.Модуль(9882)}:ВыполнитьДействиеСформироватьОтвет(ПараметрыВыполнения, РезультатДействий);
{ОбщийМодуль.ЭлектронныеДокументыЭДО.Модуль(4117)}:ПродолжитьВыполнениеДействийПоЭДО(ПараметрыВыполнения, РезультатДействий);
{(1)}:ЭлектронныеДокументыЭДО.ВыполнитьДействияПоЭДО(Параметры[0])
{ОбщийМодуль.ОбщегоНазначения.Модуль(9812)}:Возврат Вычислить(ИмяМетода + "(" + ПараметрыСтрока + ")"); // АПК:488 Исполняемый код безопасен.
{ОбщийМодуль.ДлительныеОперации.Модуль(1771)}:Результат = ОбщегоНазначения.ВызватьФункциюКонфигурации(ИмяФункции, ПараметрыПроцедуры);
{ОбщийМодуль.ДлительныеОперации.Модуль(1669)}:ВызватьФункцию(ВсеПараметры.ИмяПроцедуры, ВсеПараметры.ПараметрыПроцедуры, ПараметрыВыполнения);

[ОшибкаВоВремяВыполненияВстроенногоЯзыка, ИсключениеВызванноеИзВстроенногоЯзыка]
{ОбщийМодуль.ЭлектронныеДокументыЭДО.Модуль(15072)}:ВызватьИсключение ТекстОшибки;
{ОбщийМодуль.ЭлектронныеДокументыЭДО.Модуль(4690)}:РезультатФормирования = СформироватьОтвет(ЭлектронныйДокумент, КонтекстДиагностики, ДанныеОбъектаУчета);
{ОбщийМодуль.ЭлектронныеДокументыЭДО.Модуль(14873)}:СформироватьОтветПоДокументу(Выборка.ЭлектронныйДокумент, РезультатДействий,
{ОбщийМодуль.ЭлектронныеДокументыЭДО.Модуль(9882)}:ВыполнитьДействиеСформироватьОтвет(ПараметрыВыполнения, РезультатДействий);
{ОбщийМодуль.ЭлектронныеДокументыЭДО.Модуль(4117)}:ПродолжитьВыполнениеДействийПоЭДО(ПараметрыВыполнения, РезультатДействий);
{(1)}:ЭлектронныеДокументыЭДО.ВыполнитьДействияПоЭДО(Параметры[0])
{ОбщийМодуль.ОбщегоНазначения.Модуль(9812)}:Возврат Вычислить(ИмяМетода + "(" + ПараметрыСтрока + ")"); // АПК:488 Исполняемый код безопасен.
{ОбщийМодуль.ДлительныеОперации.Модуль(1771)}:Результат = ОбщегоНазначения.ВызватьФункциюКонфигурации(ИмяФункции, ПараметрыПроцедуры);
{ОбщийМодуль.ДлительныеОперации.Модуль(1669)}:ВызватьФункцию(ВсеПараметры.ИмяПроцедуры, ВсеПараметры.ПараметрыПроцедуры, ПараметрыВыполнения);

[ОшибкаВоВремяВыполненияВстроенногоЯзыка, ИсключениеВызванноеИзВстроенногоЯзыка]"

32. sevarm 64 18.03.24 12:56 Сейчас в теме

(30) Добрый день! Исправил. Новую версию расширения -выложил.

33. VKuser188022734 02.07.24 14:54 Сейчас в теме

Добрый день, в конфигурации Бухгалтерия предприятия, редакция 3.0 в версии 3.0.155.21
При отправке по ЭДО в формате PDF выходит ошибка:
Поле объекта не обнаружено (Направление)
{пдф_ОтправкаСчетовЧерезЭДОвPDF ОбщийМодуль.ЭлектронныеДокументыЭДО.Модуль(17)}:Если ОписаниеСообщения.Направление=Перечисления.НаправленияЭДО.Исходящий И ОписаниеСообщения.ВидСообщения =Справочники.ВидыДокументовЭДО.НайтиПоНаименованию("Счет на оплату")
{ВнешняяОбработка.АктыСверок.Форма.Форма.Форма(544)}:ЭлектронныеДокументыЭДО.ПриЗаписиНовогоДокумента(ДокЭДО,ОписаниеСообщения,ОбработкаНеисправностейБЭД.НовыйКонтекстДиагностики(),Неопределено);
{ВнешняяОбработка.АктыСверок.Форма.Форма.Форма(1496)}:ФормироватьДокументыНаСервере();

[ОшибкаВоВремяВыполненияВстроенногоЯзыка, ОшибкаИспользованияВстроенногоЯзыка]

34. sevarm 64 09.07.24 12:27 Сейчас в теме

(33) Здравствуйте. На релизе 3.0.155.23 данную ошибку получить не удалось. Все нормально формирует и отправляет.
Попробуйте очистить временные файлы 1с. Бывает, что после обновления тянется код модулей старого релиза.

Прикрепленные файлы:

35. sevarm 64 09.07.24 12:32 Сейчас в теме

(33) Так вы формируете документы ЭДО из внешней обработки. И похоже, что предаете не все параметры в процедуры ЭДО. Вам надо доработать Вашу внешнюю обработку.

36. dark70 241 29.07.24 16:24 Сейчас в теме

Подключил расширение. В настройке отправки документов у контрагента формат эл.документа Счет на оплату- PDF
Делаю отправку. Счет контрагенту приходит, но внутри пусто, только снизу печать "Документ получен через ЭДО".
Пустой как у отправителя, так и у получателя. Отправлял и получал с полными правами.
Отраслевые на БП 3.0.156.17, вместо СчетНаОплату там АР_СчетНаАренду.
Получается, что надо пройтись поиском по расширению и везде где СчетНаОплату заменить на АР_СчетНаАренду ?

37. sevarm 64 29.07.24 19:44 Сейчас в теме

(36) Там печатная форма другая или сам документ? Если печатная форма другая-то Вам надо внести соответствующие изменения в процедуру расширения "пдф_ОбщийМодуль.ПечатьСчетаНаОплату" и все.