Табличный документ печатается с пустыми страницами

Процедура Печать(ТабДок, Ссылка) Экспорт
//{{_КОНСТРУКТОР_ПЕЧАТИ(Печать)
    //Макет = Документы.ОценочнаяВедомость.ПолучитьМакет("Печать");
Макет = Документы.ОценочнаяВедомость.ПолучитьМакет("ПечатнаяФормаВедомости");    
    Запрос = Новый Запрос;
    Запрос.Текст =
    "ВЫБРАТЬ
    |   ОценочнаяВедомость.Должность,
    |   ОценочнаяВедомость.ИтоговыйПоказательЭффективности,
    |   ОценочнаяВедомость.ОценкаРаботы,
    |   ОценочнаяВедомость.Подразделение,
    |   ОценочнаяВедомость.Сотрудник,
    |   ОценочнаяВедомость.КритерииОценки.(
    |       НомерСтроки,
    |       Критерий,
    |       НольБаллов,
    |       ОдинБалл,
    |       ДваБалла,
    |       ТриБалла,
    |       БаллСотрудника,
    |       КомментарийСотрудника,
    |       БаллРуководителя,
    |       КомментарийРуководителя,
    |       ВесовойКоэффициент,
    |       Итог
    |   ),
    |   ОценочнаяВедомость.ОтчетныйПериод,
    |   ОценочнаяВедомость.ПроцентВыполненияРуководителя
    |ИЗ
    |   Документ.ОценочнаяВедомость КАК ОценочнаяВедомость
    |ГДЕ
    |   ОценочнаяВедомость.Ссылка В(&Ссылка)";
    Запрос.Параметры.Вставить("Ссылка", Ссылка);
    Выборка = Запрос.Выполнить().Выбрать();
 
    //ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");
    //Шапка = Макет.ПолучитьОбласть("Шапка");
    //ОбластьКритерииОценкиШапка = Макет.ПолучитьОбласть("КритерииОценкиШапка");
    //ОбластьКритерииОценки = Макет.ПолучитьОбласть("КритерииОценки");
    //Подвал = Макет.ПолучитьОбласть("Подвал");
Заголовок = Макет.ПолучитьОбласть("Заголовок");
Ведомость = Макет.ПолучитьОбласть("Ведомость");
ВедомостьШапка = Макет.ПолучитьОбласть("ВедомостьШапка");
    ИтогиВедомости = Макет.ПолучитьОбласть("ИтогиВедомости");
Подвал=Макет.ПолучитьОбласть("Подвал");
    ТабДок.Очистить();
 
    ВставлятьРазделительСтраниц = Ложь;
    Пока Выборка.Следующий() Цикл
        Если ВставлятьРазделительСтраниц Тогда
            ТабДок.ВывестиГоризонтальныйРазделительСтраниц();
        КонецЕсли;
        Заголовок.Параметры.Заполнить(Выборка);
        ИтогиВедомости.Параметры.Заполнить(Выборка);
        //Подвал.Параметры.Заполнить(Выборка);
        ТабДок.Вывести(Заголовок, Выборка.Уровень());
        ТабДок.Вывести(ВедомостьШапка);
        //ТабДок.Вывести(Подвал);
    //ТабДок.Вывести(Заголовок, Выборка.Уровень());
        //ТабДок.Вывести(ОбластьКритерииОценкиШапка);
        ВыборкаКритерииОценки = Выборка.КритерииОценки.Выбрать();
        ИтогСотрудника=0;
 
        ИтогРуководителя=0;
        ИтогКоэффициент=0;
        ОбщийИтог=0;
        Пока ВыборкаКритерииОценки.Следующий() Цикл
            //Ведомость.Параметры.Заполнить(ВыборкаКритерииОценки);
            Ведомость.Параметры.НомерСтроки=ВыборкаКритерииОценки.НомерСтроки;
            Ведомость.Параметры.Критерий=ВыборкаКритерииОценки.Критерий;
            Ведомость.Параметры.НольБаллов=ВыборкаКритерииОценки.НольБаллов;
            Ведомость.Параметры.ОдинБалл=ВыборкаКритерииОценки.ОдинБалл;
            Ведомость.Параметры.ДваБалла=ВыборкаКритерииОценки.ДваБалла;
            Ведомость.Параметры.ТриБалла=ВыборкаКритерииОценки.ТриБалла;
            Ведомость.Параметры.БаллСотрудника=ВыборкаКритерииОценки.БаллСотрудника;
            ИтогСотрудника=ИтогСотрудника+ВыборкаКритерииОценки.БаллСотрудника;
            Ведомость.Параметры.КомментарийСотрудника=ВыборкаКритерииОценки.КомментарийСотрудника;
            Ведомость.Параметры.БаллРуководителя=ВыборкаКритерииОценки.БаллРуководителя;
            ИтогРуководителя=ИтогРуководителя+ВыборкаКритерииОценки.БаллРуководителя;
            Ведомость.Параметры.КомментарийРуководителя=ВыборкаКритерииОценки.КомментарийРуководителя;
            Ведомость.Параметры.ВесовойКоэффициент=ВыборкаКритерииОценки.ВесовойКоэффициент*100;
            ИтогКоэффициент=ИтогКоэффициент+Ведомость.Параметры.ВесовойКоэффициент;
            Ведомость.Параметры.Итог=ВыборкаКритерииОценки.Итог;
            ОбщийИтог=ОбщийИтог+ВыборкаКритерииОценки.Итог;
            ТабДок.Вывести(Ведомость, ВыборкаКритерииОценки.Уровень());
        КонецЦикла;
 
        ИтогиВедомости.Параметры.ИтогСотрудника=ИтогСотрудника;
        ИтогиВедомости.Параметры.ИтогРуководителя=ИтогРуководителя;
        ИтогиВедомости.Параметры.ИтогКоэффициент=ИтогКоэффициент;
        ИтогиВедомости.Параметры.ОбщийИтог=ОбщийИтог;
        Подвал.Параметры.Сотрудник=Выборка.Сотрудник;
        Подвал.Параметры.Должность=Выборка.Должность;
        //ИтогиВедомости.Параметры.ПроцентВыполненияРуководителя=Выборка.ППроцентВыполненияРуководителя;
        //ИтогиВедомости.Параметры.ПроцентВыполненияРуководителя=Выборка.ПроцентВыполненияРуководителя;
//      ИтогиВедомости.Параметры.ИтоговыйПоказательЭффективности=Выборка.ИтоговыйПоказательЭффективности;
        ТабДок.Вывести(ИтогиВедомости);
        ТабДок.Вывести(Подвал);
                ТабДок.РазмерСтраницы="A4"; 
        //ИтогиВедомости.Параметры.Заполнить(Выборка);
        //ТабДок.Вывести(Подвал);
        ВставлятьРазделительСтраниц = Истина;
    КонецЦикла;
    //ТабДок.Напечатать(РежимИспользованияДиалогаПечати.Использовать);
    //}}
КонецПроцедуры

&НаКлиенте
Процедура ОбработкаКоманды(ПараметрКоманды, ПараметрыВыполненияКоманды)
    //{{_КОНСТРУКТОР_ПЕЧАТИ(Печать)
    ТабДок = Новый ТабличныйДокумент;
    Печать(ТабДок, ПараметрКоманды);
 
    ТабДок.ОтображатьСетку = Ложь;
    ТабДок.Напечатать();
    //}}
КонецПроцедуры
 
&НаСервере
Процедура Печать(ТабДок, ПараметрКоманды)
    Документы.ОценочнаяВедомость.Печать(ТабДок, ПараметрКоманды);
КонецПроцедуры