А как перенумеровать номенклатуру, а то номера сбились, приходится вручную номер нового товара вводить.
Спасибо
Саня
Вид для печати
А как перенумеровать номенклатуру, а то номера сбились, приходится вручную номер нового товара вводить.
Спасибо
Саня
В конфигураторе убрать Контроль нумерации
Сделать внешнею обработку а в ней:
Процедура Сформировать()
Спр=СоздатьОбъект("Справочник.Номенклатура");
Спр.ВыбратьЭлементы();
К=0;
Пока Спр.ПолучитьЭлемент()=1 цикл
К=К+1;
Спр.ТекущийЭлемент();
Спр.Код=К;
Спр.Записать();
КонецЦикла;
КонецПроцедуры
Включить Контроль нумерации
И запустить ее.
Fosihas, так нельзя :(.
Код у спр. номенклатура текстовый с ведущими нулями, поэтому тут нужна вот такая процедура:
1) отключаем контроль уникальности кода
2)запускаем обработку
3) включаем контроль уникальности
сама обработка требует изменения:
Процедура Выполнить()
Спр=СоздатьОбъект("Справочник.Номенклатура");
Спр.ВыбратьЭлементы();
К=0;
Пока Спр.ПолучитьЭлемент()=1 цикл
К=К+1;
Спр.ТекущийЭлемент();
НКод="00000000"+К;
спр.код=прав(НКод,9); // 9- длина кода в справочнике номенклатура, нулей 8 ведущих максимум
сообщить(спр.код);
Спр.Записать();
КонецЦикла;
КонецПроцедуры
На диске ИТС есть соответствующая обработка.