Печать договора контрагента

[Семён Бочаров]

Добрый день уважаемые коллеги!

Прошу Вас помочь мне у кого есть рабочий пример для БП 3.0, печати макета договора!

Макет сделал прям в 1С не Wordовский. Не могу ни примера найти ни чего, как загнать договор заполненый в ТабДок...

[Семён Бочаров]

Ответ на вопрос ребят думаю нужно будет кому!

Код Выделить Развернуть

ТабДок = Справочники.ШаблоныДоговоров.НайтиПоНаименованию("Договор купли-продажи");
ПараметрыЗаполнения = Новый Структура;
    ПараметрыЗаполнения.Вставить("ШаблонДоговора",          ТабДок);
ПараметрыЗаполнения.Вставить("СсылкаНаОбъект",          Договор.Ссылка);

ФорматированныйДокумент = Новый ФорматированныйДокумент;

ПечатьДоговоров.ЗаполнитьТекстДоговораПоШаблону(ПараметрыЗаполнения.ШаблонДоговора,
                                    ФорматированныйДокумент,
                                    ПараметрыЗаполнения.СсылкаНаОбъект);

ПолноеИмяФайла = "M:\temp\Договор №" + Счет.orderId + ".rtf";

ЭлектронноеВзаимодействиеБП.КонвертироватьВФорматRTF(ФорматированныйДокумент, ПолноеИмяФайла);

ДвоичныеДанные = Новый ДвоичныеДанные(ПолноеИмяФайла); 
Адрес = ПоместитьВоВременноеХранилище(ДвоичныеДанные);

ПараметрыФайла = Новый Структура();
            ПараметрыФайла.Вставить("Автор", Пользователи.ТекущийПользователь());
            ПараметрыФайла.Вставить("ВладелецФайлов", Договор.Ссылка);
            ПараметрыФайла.Вставить("ИмяБезРасширения", "Договор №" + Счет.orderId);
            ПараметрыФайла.Вставить("РасширениеБезТочки", "rtf");
            ПараметрыФайла.Вставить("ВремяИзмененияУниверсальное", Неопределено);
   
    ПрисоединенныйФайл = РаботаСФайлами.ДобавитьФайл(ПараметрыФайла, Адрес, "", "");