Удаление строк документа как оптимизировать? вложенный цикл

Есть таблица ексель. При чем в этой таблице могут быть несколько строк с одного документа которых надо удалить.

Как удалить все нужные строки в один проход в реал документе и записать всего один раз???

Пока у меня так:

&НаСервере
Процедура ОбработатьДанные(Массив,ТабДок)

    Если Не Массив[0][0] = "Номер"  Тогда
        Возврат;
    КонецЕсли;
    ЧислоСтрок = Массив[0].Количество();
    Для  к = 1 По ЧислоСтрок-1 Цикл
        ТекНомер = Массив[0][к];
        ТекКодНом= Массив[1][к];
        ТекНаим  = Массив[2][к];
        ТекКол   = Массив[3][к];
        ТекЦена  = Массив[4][к];
        ТекСумма = Массив[5][к];

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

            КонецЕсли;
        КонецЕсли;

    КонецЦикла;

КонецПроцедуры