0
SherifSP
24.05.13
✎
14:20
|
Выставил автомасштаб, но табдок все равно выводится на 2 листа, может что упустил?
Функция ПечатьНачисленияАмортизации()
ТабДокумент = Новый ТабличныйДокумент;
Макет = ПолучитьМакет("Начисление");
ОбластьМакета = Макет.ПолучитьОбласть("Шапка");
ОбластьМакета.Параметры.НачалоПериода = Формат(ДатаС,"ДФ=dd.MM.yyyy");
ОбластьМакета.Параметры.КонецПериода = Формат(ДатаПо,"ДФ=dd.MM.yyyy");
ТабДокумент.Вывести(ОбластьМакета);
ОбластьМакета = Макет.ПолучитьОбласть("СтрокаТЧ");
_Пробег = 0;
_Цена = 0;
_Сумма = 0;
Для Каждого СтрокаАмортизации Из Амортизация Цикл
ОбластьМакета.Параметры.Водитель = СтрокаАмортизации.Водитель;
ОбластьМакета.Параметры.ТС = СтрокаАмортизации.ТС;
ОбластьМакета.Параметры.Пробег = СтрокаАмортизации.Пробег;
ОбластьМакета.Параметры.Цена = СтрокаАмортизации.Цена;
ОбластьМакета.Параметры.Сумма = СтрокаАмортизации.Сумма;
_Пробег = _Пробег + СтрокаАмортизации.Пробег;
_Цена = _Цена + СтрокаАмортизации.Цена;
_Сумма = _Сумма + СтрокаАмортизации.Сумма;
ТабДокумент.Вывести(ОбластьМакета);
КонецЦикла;
ОбластьМакета = Макет.ПолучитьОбласть("Подвал");
ОбластьМакета.Параметры.ИтогПробег = _Пробег;
ОбластьМакета.Параметры.ИтогЦена = _Цена;
ОбластьМакета.Параметры.ИтогСумма = _Сумма;
ТабДокумент.Вывести(ОбластьМакета);
Возврат ТабДокумент;
КонецФункции
|
|
1
SherifSP
24.05.13
✎
14:20
|
+(0) УниверсальныеМеханизмы.НапечататьДокумент(ТабДокумент, КоличествоЭкземпляров, НаПринтер, ОбщегоНазначения.СформироватьЗаголовокДокумента(ЭтотОбъект), Ссылка);
|
|