Код элемента справочника не уникальный!!!

Новая тема
Помогите. <br>В 1С торговля-склад у справочника стоит значение: длина кода 5 символов. В базе был создан справочник под кодом 99999, при создании следущего элемента справочника, предлагается код 10000(при попытке созранится выходит сообщение "код не уникальный!"). Что делать?<br>с 1 по 99999 используются около 30000 элементов, как сделать чтобы 1С предлагала код из пула 1-99999, из тех что не используется.<br>Возможно ли сделать кнопку, чтобы 1С предлагала уникальный код?
Можно сделать миниотчет "СвободныйКод", который будет выводить вам уникальный код из вашего "пула".
"Я придумал сделать только такое, а вот как создать "отчет" или включить перебор номеров не знаю - не специалист. Кто нибудь кодом может помочь?<br><br>Процедура ПриНажатии()<br> <br>    Код = СчитатьКод;<br> СчитатьКод = ...<br> <br>КонецПроцедуры"
"Процедура ПриНажатии()<br><br> ТипКода = Метаданные.Справочник("Номенклатура").ТипКода;<br> ДлинаКода = Метаданные.Справочник("Номенклатура").ДлинаКода;<br> <br> Если ДлинаКода = 0 Тогда<br>    Возврат;<br> КонецЕсли;<br> <br> МаксКод = """";<br> <br> СчетчикЦикла = 0;<br> Для СчетчикЦикла = 1 По ДлинаКода Цикл<br> МаксКод = МаксКод + "9";<br> КонецЦикла;<br> <br> МаскаКода = СтрЗаменить(МаксКод, "9", "0");<br> МаксКод = Число(МаксКод);<br> <br> СпрНоменклатура = СоздатьОбъект("Справочник.Номенклатура");<br> <br> СчетчикЦикла = 0;<br> Для СчетчикЦикла = 1 По МаксКод Цикл<br> <br> Если СчетчикЦикла % 100 = 0 Тогда<br>    Проц = Окр(СчетчикЦикла * 100 / МаксКод);<br> Состояние("Определение кода: " + Проц + "%");<br> КонецЕсли;<br> <br> Если ТипКода = "Текстовый" Тогда<br>    <br> ТекКод = Лев(МаскаКода, ДлинаКода - СтрДлина(Строка(СчетчикЦикла))) + СчетчикЦикла;<br> <br> Иначе<br> <br> ТекКод = СчетчикЦикла;<br> <br> КонецЕсли;<br> <br> Если СпрНоменклатура.НайтиПоКоду(ТекКод) = 0 Тогда<br>    Код = ТекКод;<br> Прервать;<br> КонецЕсли;<br> <br> КонецЦикла;<br> <br>КонецПроцедуры"
Большое спасибо дорогой друг - все работает. Если не сложно, то не посоветуешь как подкорректоровать код, чтобы он кода выбирал не с 1 по 99999, а с 10000 по 99999. (Мне важно чтобы код начинался с любой цифры кроме нуля).
в твоём случае:<br>.....<br>Для СчетчикЦикла = 10000 По МаксКод Цикл<br>.....<br>можно сделать также универсально, как и остальной код программы<br>
спасибо огромное
...ну так напиши ему универсально, сообщение то может еще какому-нибудь "убийце автонумерации" пригодиться. :)
Читают тему

Быстрый переход