0
memogolik
26.11.14
✎
18:09
|
Поменял ориентацию Торг12 с ландшафта на портрет (для экономии бумаги).
Печать идет в нормальной (портрет) ориентации, но при этом заполняется не весь лист. Т.е. из 2х листов текста он реально мог бы уместить на одном.
Если НЕ ФормированиеПечатныхФорм.ПроверитьВыводТабличногоДокумента(ТабДокумент, СтрокаСПодвалом) Тогда
Если КоличествоСтрок > 1 Тогда
// Выводим итоги по странице
ОбластьМакетаИтогоПоСтранице.Параметры.ИтогМестПоСтранице = ИтогоМестНаСтранице;
ОбластьМакетаИтогоПоСтранице.Параметры.ИтогКоличествоПоСтранице = ИтогоКоличествоНаСтранице;
ОбластьМакетаИтогоПоСтранице.Параметры.ИтогСуммыПоСтранице = ИтогоСуммаНаСтранице;
ОбластьМакетаИтогоПоСтранице.Параметры.ИтогНДСПоСтранице = ИтогоНДСНаСтранице;
ОбластьМакетаИтогоПоСтранице.Параметры.ИтогСуммыСНДСПоСтранице = ИтогоСуммаСНДСНаСтранице;
ОбластьМакетаИтогоПоСтранице.Параметры.ИтогМассаБруттоПоСтранице= ИтогМассаБруттоПоСтранице;
ТабДокумент.Вывести(ОбластьМакетаИтогоПоСтранице);
ТабДокумент.ВывестиГоризонтальныйРазделительСтраниц();
// Очистим итоги по странице
ИтогоМестНаСтранице = 0;
ИтогоКоличествоНаСтранице = 0;
ИтогоСуммаНаСтранице = 0;
ИтогоНДСНаСтранице = 0;
ИтогоСуммаСНДСНаСтранице = 0;
ИтогМассаБруттоПоСтранице = 0;
// Выведем заголовок таблицы
НомерСтраницы = НомерСтраницы + 1;
ОбластьМакетаЗаголовокТаблицы.Параметры.НомерСтраницы = "Страница " + НомерСтраницы;
ТабДокумент.Вывести(ОбластьМакетаЗаголовокТаблицы);
КонецЕсли;
тут он проверяет, но я не могу понять что реально можно подправить, чтобы решить проблему.
Функция ПроверитьВыводТабличногоДокумента(ТабДокумент, ВыводимыеОбласти, РезультатПриОшибке = Истина) Экспорт
Попытка
Возврат ТабДокумент.ПроверитьВывод(ВыводимыеОбласти);
Исключение
Возврат РезультатПриОшибке;
КонецПопытки;
КонецФункции // ПроверитьВыводТабличногоДокумента()
Заранее спасибо за ответы.
|
|