Если НЕ ФормированиеПечатныхФормСервер.ПроверитьВыводТабличногоДокумента(ТабДокумент, СтрокаСПодвалом) Тогда
Если КоличествоСтрок > 0 Тогда
// Вывод разделителя и заголовка таблицы на новой странице
ТабДокумент.ВывестиГоризонтальныйРазделительСтраниц();
ТабДокумент.Вывести(ОбластьМакетаЗаголовокТаблицы);
КонецЕсли;
Пока Не ВходитьНаСтраницу() Цикл
Масштаб=Масштаб-10;
КонецЦикла;
(2) Еще точнее нужно :) Разместить на 1 страницу без переноса что? Содержимое может быть произвольным, и как бы вы не уменьшали, все равно когда-то не войдет.