Подскажите, пожалуйста. Не большой знаток клюшек
Во время переноса данных самописными обработками "моргнул свет", и в подчинённом справочнике задвоились элементы. Теперь при попытке перезаписи некоторых элементов ругается о неуникальности кодов.
Очень не хочется перегружать весь справочник полностью, там около 500 тысяч элементов. Уникальность отключить нельзя. ТиИ ошибок никаких не находит.

что куда переносили то?

и где задвоилось?

(2) справочник. в 7.7

(0) "Починить" через форум вашими руками?

(0) поставьте в подчиненном справочнике серии кодов в пределах подчинения.

и усё.

(6) неа, не помогло.
снимал галочку контроль уникальности, потом назад ставил, надеялся, что 77 сами удалят неуникальные, но нет, ругается, что есть и дальше не пускает.

Кто, куда, кого не пускает ?

И, что в тво1ём понятии "неуникальные" ?

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

(9) если выкл контроль уникальности, сохранить конфу, а потом вкл контроль и попытаться сохранить, то ругается на наличие неуникальных кодов справочника, и дальше сохранение не идёт.

(11) взять обработку, перенумеровать коды. Наслаждаться

(10) в семёрке кодить ммм(((

любой ючойз это умеет

(14) перенумеровывать не надо, это дубли..
ясно, только обработкой удалять

там кода блин на один экран.. большой...

(16) :) немного меньше :)

(15) вопрос к тебе: открываешь спр-Родитель, в нём "открыть подчиненный" с выводом по группам, сразу видишь два-три одинаковых (с одним кодом) элемента? такая картина примерно?

(0) перенос как делался? какими инструментами?

(17) да, именно

(18) самописными обработками. из текстового файла берутся значения, создаются элементы...

так.. я побежал за попкорном и колой...
8-ки что ли загрузку в 77 писали?

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

нормально?

(22)нет

(23) правильно, зачем нам Д справочник вообще, можно сразу Н перебирать

(16) 16 строк :)

(22) в ТЗ не такой оператор поиска, посмотри в СП

(25) публикуй ;-)

И лучше использовать СЗ, а не ТЗ. И чистить её сразу после оператора:
Пока ДК.ПолучитьЭлемент()=1 Цикл

(26) 52р. 37 копеек :)

НайтиЗначение(<?>,,);
Синтаксис:
НайтиЗначение(<Знач>,<Строка>,<Колонка>)
Назначение:
Найти заданное значение в таблице значений. Возвращает число: 0 - значение не найдено; 1 - значение найдено
Параметры:
<Знач> - значение для поиска.

(29) и где в твоем коде <Строка>,<Колонка>?
И перед его выполнением присвоить: Строка=0;

НАДК.Удалить(1);

(30) это не обязательные параметры
(31) по-умолчанию, там и так 1

(22) твоя ошибка в коде - коды могут быть одинаковыми для разных владельцев.
Тебе надо делать УдалитьСтроки  в первом цикле .

(32) не могут, там стояла уникальность во всём справочнике. это я только после тебя ставил туда-обратно в пределах подчинения.

получается вот так
    //ДК = СоздатьОбъект("Справочник.Д");
    НАДК=СоздатьОбъект("Справочник.Н");
    Табл=СоздатьОбъект(СписокЗначений");//"ТаблицаЗначений");
    //Табл.НоваяКолонка("Код","Число");
    //ДК.ВыбратьЭлементы();
    //Пока ДК.ПолучитьЭлемент()=1 Цикл
    //    НАДК.ИспользоватьВладельца(ДК.ТекущийЭлемент());
        НАДК.ВыбратьЭлементы();
        Пока НАДК.ПолучитьЭлемент()=1 Цикл
            Если Табл.НайтиЗначение(НАДК.Код)=0 Тогда
                //Табл.НоваяСтрока();
                //Табл.Код = НАДК.Код;
                Табл.ДобавитьЗначение(НАДК.Код);
            Иначе
                НАДК.Удалить(1);
            КонецЕсли;
        КонецЦикла;
    //КонецЦикла;

должно сработать

(34) НАДК.ВыбратьЭлементы(0);

(28) жадина... ;-)

(37) а поторговаться = 2р.37 копеек! неправда ваша :)

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

Вот так примерно :)

+38 это если "В пределах подчинения"
надо смотреть, что там у него в БД осталось..
или "По всему справочнику"

как-то мне не нравится удаление в выборке...

(40) ты прав!..
это типичный пример г-кода :)
Думать уже неохота :)

хотя.. может проскочить
СПЕ.Удалить(0);