Изменение типа штрихкода

Запись.ТипШтрихкода = ПланыВидовХарактеристик.ТипыШтрихкодов.EAN8;

Да, так работает, но не могу сохранить изменения, пробовал 2 варианта
НаборЗаписей = РегистрыСведений.Штрихкоды.СоздатьНаборЗаписей();
НаборЗаписей.Прочитать();
Для каждого Запись из НаборЗаписей Цикл
Если СтрДлина(СокрЛП(Запись.Штрихкод))=8 Тогда
Запись.Штрихкод=СокрЛП(Запись.Штрихкод);
Запись.ТипШтрихкода = ПланыВидовХарактеристик.ТипыШтрихкодов.EAN8;
Сообщить(Запись.ТипШтрихкода.Наименование+" "+Запись.Штрихкод);
КонецЕсли;
КонецЦикла;
НаборЗаписей.Записать();
Выдается сообщение ...уже имеет владельца...

Вариант 2 через ТЗ

НаборЗаписей = РегистрыСведений.Штрихкоды.СоздатьНаборЗаписей();
НаборЗаписей.Прочитать();
ТЗ=НаборЗаписей.Выгрузить();
Для Каждого СтрОтбор из ТЗ Цикл
Если СтрДлина(СокрЛП(СтрОтбор.Штрихкод))=8 Тогда
СтрОтбор.Штрихкод=СокрЛП(СтрОтбор.Штрихкод);
СтрОтбор.ТипШтрихкода = ПланыВидовХарактеристик.ТипыШтрихкодов.EAN8;
КонецЕсли;
КонецЦикла;
НаборЗаписей.Загрузить(ТЗ);
Ничего не выдается, но и не записывается

Выдается сообщение ...уже имеет владельца...
попробуй очистить потом записать

Пробовал, с ТЗ,
НаборЗаписей.Очистить();
НаборЗаписей.Загрузить(ТЗ);
НаборЗаписей.Записать();

Не работает, тут надо как-то по другому зайти

Через ПолучитьМенеджерЗаписи() или СоздатьМенеджерЗаписи() надо делать

копируеш записи в ТЗ

i Как удалить все записи из независимого регистра сведений?
НаборЗаписей = РегистрыСведений.ТорговоеОборудование.СоздатьНаборЗаписей();
НаборЗаписей.Записать();

потом создаеш записи из своей ТЗ

Можно конечно проще через отборы - но там надо понимать что делаеш.

Не работает

ШК = РегистрыСведений.Штрихкоды;
Выборка = ШК.Выбрать();
Пока Выборка.Следующий() Цикл
Если СтрДлина(СокрЛП(Выборка.Штрихкод))=8 Тогда
МенеджерЗаписи = Выборка.ПолучитьМенеджерЗаписи();
МенеджерЗаписи.Штрихкод=СокрЛП(Выборка.Штрихкод);
МенеджерЗаписи.ТипШтрихкода = ПланыВидовХарактеристик.ТипыШтрихкодов.EAN8;
МенеджерЗаписи.Записать();
ОбработкаПрерыванияПользователя();
КонецЕсли;
КонецЦикла;

... уже имеет владельца ...
Думаю надо через справочник номенклатуры зайти, но пока умных мыслей нет...

ПередЗаписью в регистр Штрихкоды происходит проверка на наличие записи с записываемым штрихкодом.
Можно в процедуре ПередЗаписью в начало добавить
Можно временно отключить контроль уникальных штрихкодов (в настройках учета если в конфе если есть такая константа) или запись (записи) сначала удалить, а потом записать.

Зашел через справочник номенклатуры
Номенклатура = Справочники.Номенклатура.Выбрать();

Пока Номенклатура.Следующий() Цикл

Наим = Номенклатура.Наименование;
Ссылка = Номенклатура.Ссылка;

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

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

Если СтрДлина(СокрЛП(Запись.Штрихкод))=8 Тогда
Запись.Штрихкод=СокрЛП(Запись.Штрихкод);
Запись.ТипШтрихкода = ПланыВидовХарактеристик.ТипыШтрихкодов.EAN8;
Сообщить(Запись.ТипШтрихкода.Наименование+" "+Запись.Штрихкод);
КонецЕсли;

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

Но увы ...уже имеет владельца...
Как вариант, считать данные, удалить, а потом добавить в РегистрыСведений.Штрихкоды

Задачка решена
НаборЗаписей = РегистрыСведений.Штрихкоды.СоздатьНаборЗаписей();
НаборЗаписей.Прочитать();
//Выгружаем регистр штрихкодов в ТЗ и делаем, что нам нужно
ТЗ=НаборЗаписей.Выгрузить();
Для Каждого СтрОтбор из ТЗ Цикл
Если СтрДлина(СокрЛП(СтрОтбор.Штрихкод))=8 Тогда
СтрОтбор.Штрихкод=СокрЛП(СтрОтбор.Штрихкод);
СтрОтбор.ТипШтрихкода = ПланыВидовХарактеристик.ТипыШтрихкодов.EAN8;
Сообщить(СтрОтбор.ТипШтрихкода);
Сообщить(СтрОтбор.Штрихкод);
КонецЕсли;
КонецЦикла;
//Зачищаем в регистр штрихкодов
НаборЗаписей = РегистрыСведений.Штрихкоды.СоздатьНаборЗаписей();
НаборЗаписей.Записать();
//Грузим в регистр штрихкодов наши данные из ТЗ
НаборЗаписей.Загрузить(ТЗ);
НаборЗаписей.Записать();