Поиск и замена дублирующих элементов (условие по нескольким полям, определение правильных по заполненности реквизитов)

15 Comments

1. Artemuch2 26.04.2012 at 13:13

   Добрый день! А в обработке вы учли функционал наработанный коллегами в предыдущих версиях или это совсем другая обработка замены значений»

   Reply ↓
2. sokol_5441 27.04.2012 at 08:09

   Это обработка взята из «Управление торговлей 10.3», доработана. Она универсальна

   Reply ↓
3. xrays 25.07.2012 at 16:59

   Замечательная обработка. Здорово помогла для исправления ситуации с задвоенной номенклатурой. Спасибо!!!

   Reply ↓
4. ylyas 14.09.2012 at 15:45

   доп отборы на сравнение не работают.
   
   проверял на упп справочник договоров.
   
   задав сравнение на орг = орг и контрагент= контрагент и вид договора = вид договора
   
   получил в совпавших группах договора разных организаций.

   Reply ↓
5. Pim 11.01.2013 at 08:30

   Reply ↓
6. ylyas 13.01.2013 at 06:42

   ну использование английского чтобы отличать свой код среди остального — не супер четкий аргумент, скажем так ))

   Reply ↓
7. tofree 29.04.2013 at 15:46

   не работает в УТ 11 в серверном варианте (заупк клиента: обычное приложение)

   Reply ↓
8. prodines 06.05.2013 at 13:36

   Привязки в форме не установлены.

   Reply ↓
9. heavymetal 07.04.2015 at 11:32

   (0) исправьте ошибку, указанную в 4 комментарии, тогда плюсану

   Reply ↓
10. heavymetal 07.04.2015 at 11:38

    (5) Pim, спасибо, Ваша дописка помогла

    Reply ↓
11. shard 31.05.2017 at 11:47

    В процедуре УстановитьВернымПоЗаполненностиРеквизитаНажатие исправить
    

       Для Каждого Строка Из МассивСтрок Цикл
    Если ЗначениеЗаполнено(Строка.Ссылка[ИмяРеквизита]) Тогда
    Строка.Правильный = Истина;
    Прервать;
    КонецЕсли;
    КонецЦикла;
    

    на
    

       Для Каждого Строка Из МассивСтрок Цикл
    Строка.Правильный = ЗначениеЗаполнено(Строка.Ссылка[ИмяРеквизита]);
    КонецЦикла;
    

    Reply ↓
12. shard 02.06.2017 at 10:58

    (11) а еще лучше эту процедуру заменить на
    

    Процедура УстановитьВернымПоЗаполненностиРеквизитаНажатие(Элемент)
    
    ИмяРеквизита = «»;
    ВыбранноеЗначение = ВыбратьИзСписка(СписокРеквизитовСправочника, ЭлементыФормы.УстановитьВернымПоЗаполненностиРеквизита);
    Если ВыбранноеЗначение = Неопределено Тогда
    Предупреждение(«Действие отменено»);
    Возврат;
    Иначе
    ИмяРеквизита = ВыбранноеЗначение.Значение;
    КонецЕсли;
    
    мРезультатыПоиска.сортировать(«КоличествоСсылок убыв»);
    Для каждого Стр Из ТаблицаГрупп Цикл
    НомерТекГруппы = Стр.НомерГруппы;
    Если НомерТекГруппы > 0 Тогда
    МассивСтрок = мРезультатыПоиска.НайтиСтроки(Новый Структура(«НомерГруппы», НомерТекГруппы));
    ЕстьПравильный=ложь;
    Для Каждого Строка Из МассивСтрок Цикл
    Строка.Правильный = ?(не ЕстьПравильный,ЗначениеЗаполнено(Строка.Ссылка[ИмяРеквизита]),ложь);
    ЕстьПравильный=?(ЕстьПравильный,ЕстьПравильный,Строка.Правильный);
    КонецЦикла;
    КонецЕсли;
    КонецЦикла;
    КонецПроцедуры

    Показать

    в предыдущем комментарии возможно некорректное срабатывание алгоритма.

    Reply ↓
13. Pim 02.06.2017 at 13:02

    (12). Честно говоря, уже плохо помню о чём речь.
    
    Но если уже говорить об элегантности кода,

    ЕстьПравильный=ложь;
    Для Каждого Строка Из МассивСтрок Цикл
    Строка.Правильный = (not ЕстьПравильный and ЗначениеЗаполнено(Строка.Ссылка[ИмяРеквизита]) );
    ЕстьПравильный      = (ЕстьПравильный or Строка.Правильный);
    КонецЦикла;
    

    PS:
    
    Может мне кто-нибудь объяснить поголовную любовь к оператору «НЕ».
    
    Почему пишут
    

    ?(не ЕстьПравильный, ЗначениеЗаполнено(Строка.Ссылка[ИмяРеквизита]), ложь);

    вместо
    

    ?(ЕстьПравильный, ,ложь ЗначениеЗаполнено(Строка.Ссылка[ИмяРеквизита]));

    Reply ↓
14. shard 02.06.2017 at 14:34

    (13) наверное вопрос нашей психологии: «если не так, то переделать иначе норм» ближе по духу, нежели «есть так, то все норм, иначе — переделать», другим не могу объяснить. Хотя так на одну логическую операцию больше.

    Reply ↓
15. ksen 06.09.2018 at 12:33

    Исправил ли автор ошибку в сборке или надо будет самому доделывать?

    Reply ↓