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