Приветствую, форумчане!
"Управление торговлей 10.3", (Моби-С 5.5). "ABBYY Ukraine", 2003-2014 (2.3.20.1)
Сделал печать документа на основе общей формы "ПечатьДокументов".
Но печать вышла с книжной ориентацией, а требуется печать по-умолчанию в альбомной ориентации. Как такое сделать?
Процедура НапечататьДокумент1(ПечДокумент, КоличествоЭкземпляров = 1, НаПринтер = Ложь, Заголовок = "") Экспорт
Если ПечДокумент = Неопределено тогда
Возврат;
КонецЕсли;
// Получить необходимое количество копий
Если КоличествоЭкземпляров < 1 Тогда
ПечДокумент.КоличествоЭкземпляров = 1;
Иначе
ПечДокумент.КоличествоЭкземпляров = КоличествоЭкземпляров;
КонецЕсли;
Если НаПринтер Тогда
ПечДокумент.Напечатать();
Иначе
// Отобразить печатный документ на экране
ФормаПечати = ПолучитьОбщуюФорму("ПечатьДокументов",, ПечДокумент);
ФормаПечати.ПечатныйДокумент = ПечДокумент;
ФормаПечати.Заголовок = Заголовок;
ФормаПечати.Открыть();
КонецЕсли;
КонецПроцедуры // НапечататьДокумент()
Если ШК Тогда
ТабДок.ОриентацияСтраницы = ОриентацияСтраницы.Ландшафт;
Иначе
ТабДок.ОриентацияСтраницы = ОриентацияСтраницы.Портрет;
КонецЕсли;
Возврат ТабДок;
ЭлементыФормы.ПолеТабличногоДокумента.ОриентацияСтраницы=ПечатныйДокумент.ОриентацияСтраницы;
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7
https://pro1c.org.ua