Не передаются документы Реализация товаров и услуг с видом операции Реализация через комиссионера

1. shirei 23.09.24 10:05 Сейчас в теме
Здравствуйте коллеги! Столкнулся с ошибкой при обмене базы УТиВСК и БП.
По документу Реализация товаров и услуг, если в документе указать операцию Реализация через контрагента, в регистрации изменений не отображается этот документ.
Выгрузил правила обмена, добавил в правило выгрузки :

ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.РеализацияЧерезКомиссионера Тогда
ИмяПКО = "РТУ_РеализацияЧерезКомиссионера";

И в ПКО прописал правила обмена.
Пытаюсь выгрузить, но ругается БП, хотя делал выгрузку на подобии операции Реализация.

Подскажите, я в том направлении думаю?
Прикрепленные файлы:
По теме из базы знаний
Найденные решения
2. shirei 23.09.24 15:36 Сейчас в теме
Для передачи документа Реализация товаров и услуг, если в документе указана операция Реализация через контрагента, необходимо изменить общие модули на стороне УТ

1. МенеджерОбменаЧерезУниверсальныйФормат

1.1. Процедура ПОД_Документ_РеализацияТоваровУслуг_ПриОбработке(ДанныеИБ, ИспользованиеПКО, КомпонентыОбмена)
#Удаление
Если ДанныеИБ.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.РеализацияЧерезКомиссионера
Или ДанныеИБ.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.РеализацияЧерезКомиссионераБезПереходаПраваСобственности Тогда
ОчиститьИспользованиеПКО(ИспользованиеПКО)
КонецЕсли;
#КонецУдаления

1.2. Процедура ПКО_Документ_РеализацияТоваровУслуг_Отправка_ПриОтправкеДанн­ых(ДанныеИБ, ДанныеXDTO, КомпонентыОбмена, СтекВыгрузки)

#Вставка
Если (ДанныеИБ.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.РеализацияЧерезКомиссионера)
или (ДанныеИБ.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.РеализацияЧерезКомиссионераБезПереходаПраваСобственности) Тогда
ДанныеXDTO.Вставить("ВидОперации", "ПередачаНаКомиссию");
ДанныеXDTO.Вставить("Склад", Справочники.Склады.НайтиПоНаименованию("Основной склад")); // При необходимости изменить на свой склад
КонецЕсли;
#КонецВставки

2. ОбменДаннымиСобытия

2.1. Функция ОбъектПроходитФильтрПРОБ(ПРО, Объект)

#Вставка
//Поправить результат по отбору
Если ТипЗнч(Объект) = Тип("ДокументОбъект.РеализацияТоваровУслуг") Тогда

Если (Объект.Проведен = Истина) Тогда
Если (Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.РеализацияЧерезКомиссионера)
или (Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.РеализацияЧерезКомиссионераБезПереходаПраваСобственности) Тогда
Возврат Истина;
КонецЕсли;
КонецЕсли;

КонецЕсли;
#КонецВставки
Остальные ответы
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
2. shirei 23.09.24 15:36 Сейчас в теме
Для передачи документа Реализация товаров и услуг, если в документе указана операция Реализация через контрагента, необходимо изменить общие модули на стороне УТ

1. МенеджерОбменаЧерезУниверсальныйФормат

1.1. Процедура ПОД_Документ_РеализацияТоваровУслуг_ПриОбработке(ДанныеИБ, ИспользованиеПКО, КомпонентыОбмена)
#Удаление
Если ДанныеИБ.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.РеализацияЧерезКомиссионера
Или ДанныеИБ.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.РеализацияЧерезКомиссионераБезПереходаПраваСобственности Тогда
ОчиститьИспользованиеПКО(ИспользованиеПКО)
КонецЕсли;
#КонецУдаления

1.2. Процедура ПКО_Документ_РеализацияТоваровУслуг_Отправка_ПриОтправкеДанн­ых(ДанныеИБ, ДанныеXDTO, КомпонентыОбмена, СтекВыгрузки)

#Вставка
Если (ДанныеИБ.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.РеализацияЧерезКомиссионера)
или (ДанныеИБ.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.РеализацияЧерезКомиссионераБезПереходаПраваСобственности) Тогда
ДанныеXDTO.Вставить("ВидОперации", "ПередачаНаКомиссию");
ДанныеXDTO.Вставить("Склад", Справочники.Склады.НайтиПоНаименованию("Основной склад")); // При необходимости изменить на свой склад
КонецЕсли;
#КонецВставки

2. ОбменДаннымиСобытия

2.1. Функция ОбъектПроходитФильтрПРОБ(ПРО, Объект)

#Вставка
//Поправить результат по отбору
Если ТипЗнч(Объект) = Тип("ДокументОбъект.РеализацияТоваровУслуг") Тогда

Если (Объект.Проведен = Истина) Тогда
Если (Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.РеализацияЧерезКомиссионера)
или (Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.РеализацияЧерезКомиссионераБезПереходаПраваСобственности) Тогда
Возврат Истина;
КонецЕсли;
КонецЕсли;

КонецЕсли;
#КонецВставки
3. shirei 23.09.24 15:36 Сейчас в теме
Расширение с изменениями
Прикрепленные файлы:
РС_ПравилаОбмена.cfe
Оставьте свое сообщение

Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот