Вопрос по процедуре

1. dorofeevs 19.12.11 14:25 Сейчас в теме
Подскажите по процедуре, беру значения из ТЗ, в итоге если несколько раз нажать на кнопку печать, то строки добавляются в печатную форму, что надо добавить, чтобы после вывода данные обнулялись и при следующем нажатии заполнялись по новой?

Процедура Печать()
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Печать");
Таб.ВывестиСекцию("Шапка");
Таб.Опции(0,0,0,0);
ВыбратьСтроки();


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

КонецПроцедуры
По теме из базы знаний
Ответы
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
2. Ёпрст 1063 19.12.11 14:29 Сейчас в теме
ТЗ.УдалитьСтроки() в начало,
а так, ТЗ там вообще не нужна, если что.
4. WaterSmith 355 20.12.11 11:48 Сейчас в теме
(2) Ёпрст, Она нужна для сортировки: ТЗ.Сортировать("Контрагент","Товар,Заказ");
7. Ёпрст 1063 20.12.11 15:07 Сейчас в теме
(4) сортировать строки можно и в документе, это раз, есть ВыгрузитьТабличнуюЧасть, это два.
8. WaterSmith 355 20.12.11 16:36 Сейчас в теме
(7) Ёпрст, в целом согласен, да.
3. HameleonA 103 19.12.11 17:27 Сейчас в теме
до цикла ТЗ.УдалитьСтроки()
5. olhon26 20.12.11 11:53 Сейчас в теме
Перед КонецПроцедуры Тз.УдалитьСтроки()
6. dorofeevs 20.12.11 14:53 Сейчас в теме
Спасибо всем ответившим, я немного переделал
Оставьте свое сообщение

Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот