Перенумерация номенклатуры

[Аноним]

А как перенумеровать номенклатуру, а то номера сбились, приходится вручную номер нового товара вводить.

Спасибо
Саня

[Fosihas]

В конфигураторе убрать Контроль нумерации
Сделать внешнею обработку а в ней:

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

Включить Контроль нумерации

И запустить ее.

[aXeL]

Fosihas, так нельзя .
Код у спр. номенклатура текстовый с ведущими нулями, поэтому тут нужна вот такая процедура:
1) отключаем контроль уникальности кода
2)запускаем обработку
3) включаем контроль уникальности

сама обработка требует изменения:

Процедура Выполнить()
Спр=СоздатьОбъект("Справочник.Номенклатура");
Спр.ВыбратьЭлементы();
К=0;
Пока Спр.ПолучитьЭлемент()=1 цикл
К=К+1;
Спр.ТекущийЭлемент();
НКод="00000000"+К;
спр.код=прав(НКод,9); // 9- длина кода в справочнике номенклатура, нулей 8 ведущих максимум
сообщить(спр.код);
Спр.Записать();
КонецЦикла;

КонецПроцедуры

[kos]

На диске ИТС есть соответствующая обработка.