Подскажите как правильно определить одинаковые строки ТЧ документа по 3 параметрам (ФИО,дата,и некий N показатель).?

(0) Отсортируй и сравни соседние.

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

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

* Для идн2 = (идн+1) по ТЗ.КоличествоСтрок() Цикл

(3) ужас

(2) А зачем таскать строки? Заведи список Повторы и заноси туда строки при выполнении условия.
Если скажет, что повторы не нужны - удали по списку.

(5) ы?

(3) Ну и зачем тут вложенный цикл? (Выгрузить, отсортировать, нужны номера строк документа - в ТЗ для этого имеется одноименная колонка).

(0) Сделай новую колонку "ключ", туда установи ФИО+дата+некийNпоказатель, потом свернуть.
либо обход ТЗ + занесесение "ключа" в СП + проверка .

(8) сортировка - лишний тормоз

(10) Сортировка - n log n.
Вложенный цикл - n^2.
Так что кто тут тормоз...

тебе номера одинаковых, или просто узнать что есть одинаковые строки?

(11) Первый цикл выполняется N-1 раз а вложенный каждый раз на единицу меньше

(13) Итого = n*(n-1)/2 = O(n^2).

(14) идите в опу. У меня проще и наглядней

выгрузи в ТЗ нужные колонки , добавь колонку числовую , заполни "1" потом сверни по нужным колонкам , где индексы будут больше 1 , там есть повторы

(16) а номера строк как потом искать?

потом пойдет по таблице , с уже известными значениями ключевых колонок

(17) Судя по (2), номера строк там и даром не нужны.

Кстати, о (2). Смертная казнь за использование Вопрос() в модуле документа уже отменена? Если да - то зря...

(17) проще - не допускать дубликатов на момент вноса информации

(19) (20) я так понял, это модуль формы. Потому что в типовых это проверяется именно там

Спасибо всем, ветка закрыта!

(16) Проще сравнито количество строк в ТЗ после свертки и количество строк в ТЧ - можно будет увидеть, что есть повторяющиеся строки.

Уж0снах!