Что не так

//Отбор, фильтрация
НаборЗаписейРегистра = РегистрыСведений.Штрихкоды.СоздатьНаборЗаписей();
НаборЗаписейРегистра.Прочитать();


//Перебор (обход) в цикле и корректировка записей регистра сведений, попавших в отбор.
Для Каждого ЗаписьРегистра Из НаборЗаписейРегистра Цикл
   Если (Лев(ЗаписьРегистра.Штрихкод,3) = "000") И (СтрДлина(ЗаписьРегистра.Штрихкод)=12) Тогда
        Сообщить(ЗаписьРегистра.Штрихкод);
        ЗаписьРегистра.Штрихкод = Прав(ЗаписьРегистра.Штрихкод,СтрДлина(ЗаписьРегистра.Штрихкод-1)) + РаботаСТорговымОборудованием.КонтрольныйСимволEAN(ЗаписьРегистра.Штрихкод, 13);
        ЗаписьРегистра.ТипШтрихкода = ПланыВидовХарактеристик.ТипыШтрихкодов.Code39;
           КонецЕсли;
КонецЦикла;
НаборЗаписейРегистра.Записать();

Прут ошибки:
Штрихкод: 8411061689417 уже имеет владельца "Т\в " 212"".
Штрихкод: 8411061695951 уже имеет владельца "Т\в"Antonio Banderas"".
Штрихкод: 8411061698594 уже имеет владельца "Т\в"Antonio Banderas"".
Штрихкод: 8411061698600 уже имеет владельца "Лосьон "Antonio Banderas"".
Штрихкод: 8411061700235 уже имеет владельца "Део "Антонио Бандерас"".
Штрихкод: 8411061701034 уже имеет владельца "Т\в"Antonio Banderas"".
Штрихкод: 8411061701041 уже имеет владельца "Т\в"Antonio Banderas"".
Штрихкод: 8411061711767 уже имеет владельца "Т\в " 212 VIP" жен.".
Штрихкод: 8411061711774 уже имеет владельца "Т\в " 212 VIP" жен.".
Штрихкод: 8411061711804 уже имеет владельца "Т\в " 212 VIP" жен.".
Штрихкод: 8411061717349 уже имеет владельца "Део"212"".
Штрихкод: 8411061720066 уже имеет владельца "Т\в " CH L`eau "".
Штрихкод: 8411061720974 уже имеет владельца ""Антонио Бандерас"".
Штрихкод: 8411061722398 уже имеет владельца ""Антонио Бандерас"".
Штрихкод: 8411061722404 уже имеет владельца ""Антонио Бандерас"".
Штрихкод: 8411061722756 уже имеет владельца ""Антонио Бандерас"".
Штрихкод: 8411061723760 уже имеет владельца "Т\в " 212"".
Штрихкод: 8411061723777 уже имеет владельца "Т\в " 212"".
Штрихкод: 8411061723784 уже имеет владельца "Лосьон " 212"".
Штрихкод: 8411061723791 уже имеет владельца "Део " 212"".
Штрихкод: 8411061725931 уже имеет владельца "Т\д"Valentina"".
Штрихкод: 8411061727935 уже имеет владельца ""Антонио Бандерас"".

Он у тебя скорее всего по пустому владельцу пишет. Посмотри Набор при записи там все измерения указаны

да в записях вроде везде владелец

я даже в них ничего не меняю просто записываю, ошибки прут

Даже так:

//Отбор, фильтрация

НаборЗаписейРегистра = РегистрыСведений.Штрихкоды.СоздатьНаборЗаписей();
НаборЗаписейРегистра.Прочитать();


//Перебор (обход) в цикле и корректировка записей регистра сведений, попавших в отбор.

Для Каждого ЗаписьРегистра Из НаборЗаписейРегистра Цикл

КонецЦикла;
НаборЗаписейРегистра.Записать();

а в чем собственно вопрос? почему у тебя в регистре есть дубли штрихкодов?

нет их там

(6) проверил по регистру, нет

мне кажется что то не так делаю с набором записей, так как я пробежал по этим штрихкодам, нет дублежей

а вообще всё верно он тебе ругается, надо записи бы предварительно очистить, прежде чем записывать.
у тебя без всяких отборов создается набор записей, соответственно при записи он не знает что замещать и пытается записать ещё раз твои записи, вот и ругается.
По идее как-то так.

(8) посмотри процедуры ПриЗаписи() передЗаписью() регистра и подписки. Может там чего делается.

вот так получилось:


Рег = РегистрыСведений.Штрихкоды;
   Выборка = Рег.Выбрать();
   Пока Выборка.Следующий() Цикл
       Запись = Выборка.ПолучитьМенеджерЗаписи();
       Запись.Прочитать();
       Если (Лев(Запись.Штрихкод,3) = "000") И (СтрДлина(Запись.Штрихкод)=12) Тогда

       Запись.Штрихкод = Прав(Запись.Штрихкод,СтрДлина(Запись.Штрихкод-1)) + РаботаСТорговымОборудованием.КонтрольныйСимволEAN(Запись.Штрихкод, 13);
       Запись.ТипШтрихкода = ПланыВидовХарактеристик.ТипыШтрихкодов.Code39;
       
       КонецЕсли;
       Запись.Записать();
   КонецЦикла;

(0) НаборЗаписейРегистра.Записать(Истина);

(12) учи мат часть )

(11) Собственно как я и думал )

(12) + из СП:
"...Определяет режим замещения существующей записи в соответствии с текущими установками отбора(!). Истина - перед записью существующие записи будут удалены..." - и что, позвольте вас спросить, он будет пытаться удалить перед записью?

(13) Не спеши впереди паравоза :)

а вообще лучше сделать как-то так

Запрос = Новый Запрос;
Запрос.Текст = "Выбрать РС.* ИЗ РегистрСведений.Штрихкоды как РС";
ТаблицаШК = Запрос.Выполнить().Выгрузить();
Для каждого Запись из ТаблицаШК цикл
       Если (Лев(Запись.Штрихкод,3) = "000") И (СтрДлина(Запись.Штрихкод)=12) Тогда

       Запись.Штрихкод = Прав(Запись.Штрихкод,СтрДлина(Запись.Штрихкод-1)) + РаботаСТорговымОборудованием.КонтрольныйСимволEAN(Запись.Штрихкод, 13);
       Запись.ТипШтрихкода = ПланыВидовХарактеристик.ТипыШтрихкодов.Code39;
       
       КонецЕсли;

КонецЦикла;

НаборЗаписей = РегистрыСведений.ШтрихКоды.СоздатьНаборЗаписей();
НаборЗаписей.Загрузить(ТаблицаШК);
НаборЗаписей.Записать();
[\1c]
Так как-то красивее что ли...

(16) +1

PS: но вот так "красивше" должно получиться:


Фрагмент алгоритма


(17) не видно что-то ) написано "Фрагмент алгоритма" и всё )