Печать документа

Документ в табличной части "Материалы" которого есть колонка "Подразделение"

Печатную форму документа необходимо изменить так, чтобы формировались отдельные страницы на каждое подразделение.
В этой функции все работает, но если количество подразделений N, то макет повторяется N раз.
Как сделать без повторений?

Функция Печать() Экспорт

    Организация = СсылкаНаОбъект.Организация;
    Склад = СсылкаНаОбъект.Склад;
    Материалы = СсылкаНаОбъект.Материалы;


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

    Макет = ПолучитьМакет("Макет");

    Для й=1 по Материалы.Количество() Цикл

    ОбластьМакета = Макет.ПолучитьОбласть("Заголовок");

    ТабДокумент.Вывести(ОбластьМакета);

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

    ОбластьМакета = Макет.ПолучитьОбласть("ШапкаТаблицы");
    ОбластьСтроки = Макет.ПолучитьОбласть("Строка");

    ТабДокумент.Вывести(ОбластьМакета);

    Отбор = Новый Структура;
    Отбор.Вставить("Подразделение", Материалы[й-1].Подразделение);
    МассивСтрок = Материалы.НайтиСтроки(Отбор);

    НомерСтроки = 0;
    Для Каждого СтрокаТабличнойЧасти из МассивСтрок Цикл

        НомерСтроки = НомерСтроки + 1;

        ОбластьСтроки.Параметры.Заполнить(СтрокаТабличнойЧасти);
        ОбластьСтроки.Параметры.Подразделение = СтрокаТабличнойЧасти.Подразделение;
        ОбластьСтроки.Параметры.Код=СтрокаТабличнойЧасти.код;
        ОбластьСтроки.Параметры.ЕдИзм=СтрокаТабличнойЧасти.ЕдиницаИзмерения;

        ТабДокумент.Вывести(ОбластьСтроки);

     КонецЦикла;


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

    ОбластьМакета = Макет.ПолучитьОбласть("СуммаПрописью");
    ОбластьМакета.Параметры.ИтоговаяСтрока = "Всего выдано материалов " + НомерСтроки+ ".";
    ТабДокумент.Вывести(ОбластьМакета);

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

    КонецЦикла;

    Возврат ТабДокумент;

КонецФункции