Метод объекта не обнаружен (ДобавитьФаксимилеВФоне)
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
ПараметрыВывода = УправлениеПечатью.ПодготовитьСтруктуруПараметровВывода();
ПодписиИПечатиОбластей = УправлениеПечатью.ПодписиИПечатиОбластей(ОбъектыПечати, ПараметрыВывода);
ДанныеПечатиРисунковТабличногоДокумента = УправлениеПечатью.ПодписиИПечатиТабличногоДокумента(ОбъектыПечати, ТабДокУПД, "");
Для Каждого ПодписиИПечатиОбласти Из ПодписиИПечатиОбластей Цикл
ИмяОбласти = ПодписиИПечатиОбласти.Ключ;
Если ДанныеПечатиРисунковТабличногоДокумента[ИмяОбласти] = Неопределено Тогда
ДанныеПечатиРисунковТабличногоДокумента[ИмяОбласти] = Новый Соответствие();
КонецЕсли;
Для Каждого Элемент Из ПодписиИПечатиОбласти.Значение Цикл
ДанныеПечатиРисунковТабличногоДокумента[ИмяОбласти][Элемент.Ключ] = Элемент.Значение;
КонецЦикла;
КонецЦикла;
УправлениеПечатью.ДобавитьПодписьИПечать(ТабДокУПД, ДанныеПечатиРисунковТабличногоДокумента);
ИмяФайла = КаталогВременныхФайлов()+"АктСверки.pdf";
ТабДокУПД.Записать(ИмяФайла, ТипФайлаТабличногоДо
но не работает!!!
ПодписиИПечатиОбластей = УправлениеПечатью.ПодписиИПечатиОбластей(ОбъектыПечати, ПараметрыВывода);
ДанныеПечатиРисунковТабличногоДокумента = УправлениеПечатью.ПодписиИПечатиТабличногоДокумента(ОбъектыПечати, ТабДокУПД, "");
Для Каждого ПодписиИПечатиОбласти Из ПодписиИПечатиОбластей Цикл
ИмяОбласти = ПодписиИПечатиОбласти.Ключ;
Если ДанныеПечатиРисунковТабличногоДокумента[ИмяОбласти] = Неопределено Тогда
ДанныеПечатиРисунковТабличногоДокумента[ИмяОбласти] = Новый Соответствие();
КонецЕсли;
Для Каждого Элемент Из ПодписиИПечатиОбласти.Значение Цикл
ДанныеПечатиРисунковТабличногоДокумента[ИмяОбласти][Элемент.Ключ] = Элемент.Значение;
КонецЦикла;
КонецЦикла;
УправлениеПечатью.ДобавитьПодписьИПечать(ТабДокУПД, ДанныеПечатиРисунковТабличногоДокумента);
ИмяФайла = КаталогВременныхФайлов()+"АктСверки.pdf";
ТабДокУПД.Записать(ИмяФайла, ТипФайлаТабличногоДо
но не работает!!!
вставил старую процедуру но она стопориться вот тут
Процедура УправлениеКартинкойФаксимиле(РабочаяПечатнаяФорма, МассивИменПоказателей, Добавить = Истина)
МассивИменОбластей = Новый Массив;
Для Каждого ОбластьМакета ИЗ РабочаяПечатнаяФорма.Области Цикл
//Если СтрНайти(ОбластьМакета.Имя, "РасшифровкаФаксимилеМакета") <> 0 Тогда
Если СтрНайти(ОбластьМакета.Имя, "Факсимиле") <> 0 Тогда
МассивИменОбластей.Добавить(ОбластьМакета.Имя);
КонецЕсли;
КонецЦикла;
ЦветФонаБелый = Новый Цвет(255,255,255);
ЦветФонаАвто = Новый Цвет();
Для Каждого ИмяОбластиМакета ИЗ МассивИменОбластей Цикл
ОбластьМакета = РабочаяПечатнаяФорма.Области[ИмяОбластиМакета];
ДанныеФаксимиле = ОбластьМакета;
Если НЕ ЭтоАдресВременногоХранилища(ОбластьМакета.Расшифровка) Тогда
Продолжить;
КонецЕсли;
//
//ДанныеФаксимиле = ПолучитьИзВременногоХранилища(ОбластьМакета.Расшифровка);
Если ТипЗнч(ДанныеФаксимиле) <> Тип("Структура") Тогда
Продолжить;
КонецЕсли;
Показать
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот