8.х Печать макета (несколько страниц в одном окне)

Код:

ТабДокумент = Новый ТабличныйДокумент;
Пока Выборка.Следующий() Цикл

//......................
//......................
ТабДокумент.Вывести(ОбластьМакета);
КонецЦикла;
УниверсальныеМеханизмы.НапечататьДокумент(ТабДокумент, 1, ложь,  ОбщегоНазначения.СформироватьЗаголовокДокумента(СсылкаНаОбъект));

Имейте ввиду, что такой код будет работать только для одинаковых макетов! В случае различия колонок, например, нужно будет делать намного все сложнее!

Думаю, что автору нужна была сама идея

Так сам табличный документ (создание) вынесли за рамки цикла?

Покажите полностью код.

Была подсказка - вам необходимо добавить в конце цикла разделитель страниц. Смотрите в табличном документе (справке)

Похожая проблема: пытаюсь из Формы Документа распечатать несколько различных документов на одной странице
(возможна ли реализация без обработки?), ну и соответственно, происходит печать одного и того же документа
в n-экземплярах.
Подскажите, пожалуйста, что не так:

Код:

Процедура Печать(Элемент)

ОбщийТабДок = Новый ТабличныйДокумент;
Кол = 0;
ВыборкаДоков = Документы.Исходящие.Выбрать();

Пока ВыборкаДоков.Следующий() Цикл

Кол = Кол + 1;

ТабДок = Новый ТабличныйДокумент;
Макет = Документы.Исходящие.ПолучитьМакет("Печать");

//Должность
Выборка = Справочники.Респонденты.Выбрать(КомуДолжность);
ОбластьДолжность = Макет.ПолучитьОбласть("ОбластьДолжность");
Пока Выборка.Следующий() Цикл
ОбластьДолжность.Параметры.Заполнить(Выборка);
КонецЦикла;
ТабДок.Вывести(ОбластьДолжность);

// Заголовок
Область = Макет.ПолучитьОбласть("Заголовок");
Область.Параметры.Заполнить(ЭтотОбъект);
ТабДок.Вывести(Область);

// Подвал
Подвал = Макет.ПолучитьОбласть("Подвал");
Подвал.Параметры.Заполнить(ЭтотОбъект);
ТабДок.Вывести(Подвал);

Подпись = Макет.ПолучитьОбласть("Подпись");
Подпись.Параметры.Заполнить(ЭтотОбъект);
ТабДок.Вывести(Подпись);

Если Кол = 1 Тогда
ОбщийТабДок.Вывести(ТабДок);
Иначе
Входит = ОбщийТабДок.ПроверитьВывод(ТабДок);
Если НЕ Входит Тогда
ОбщийТабДок.ВывестиГоризонтальныйРазделительСтраниц();
КонецЕсли; 

ОбщийТабДок.Вывести(ТабДок);

КонецЕсли; 

КонецЦикла;

ОбщийТабДок.ОтображатьСетку = Ложь;
ОбщийТабДок.Защита = Ложь;
ОбщийТабДок.ТолькоПросмотр = Ложь;
ОбщийТабДок.ОтображатьЗаголовки = Ложь;
ОбщийТабДок.Показать();
КонецПроцедуры

Код:

 Пока ВыборкаДоков.Следующий() Цикл

Кол = Кол + 1;

ТабДок = Новый ТабличныйДокумент;

Заменить на:

Код:

ТабДок = Новый ТабличныйДокумент;
Пока ВыборкаДоков.Следующий() Цикл

Кол = Кол + 1;

Прочитав более внимательно тему - давно бы исправили

BabySG, не помогает...

Да, макет тоже за цикл надо вынести и показывайте, что у вас в итоге получилось.

Делаю так:

Код:

ТабДок = Новый ТабличныйДокумент;
Макет = Документы.Исходящие.ПолучитьМакет("Печать");
Пока ВыборкаДоков.Следующий() Цикл
Кол = Кол + 1;
...

Получаю:

Вообще, я имел ввиду код, ну да ладно

А по сути:

Код:

Область.Параметры.Заполнить(ЭтотОбъект);

Вы одним и тем же документом заполняете все время, а надо брать из выборки, т.е.:

Код:

Область.Параметры.Заполнить(Выборка);