Имя: Пароль:
1C
1С v8
не правильно работает ПроверитьВывод
0 zarzu
 
09.10.11
13:49
Есть процедура печатающая акт выполненных работ
Раньше она работала правильно. Потом акт повернули, сделали ОриентацияцияСтраницы.Портрет (до этого было Ландшафт). После этого перестал правильно работать ПроверитьВывод, разрыв страницы устанавливает совершенно не там где надо. ПроыеритьВывод нужен для того, чтоб в конце красиво напечатать область подписей, она высотой 12 строк, должна быть вся на одной странице.
Вот начальные строки кода:

ТабДок = Новый ТабличныйДокумент();
   
   ТабДок.ИспользуемоеИмяФайла    = "" + Ссылка;
   ТабДок.ИмяПараметровПечати    = "ПАРАМЕТРЫ_ПЕЧАТИ_РеализацияТоваровУслуг_Акт";
   ТабДок.ОриентацияСтраницы    = ОриентацияСтраницы.Портрет;
   
   
   ТабДок.АвтоМасштаб            = Истина;
   ТабДок.ОтображатьСетку        = Ложь;
   ТабДок.СохранятьСвойстваОтображения    = Истина;
   
.... Далее идет вывод шапки и таблички со списком услуг ....
а вот последние строки вывода подписей, которые неправильно выдаются.

О_ПП = Макет.ПолучитьОбласть("Подписи");
   О_ПП.Параметры.Всего                = Итого;
   О_ПП.Параметры.СуммаПрописью        = ИтогоПрописью;
   Руководители = РегламентированнаяОтчетность.ОтветственныеЛицаОрганизаций(Организация, Дата,);
   О_ПП.Параметры.Руководитель        = Руководители.Руководитель;
   Если Не ФормированиеПечатныхФорм.ПроверитьВыводТабличногоДокумента(ТабДок, О_ПП) Тогда
       ТабДок.ВывестиГоризонтальныйРазделительСтраниц();
   КонецЕсли;
   //Если Не ТабДок.ПроверитьВывод(О_ПП) Тогда
   //    ТабДок.ВывестиГоризонтальныйРазделительСтраниц();
   //КонецЕсли;

   ТабДок.Вывести(О_ПП);
   ТабДок.Показать();


Причем такое подозрение, что функция ПроверитьВывод думает что в документе задана ориентация Ландшафт, хотя явно указан Портрет, и даже чтоб сбить настройки, я базу заново перепрописывал, и даже версию платформы менял, Сейчас версия 8.2.14.533.
Где ошибка, подскажите?
1 zarzu
 
09.10.11
14:20
ап
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший