День добрый, народ.
Алгоритм стырил с учебника мисты.
Процедура ОставитьТолькоДиконтныйТовар()
 тбТовары.ВыбратьСтроки();
 Пока тбТовары.ПолучитьСтроку()=1 Цикл
   Пока (тбТовары.Товар.НетСкидки = 0) и (тбТовары.НомерСтроки<>0) Цикл
     тбТовары.УдалитьСтроку(); //следующая строка стала текущей
     Сообщить("111   " + тбТовары.Товар);
   КонецЦикла;
 КонецЦикла;
КонецПроцедуры

Получаю ошибку.
111   Яндова красный
111   Ящик сбирающийся.Размер в собранном виде 365х255х365 81004
111   Мешок строительный
111  
Пока (тбТовары.Товар.НетСкидки = 0) и (тбТовары.НомерСтроки<>0) Цикл
{Обработка.ГрупповаяПечатьЭтикеток.Форма.Модуль(603)}: Значение не представляет агрегатный объект (НетСкидки)

Грубо цикл работает и дальше.

удалять с конца

удаля строки сбиваешь выборку. получай строки в цикле "для". и получай строки по номеру

Удаляй без "тбТовары.ВыбратьСтроки();", а номеру строки "НомерСтроки"
И перебором по циклу.

Для Сч = - тбТовары.КоличествоСтрок() По -1 Цикл
тбТовары.ПолучитьСтрокуПоНомеру(-Сч);
...
КонецЦикла;

Идн=1;
Пока Идн<=ТЗ.КоличествоСтрок() Цикл
   ТЗ.ПолучитьСтрокуПоНомеру(Идн);
   Если <условие> Тогда
       ТЗ.УдалитьСтроку(Идн);
   Иначе
       Идн=Идн+1;
   КонецЕсли;
КонецЦикла

Это уже даже не смешно. Неплохо было бы ввести баны за подобные вопросы.
И, да, кстати можно ссылку на учебник, где ты там такую ахинею нашёл?

(6) чего только в учебниках нет... :)

(6)http://www.mista.ru/tutor_1c/tz.htm

(6)Код работает.У него просто поля НетСкидки нет:-)

(9)Конечно, как до конца ТЗ дошли так поле и кончилось.

(5)Спасибо. Утащил этот вариант.

(10) ...

(10)При НомереСтроки= 0 оно туда не попадет

(9) +100500.
(10) ага - как последнюю строку удалил, так и ппц.

Автор читать не умеет

//ЭТА ПРОГРАММА НЕПРАВИЛЬНАЯ !!!
ТабЗнач.ВыбратьСтроки();
Пока ТабЗнач.ПолучитьСтроку()=1 Цикл
...Если <условие> Тогда
......ТабЗнач.УдалитьСтроку(); //следующая строка стала текущей,
...КонецЕсли;
КонецЦикла;
//ЭТА ПРОГРАММА НЕПРАВИЛЬНАЯ !!!
//ЭТА ПРОГРАММА НЕПРАВИЛЬНАЯ !!!

(7) Ну вообще то имелся в виду http://mista.ru/tutor_1c/index.htm вот этот учебник, как я понимаю.
(8) //ЭТА ПРОГРАММА НЕПРАВИЛЬНАЯ !!!
ТабЗнач.ВыбратьСтроки();
Пока ТабЗнач.ПолучитьСтроку()=1 Цикл
...Если <условие> Тогда
......ТабЗнач.УдалитьСтроку(); //следующая строка стала текущей,
...КонецЕсли;
КонецЦикла;

Пипец... для тебя специально Митичкин капсом выделил и в красный цвет покрасил, что так делать нельзя, но тебе пофигу.

Он вроде как использовал:
А вот еще один правильный алгоритм, предложенный Wlad:

ТабЗнач.выбратьстроки();
Пока ТабЗнач.ПолучитьСтроку()=1 Цикл
.......Пока (<условие>) и (ТабЗнач.НомерСтроки<>0) Цикл
..............ТабЗнач.УдалитьСтроку(); //следующая строка стала текущей
.......КонецЦикла;
КонецЦикла;

а не первый вариант.

(17)А они все неправильные, это как баловаться с гранатой.
Лучше всего сделать, как в (5)

А вот еще один правильный алгоритм, предложенный Wlad:

ТабЗнач.выбратьстроки();
Пока ТабЗнач.ПолучитьСтроку()=1 Цикл
.......Пока (<условие>) и (ТабЗнач.НомерСтроки<>0) Цикл
..............ТабЗнач.УдалитьСтроку(); //следующая строка стала текущей
.......КонецЦикла;
КонецЦикла;

+(17)Можно даже без "ТЗ.ПолучитьСтрокуПоНомеру(Идн);". Так даже быстрей пойдет

(15)(16) см (16)

(19) удаляй с конфа - не парь мозг

*с конца

(15)(16) см (19)

(17) это неправильный алгоритм. После удаления последней строки в таблице, что будет с проверкой условия? Если, конечно, в условии ТабЗнач.НомерСтроки <> 0 не поставить первым подусловием.

Да ладно. Не грузитесь. Сделал как в (5).

(21)Молодец... мы читать умеем :)

+(25) т.е. сделать вот так:

Пока (ТабЗнач.НомерСтроки<>0) И (<условие>) Цикл
....

Тогда все взлетит.

(18) Но ведь там написано правильный! :)
Я обычно просто с конца удаляю.

Процедура ОставитьТолькоДиконтныйТовар()
 тбТовары.ВыбратьСтроки();
 Пока тбТовары.ПолучитьСтроку()=1 Цикл
   Пока (тбТовары.НомерСтроки<>0) и (тбТовары.Товар.НетСкидки = 0) Цикл
     тбТовары.УдалитьСтроку(); //следующая строка стала текущей
   КонецЦикла;
 КонецЦикла;
КонецПроцедуры

тбТовары.УдалитьСтроку(); //следующая строка стала текущей - ОПА. Или никакая - если удалена последняя.
Если тбТовары.НомерСтроки=0 Тогда Прервать КонецЕсли; // добавь это и алё.
Сообщить("111   " + тбТовары.Товар);

(30)Кто близок к автору. Скажите в учебнике ошибку нашли.

(32) Нехрен мой алгоритм печатать в учебниках без моего согласия.

(33): обломись-ка.
алгоритмы не могут являться объектом авторского права.

(33) Да шучу я. Просто приятно, когда твои креативы в учебниках появляются.

Опять? Это же Сузуки в 7.7