//упрощенная процедура для формирования ПДФ
Процедура ПолучитьФайлПДФ(Таб,ИмяФайла)
принтер=Новый ComObject("Bullzip.PDFPrinterSettings");
принтер.SetValue("output", ИмяФайла);
принтер.SetValue("ShowSaveAS", "never");
принтер.SetValue("ShowProgress", "no");
принтер.SetValue("ShowProgressFinished", "no");
принтер.SetValue("ShowSettings", "never");
принтер.SetValue("ShowPDF", "no");
принтер.SetValue("ConfirmOverwrite","no");
принтер.SetValue("OwnerPassword","Pass4PDF");
принтер.SetValue("Permissions",61636);
принтер.WriteSettings();
Таб.Автомасштаб=Истина;
Таб.Имяпринтера="Bullzip PDF Printer";
PDFФайл = Новый Файл(ИмяФайла);
Если НЕ PDFФайл.Существует() Тогда
Таб.Напечатать(Истина);
Пока НЕ PDFФайл.Существует() Цикл
ОбработкаПрерыванияПользователя();
ТаймерЗадержки;
КонецЦикла;
КонецЕсли;
КонецПроцедуры