Перезаписываться записи регистра сведений при переносе

Форум Программирование Интеграция и обмен данными, конвертация данных (Обмен)

1С:Конвертация данных

1. vsesam80 04.04.23 02:10 Сейчас в теме

Доброго времени.
При выгрузке каждой номенклатуры выгружаем все записи регистра цены номенклатуры для конкретно неё.
Однако, если цены номенклатуры установлены в один день, они перезаписываются. И в итоге вместо трех цен имеем одну запись в приемнике.
перенос с УТП 2 в Бух 3
Галки не перезаписывать, а создавать установлены. На приемнике в отладчике в событии ПриЗагрузке для для регистра сведений параметр НеЗамещатьОбъект так же истина. Но все равно перезапись идет
Подскажите как сделать что бы не было перезаписи

По теме из базы знаний

Ответы

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

Свернуть все

2. nomad_irk 76 04.04.23 07:17 Сейчас в теме

(1)выгружать записи регистра не по одной, а все имеющиеся по номенклатуре

3. TokarevV 33 04.04.23 07:38 Сейчас в теме

У меня в бухгалтерии периодичность в пределах дня, если не измените, то и не сможете в регистр записать несколько цен в один день.

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

5. vsesam80 04.04.23 14:23 Сейчас в теме

(3)ну менять типовую такое себе...а с расширениями я еще не экспериментировал. не уверен даже что так можно и правильно в расширении делать

4. vsesam80 04.04.23 14:21 Сейчас в теме

В итоге решил так после эксперементов:
Процедура ПКО_ПослеЗагрузки_ЦеныНоменклатуры(ФайлОбмена, Отказ, Ссылка, Объект, ПараметрыОбъекта, ОбъектМодифицирован,
ИмяТипаОбъекта, ОбъектНайден, НаборЗаписей) Экспорт

НаборЗаписей = РегистрыСведений.ЦеныНоменклатуры.СоздатьНаборЗаписей();
НаборЗаписей.Отбор.Регистратор.Установить(Объект.регистратор);
НоваяЗапись = НаборЗаписей.Добавить();
НоваяЗапись.Период = ПараметрыОбъекта.Получить("Период");//тут параметр передаваемый в источнике
НоваяЗапись.Организация = Справочники.Организации.НайтиПоКоду("000000001");
НоваяЗапись.Номенклатура = Объект.Номенклатура;
НоваяЗапись.ТипЦен = Объект.ТипЦен;
НоваяЗапись.Цена = Объект.Цена;
НаборЗаписей.Записать(Ложь);

КонецПроцедуры
было выгружено 27200 записей, 20 с чем то не записались из-за неуникальности. терпимо

Оставьте свое сообщение

E-mail: