Доработка универсального обмена КД3 через расширение
Всем доброго дня!
Возникла необходимость доработать универсальный обмен БП 3.0 - УТ 11.4, решил делать при помощи расширения, так как конфигурация новая, снимать с поддержки не хотелось бы. Ограничиваю выгрузку по складу, дописываю ограничение в ПОД - При обработке. Собственно проблема возникла в следующем, там где код в "При обработке" был и соответственно процедура уже была в общем модуле создана, всё отрабатывает хорошо, но там где в "При обработке" пусто, процедуры не было и я создавал её следующим образом.
Но это не отрабатывает и выгружается всё. Если ли возможность без снятия с поддержки, всё таки доработать как-то обмен?
УТ 11.4.11.67
Платформа 8.3.17.1549
КД 3.0.5.3
Возникла необходимость доработать универсальный обмен БП 3.0 - УТ 11.4, решил делать при помощи расширения, так как конфигурация новая, снимать с поддержки не хотелось бы. Ограничиваю выгрузку по складу, дописываю ограничение в ПОД - При обработке. Собственно проблема возникла в следующем, там где код в "При обработке" был и соответственно процедура уже была в общем модуле создана, всё отрабатывает хорошо, но там где в "При обработке" пусто, процедуры не было и я создавал её следующим образом.
&ИзменениеИКонтроль("ДобавитьПОД_Документ_РеализацияТоваровУслуг")
Процедура ИзмОбм_ДобавитьПОД_Документ_РеализацияТоваровУслуг(ПравилаОбработкиДанных)
ПравилоОбработки = ПравилаОбработкиДанных.Добавить();
ПравилоОбработки.Имя = "Документ_РеализацияТоваровУслуг";
ПравилоОбработки.ОбъектВыборкиМетаданные = Метаданные.Документы.РеализацияТоваровУслуг;
#Вставка
ПравилоОбработки.ПриОбработке = "ПОД_Документ_РеализацияТоваровУслуг_ПриОбработке";
#КонецВставки
ПравилоОбработки.ОчисткаДанных = Ложь;
ПравилоОбработки.ИспользуемыеПКО.Добавить("Документ_РеализацияТоваровУслуг_Отправка");
КонецПроцедуры
Процедура ПОД_Документ_РеализацияТоваровУслуг_ПриОбработке(ДанныеИБ, ИспользованиеПКО, КомпонентыОбмена)
Если ДанныеИБ.Склад <> Справочники.Склады.ПолучитьСсылку(Новый УникальныйИдентификатор("ce09b4d6-631e-11ea-8eec-00d8615223ae")) Тогда
ИспользованиеПКО.Документ_РеализацияТоваровУслуг_Отправка = Ложь;
КонецЕсли;
КонецПроцедуры ПоказатьНо это не отрабатывает и выгружается всё. Если ли возможность без снятия с поддержки, всё таки доработать как-то обмен?
УТ 11.4.11.67
Платформа 8.3.17.1549
КД 3.0.5.3
По теме из базы знаний
- 1С: Конвертация данных 3. Инструкции и примеры. EnterpriseData (универсальный формат обмена)
- [ED] Обмен для предыдущих версий - УТ 11.0, УТ 11.1, УТ 11.2, УТ 11.3, УТ 11.4, УТ 11.5 с EnterpriseData (универсальный формат обмена), правила обмена
- [ED] Обмен для ЗУП 3.1 с EnterpriseData (универсальный формат обмена), правила обмена
- [ED] Обмен для предыдущих версий - УНФ 1.6, УНФ 3.0 с EnterpriseData (универсальный формат обмена), правила обмена
- [ED] Обмен для предыдущих версий - Розница 2.3 с EnterpriseData (универсальный формат обмена), правила обмена
Найденные решения
Остальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(1) Если выгружается 100500 документов, придётся каждый раз искать искать склад, а то вдруг он пропал? )
Может быть параметр добавить в конвертацию?
Может быть параметр добавить в конвертацию?
Процедура ПОД_Документ_РеализацияТоваровУслуг_ПриОбработке(ДанныеИБ, ИспользованиеПКО, КомпонентыОбмена)
Если КомпонентыОбмена.ПараметрыКонвертации.Свойство("СкладОтбор") Тогда
СкладОтбор = КомпонентыОбмена.ПараметрыКонвертации.СкладОтбор;
Иначе
СкладОтбор = Справочники.Склады.ПолучитьСсылку(Новый УникальныйИдентификатор("ce09b4d6-631e-11ea-8eec-00d8615223ae"));
КомпонентыОбмена.ПараметрыКонвертации.Вставить("СкладОтбор", СкладОтбор);
КонецЕсли;
Если НЕ ДанныеИБ.Склад=СкладОтбор Тогда
ИспользованиеПКО.Документ_РеализацияТоваровУслуг_Отправка = Ложь;
КонецЕсли;
КонецПроцедуры Показать
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот