Пытаюсь назначить кода для справочника, но почему-то выбобрка проходит не по всем элементам. Если же закомментить строки с назначением кода сохранением элемента, то выбирает все. Конетроль уникальности отключен.

Процедура Сформировать()
   Кодик = 0;
   СпрК = СоздатьОбъект("Справочник.Контрагенты");
   СпрК.ВыбратьЭлементы();
   Пока СпрК.ПолучитьЭлемент()=1 цикл
       Если СпрК.Код = "ЦБ000305" тогда
           сообщить("!");    
       
       состояние(строка(СпрК.ТекущийЭлемент()));
       СпрТЦ = СоздатьОбъект("Справочник.ТипыЦенКонтрагентов");
       СпрТЦ.ИспользоватьВладельца(СпрК.ТекущийЭлемент());
       СпрТЦ.ПорядокНаименований();
       СпрТЦ.ВыбратьЭлементы();
       Пока СпрТЦ.ПолучитьЭлемент()=1 цикл
           Кодик = Кодик+1;
           СпрТЦ.Код = прав("0000000"+Кодик,7);
           сообщить(строка(СпрТЦ.Код));
           СпрТЦ.Записать();
       КонецЦикла;
       КонецЕсли;
   КонецЦикла;
КонецПроцедуры

ПорядокНаименований()

Без этого не даст кода даобовлять

тогда посоветуйте пжл, как тут кода назначить можно!

запихать в с список - потом назначить
Или, взять типовой перенумератор с диска итс

не вспомнишь название обработки типового перенумератора?

(4)а что не так в (0)? На первый взгляд всё дожно работать...

ну вот так, не работает

(5) входит в состав обработок uchoice.ert

спасибо

Тут есть одна особенность.
При любой записи объекта в 1с 7.7 выборка текущего объекта сбрасывается.

Процедура Сформировать()
   Кодик = 0;
   СпрК = СоздатьОбъект("Справочник.Контрагенты");
   СпрК.ВыбратьЭлементы();
   Пока СпрК.ПолучитьЭлемент()=1 цикл
       Если СпрК.Код = "ЦБ000305" тогда
           сообщить("!");    
       
       состояние(строка(СпрК.ТекущийЭлемент()));
       СпрТЦ = СоздатьОбъект("Справочник.ТипыЦенКонтрагентов");
       СпрТЦзапись = СоздатьОбъект("Справочник.ТипыЦенКонтрагентов");
       СпрТЦ.ИспользоватьВладельца(СпрК.ТекущийЭлемент());
       СпрТЦ.ВыбратьЭлементы();
       Пока СпрТЦ.ПолучитьЭлемент()=1 цикл
           Кодик = Кодик+1;
           СпрТЦзапись=НайтиОбъект(СпрТЦ.ТекущийЭлемент());
           СпрТЦзапись.Код = прав("0000000"+Кодик,7);
           сообщить(строка(СпрТЦзапись.Код));
           СпрТЦзапись.Записать();
       КонецЦикла;
       КонецЕсли;
   КонецЦикла;
КонецПроцедуры

Вот так будет работать. "Более лучший" вариант - обход спрвочника через запрос.

Renumber она называется.

(10) не ври - не при любой выборке

и не сбрасывается, а сбивается. И только при изменении+записи реквизита, по котрому индекс выборки.
(12)так что не так у автора?

(13) Ну да, сбивается. Не вижу принципиальной разницы :)
(12) Пример с "ВыбратьЭлементы()", где после записи выборка не сбивается - в студию!

Хотя да, точно сбивается при смене наименования/кода, но я (после грабель) всегда страхуюсь :)

(13) я не проерял, думаю ИспользоватьВладельца не дружит потом с порядком наименований.. хотя хз, с виду должно и так работать

(14) наслаждайся:

пример 1:

Спр.ВыбратьЭлементы(0);
Пока Спр.ПолучитьЭлемент()=1 Цикл
  Спр.Код = _GetPerformanceCounter();
  Спр.Наименование = "Вася";
  Спр.Записать();
КонецЦикла;

пример 2:
Спр.ПорядокКодов();
Спр.ВыбратьЭлементы();
Пока Спр.ПолучитьЭлемент()=1 Цикл
  Спр.Наименование = "Вася";
  Спр.Записать();
КонецЦикла;

пример 3:

Спр.ПорядокНаименований();
Спр.ВыбратьЭлементы();
Пока Спр.ПолучитьЭлемент()=1 Цикл
  Спр.Код = _GetPerformanceCounter();
  Спр.Записать();
КонецЦикла;

на всякий случай:
А длина наименования у тебя >0? Нескольких с пустым наименованиями нет?

(17) не работают у меня такое. Ни один из примеров. Проходит только одну итерацию.
Если что - 7.7, база скуль 2000.

(19) Хватит велик изобретать пользуйся (8)

(19) врешь

ты и не пробовал ни один