Обмен УТ 10.3 — БП 3.0

 Обработка для "Бухгалтерии предприятия 3.0", на 201218 отлично работает. Создана в начале 2024 года по причине перехода на БП 3.0.  Позволяет загружать документы из "Управления торговлей 10.3". В настройках можно указать загружать как из серверной так и из файловой базы. Очень удобна и проста в работе.

Обработка работает/протестирована на релизах:

БП 3.0 на всех начиная с 3.0.43.124 от 27.02.16 по 3.0.67.43 от 19.12.18 (текущая дата)

"Управление торговлей", редакция 10.3 (10.3.1.12).

Принцип работы: 

Сначала заполняем ТЧ теми документами которые мы выбрали, платежки, поступления, и т.д.  за выбранный период. 

При заполнении идет проверка был ли загружен уже такой документ. 

Док_Бух = Документы.ТребованиеНакладная.НайтиПоНомеру(ДокУТ.Номер, ДокУТ.Дата);

Так же если не найден склад, контрагент или другой реквизит документа то он создается с тем же кодом

Вот пример для склада: 

Функция НайтиСклад(СкладУТ) Экспорт
Если СкладУТ.наименование = "" Тогда
Возврат "";
КонецЕсли;

Склад = Справочники.Склады.НайтиПоКоду(СкладУТ.Код);
Если Не (СкладУТ.Description = "") Тогда
Если Склад.Пустая() Тогда
Склад = Справочники.Склады.СоздатьЭлемент();
Склад.Код = СкладУТ.Код;
Склад.ТипСклада = НайтиПеречисление(УТ.XMLСтрока(СкладУТ.ВидСклада), "ВидСклада");
Склад.Наименование = СкладУТ.Наименование;
Если ЗначениеЗаполнено(СкладУТ.ТипЦенРозничнойТорговли.Код) Тогда
Если ЗначениеЗаполнено(ТипЦеныДляРозничногоСклада) Тогда
Склад.ТипЦенРозничнойТорговли = ТипЦеныДляРозничногоСклада;
Иначе
Склад.ТипЦенРозничнойТорговли = Константы.ТипЦенПлановойСебестоимостиНоменклатуры.Получить();
КонецЕсли;
КонецЕсли;

Попытка
Склад.Записать();
Сообщить("Записан склад: """ + Склад.Наименование + """");

НовыйОбъект = РезультатПереноса.Найти("Склад", "Вид");
Если НовыйОбъект <> Неопределено Тогда
НовыйОбъект.СозданоНовых = НовыйОбъект.СозданоНовых + 1;
Иначе
НовыйОбъект = РезультатПереноса.Добавить();
НовыйОбъект.Вид = "Склад";
НовыйОбъект.СозданоНовых = 1;
КонецЕсли;
Исключение

Сообщить(ОписаниеОшибки());
КонецПопытки;
КонецЕсли;
Возврат Склад.Ссылка;
Иначе
Возврат Справочники.Склады.ПустаяСсылка();
КонецЕсли;

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

Отдал бухгалтерам и забыл.