обработка

Вот мне и нужен контроль уникальности. <br>Если использовать Если "СтрДлина(а)>СтрДлина(б)", то цикл очень быстро заканчивается и ничего не меняет. Если использовать "а<>б", то на каком-то шаге возникает ошибка "код не уникален". Может нужно еще какая-нибудь проверка на уникальность? <br>

>Если использовать Если "СтрДлина(а)>СтрДлина(б)", то цикл очень быстро заканчивается и ничего не меняет.<br>><br>Стоит такое предположить, так как если реквизиты "Код" и "НомерИнвКарт" одинаковой длины, то это<br>условие просто никогда не выполняется.<br><br>>Может нужно еще какая-нибудь проверка на уникальность?<br>><br>А вот это зависит от того, какие данные вы вводили. Тут если таких элементов не много<br>то просто руками изменить номер инв. карты и соответственно переправить нумерацию инвентарных<br>карт, если требеутся. Тогда обработка пройдёт нормально.<br>Так же стоит подумать, а нельзя ли данное сделать другими путями.<br>А изменять или отключать контроль уникальности у справочника не стои вообще.<br>так как проблем потом какие-нибудь возникнуть могут

"Можно попробовать что-то вроде:<br>Для Д = 1 по Спис.РазмерСписка() Цикл<br> ОС = Спис.ПолучитьЗначение(Д);<br> Состояние("2. " + ОС.Наименование);<br> а = Лев(ОС.Код, СтрДлина(ОС.НомерИнвКарт));<br> б = Лев(ОС.НомерИнвКарт, СтрДлина(ОС.Код));<br> Если ПустоеЗначение(б) = 0 Тогда<br>       Если Спр.НайтиПоКоду(б)=1 Тогда<br>             //Тут чего-нибудь делаем если такой код уже есть<br>             //Можно просто сообщать о таких элементах и потом руками переправить<br>       КонецЕсли;<br>       Спр.НайтиЭлемент(ОС);<br>       Спр.Код = б;<br>       Спр.НомерИнвКарт = а; <br>       Спр.Записать();<br>       Сообщить("Обмен: " + ОС.Код + " " + ОС.Наименование+" "+ ОС.НомерИнвКарт); <br> КонецЕсли;<br>КонецЦикла; <br>КонецПроцедуры"