8.х Поиск дублей в справочнике номенклатура

Тема в разделе "Другие решения", создана пользователем RoJa, 24 ноя 2017.

  1. TopicStarter Overlay
    RoJa
    Offline

    RoJa

    Регистрация:
    24 ноя 2017
    Сообщения:
    8
    Симпатии:
    0
    Баллы:
    1
    Всем доброго времени суток, никак не могу справиться с задачей, нужно осуществить обработкой поиск дублей в справочнике номенклатура и вывести в табличную часть повторяющиеся элементы, поиск необходимо делать по номенклатурным номерам.
    Написал такой код работает не корректно, выводит записи с пустыми номенклатурными номерами, а нужно с повторяющимися

    ДС = Ном;
    ТабличнаяЧасть1.Очистить();
    Запрос = Новый Запрос;
    Запрос.Текст =
    "ВЫБРАТЬ
    | Номенклатура.Ссылка КАК Номенклатура,
    | Номенклатура.Родитель КАК Папка,
    | Номенклатура.Код,
    | Номенклатура.Наименование,
    | Номенклатура.НоменклатурныйНомер
    |ИЗ
    | Справочник.Номенклатура КАК Номенклатура
    |ГДЕ
    | Номенклатура.Родитель В ИЕРАРХИИ(&ДС)";
    Запрос.УстановитьПараметр("ДС",Ном);

    Результат = Запрос.Выполнить().Выбрать();
    Результат2 = Запрос.Выполнить().Выбрать();

    Пока Результат.Следующий() Цикл
    пСпр = Результат.Номенклатура.ПолучитьОбъект();

    Пока Результат2.Следующий() Цикл
    пСпр2 = Результат2.Номенклатура.ПолучитьОбъект();
    Если Результат.НоменклатурныйНомер=Результат2.НоменклатурныйНомер тогда

    старт = ТабличнаяЧасть1.Добавить();
    старт.Код = Результат2.Номенклатура.Код;
    старт.Наименование = Результат2.Номенклатура.Наименование;
    старт.НоменклатурныйНомер = Результат2.Номенклатура.НоменклатурныйНомер;

    КонецЕсли;
    КонецЦикла;

    КонецЦикла;
    КонецПроцедуры
  2. nsk1C
    Offline

    nsk1C Профессионал в 1С

    Регистрация:
    25 май 2016
    Сообщения:
    2.158
    Симпатии:
    195
    Баллы:
    104
    Последнее редактирование: 24 ноя 2017
  3. TopicStarter Overlay
    RoJa
    Offline

    RoJa

    Регистрация:
    24 ноя 2017
    Сообщения:
    8
    Симпатии:
    0
    Баллы:
    1
    случайно создал 2 темы, интернет затроил