Имя: Пароль:
1C
1С v8
Функция печати
0 ErrorEd88
 
21.07.11
12:35
Конфигурация БП 2.0.

Пишу в функции:
...
ТабДокумент.МасштабПечати = 80;
ТабДокумент.ЭкземпляровНаСтранице = 2;
...
Возврат ТабДокумент

На деле форма распечатывается с масштабом 100% и всеми стандартными настройками..
1 BigRoma
 
21.07.11
12:36
Из СП: "Имеет смысл, если свойство АвтоМасштаб имеет значение Ложь". Свойство сброшено?
2 ErrorEd88
 
21.07.11
12:41
(1) Сброшено
3 guitar_player
 
21.07.11
12:43
(0) что то делаешь не так. Должно работать
4 BigRoma
 
21.07.11
12:46
Вспомнился анекдот про: "А ты по колесу стучал? А стекло протирал?"
5 BigRoma
 
21.07.11
12:48
свойство КлючПараметровПечати?
6 ErrorEd88
 
21.07.11
14:53
Сталкиваюсь в БП с этой проблемой не первым раз. Когда формирую процедуру печати с помощью конструктора печати, тогда эти параметры выполняются.
Если через УниверсальныеМеханизмы.НапечататьДокумент - тогда появляется общая форма ФармаПечати - параметры не выполняются.
В процедуре НапечататьДокумент общего модуля ради интереса написал:

ПечДокумент.МасштабПечати = 80;
ПечДокумент.ЭкземпляровНаСтранице = 2;

Результат такой же...

Может быть правда, что-то не так делаю. Вот часть функции:

Макет = ПолучитьМакет("АктНаСписание");

ТабДокумент = Новый ТабличныйДокумент;
ТабДокумент.ПолеСверху         = 0;
ТабДокумент.ПолеСлева          = 0;
ТабДокумент.ПолеСнизу          = 0;
ТабДокумент.ПолеСправа         = 0;
   
ТабДокумент.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_СписаниеМатериаловИзЭксплуатации_МБ8";

СведенияОбОрганизации = УправлениеКонтактнойИнформацией.СведенияОЮрФизЛице(Шапка.ЮрФизЛицо, Шапка.ДатаСоставления);

ШапкаТаблицы     = Макет.ПолучитьОбласть("Шапка");
ЗаголовокТаблицы = Макет.ПолучитьОбласть("ЗаголовокТаблицы");    
Итого = Макет.ПолучитьОбласть("Итого");
Подвал = Макет.ПолучитьОбласть("Подвал");
   
ШапкаТаблицы.Параметры.Заполнить(Шапка);
ШапкаТаблицы.Параметры.ПредставлениеОрганизации   = Шапка.ЮрФизЛицо.НаименованиеПолное;
ШапкаТаблицы.Параметры.ПредставлениеПодразделения = Шапка.Подразделение;
   
ТабДокумент.Вывести(ШапкаТаблицы);

ТабДокумент.Вывести(ЗаголовокТаблицы);

ИтогоКоличество = 0;
ИтогоСумма = 0;
   
НомерСтроки = 0;

Строка   = Макет.ПолучитьОбласть("Строка");
   
Для Каждого СтрокаТовар Из ВыборкаСтрокТовары Цикл
НомерСтроки = НомерСтроки + 1;
Если Выборка.Следующий() Тогда
 Строка.Параметры.Сумма  = Выборка.Сумма;
 ИтогоСумма = ИтогоСумма + Выборка.Сумма;
КонецЕсли;

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

ИтогоКоличество = ИтогоКоличество  + Строка.Параметры.Количество;
КонецЦикла;
Итого.Параметры.ИтогоСумма = ИтогоСумма;
ТабДокумент.Вывести(Итого);

// Выводим подвал
Подвал.Параметры.Заполнить(Шапка);
ТабДокумент.Вывести(Подвал);
ТабДокумент.АвтоМасштаб = Ложь;
ТабДокумент.МасштабПечати = 80;
ТабДокумент.ЭкземпляровНаСтранице = 2;

Возврат ТабДокумент;
7 Maxus43
 
21.07.11
14:56
после

ТабДокумент.ПолеСверху         = 0;
ТабДокумент.ПолеСлева          = 0;
ТабДокумент.ПолеСнизу          = 0;
ТабДокумент.ПолеСправа         = 0;

вствляй масштаб и т.д., имхо
Здесь можно обсудить любую тему при этом оставаясь на форуме для 1Сников, который нужен для работы. Ymryn