не ставится печать ДополнитьДокументПодписьюИПечатью

Форум Программирование Общие вопросы программирования (Dev)

1. zoeh 31 28.02.22 06:34 Сейчас в теме

ПечатныеФормы = УправлениеПечатью.СформироватьПечатныеФормы(ИмяМенеджераПечати, ИменаМакетов, МассивОбъектов, ПараметрыПечати, ДопустимыеТипыОбъектовПечати);
   ТабДокУПД= ПечатныеФормы.КоллекцияПечатныхФорм[0].ТабличныйДокумент;
   
   ПараметрыПечати = Новый Структура("ДополнитьКомплектВнешнимиПечатнымиФормами");
ПараметрыПечати.Вставить("ДополнитьКомплектВнешнимиПечатнымиФормами", Ложь);
ПараметрыПечати.Вставить("ИмяПараметровПечати","АктСверкиСПечатью");
СведенияОДокументе = Новый ТаблицаЗначений;
	СведенияОДокументе.Колонки.Добавить("ДанныеШапки");

	Нстр = СведенияОДокументе.Добавить();
	СведенияОДокументеСтукт = Новый Структура;
	СведенияОДокументеСтукт.Вставить("Документ",МассивОбъектов[0]);
	СведенияОДокументеСтукт.Вставить("ГлавныйБухгалтер",Объект.ГлавныйБухгалтер);
	СведенияОДокументеСтукт.Вставить("Руководитель",Объект.Руководитель);
	СведенияОДокументеСтукт.Вставить("Организация",МассивОбъектов[0].Организация);
	
	//Запрос = Новый Запрос();
	//Запрос.УстановитьПараметр("МассивДокументов", МассивОбъектов);
	//Запрос.Текст = ПолучитьТекстЗапросаДляФормированияПечатнойФормыАктСверки();
	//
	//Шапка = Запрос.Выполнить().Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам, "Документ");
	//
	//УправлениеПечатьюБП.ДополнитьДокументПодписьюИПечатью(ТабДокУПД, Шапка, МассивОбъектов, ПараметрыПечати);
	
	Нстр.ДанныеШапки = СведенияОДокументеСтукт;
	
	ОбъектыПечати = Новый СписокЗначений;
	ОбъектыПечати.Добавить(МассивОбъектов[0]);	
	УправлениеПечатьюБП.ДополнитьДокументПодписьюИПечатью(ТабДокУПД, Нстр, ОбъектыПечати, ПараметрыПечати);		
			

	ИмяФайла = "d:\АктСверки.pdf"; 
	ТабДокУПД.Записать(ИмяФайла, ТипФайлаТабличногоДокумента.PDF);

Показать

По теме из базы знаний

Счет-фактура для 1С: Бухгалтерии 3.0 (управляемые формы)

Найденные решения

8. zoeh 31 28.02.22 08:57 Сейчас в теме

получилось,

УправлениеПечатьюБП.ДобавитьФаксимилеВФоне(ТабличныйДокумент,СведенияОДокументе.Документ);

но вокруг печати и факсимиле выходят рамки

кто может внятно помочь почему? форму передобавлял заново в расширение.

Остальные ответы

Подписаться на ответы Инфостарт бот

Свернуть все

2. zoeh 31 28.02.22 06:36 Сейчас в теме

Все необходимые параметры заполнены, но подпись и печать не выходят!

3. zoeh 31 28.02.22 06:37 Сейчас в теме

Проверял отладчиком, Организация документ и т.п. все заполено

4. zoeh 31 28.02.22 07:36 Сейчас в теме

Результат нулевой.

5. puzo50 28.02.22 07:47 Сейчас в теме

а может файл создаёт на сервере?

6. zoeh 31 28.02.22 07:50 Сейчас в теме

(5) да вся процедура на сервере выполняется, на клиент перевести?

7. zoeh 31 28.02.22 08:14 Сейчас в теме

копнул отладчиком дальше - не может найти область
ОбластьФаксимиле = ОбластьМакета.Области.Найти(ИмяОбласти);

8. zoeh 31 28.02.22 08:57 Сейчас в теме

получилось,

УправлениеПечатьюБП.ДобавитьФаксимилеВФоне(ТабличныйДокумент,СведенияОДокументе.Документ);

9. 603692 3 28.02.22 14:02 Сейчас в теме

(8) Все границы объектов печати и факсимиле поставьте в значение нет

12. aairt 14.09.22 10:18 Сейчас в теме

(8)Спасибо!! полдня копал почему не выводится

10. zoeh 31 28.02.22 17:34 Сейчас в теме

Удалил из расширения и стало нормально.

11. ybatiaev 59 28.03.22 22:32 Сейчас в теме

Добрый день!
Совершенно непонятное решение ((( БП3. Пытаюсь использовать функции общего модуля "ПечатьТорговыхДокументов.ПечатьСчетаНаОплату()"
Можно использовать

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

Можно

ПечатныеФормы = УправлениеПечатью.СформироватьПечатныеФормы(ИмяМенеджераПечати, ИменаМакетов, МассивОбъектов, ПараметрыПечати, ДопустимыеТипыОбъектовПечати);

в итоге вызывается всё равно первый вариант. НО!!!! Но при ручной печати выводится факсимиле, при программной - НИФИГА.
Даже не знаю КАКОГО ещё надо.
Причем смотрю структуру(из первой функции) с именем "РасшифровкаФаксимилеМакета" - там всё корректно заполнено - и факсимиле руководителя, и глбух, и печать (организации) .
Сравнивал и при ручной печати и при программной. Все параметры идентичны. Но видать что-то не хватает.
Может кто сталкивался? (((((

Вот что написал и заработало

		ТабДок = ПечатьТорговыхДокументов.ПечатьСчетаНаОплату(СведенияСчетаНаОплату, новый списокЗначений, новый структура("ДополнитьКомплектВнешнимиПечатнымиФормами",	Ложь));   
        УправлениеПечатьюБП.ДобавитьФаксимилеВФоне(ТабДок,СсылкаНаДокумент);

ППЦ какое "прозрачное" решение ((((((((((((((((((((((

13. slavok123 4 02.03.24 19:51 Сейчас в теме

(11) в релизе последнем 1с бух УправлениеПечатьюБП.ДобавитьФаксимилеВФоне убрали !!!!и как теперь жить???

14. user856012 14 02.03.24 20:26 Сейчас в теме

(13)

и как теперь жить???

"Спасение утопающих - дело рук самих утопающих"

Подробности - в вашей ветке.

15. mip128 04.03.24 12:02 Сейчас в теме

Мне помогло:

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

УправлениеПечатьюБП.НастроитьСтарыйВариантПодписиИПечати(ТабличныйДокумент, ОбъектыПечати,
	СведенияОДокументе.Организация, СведенияОДокументе.Документ);
			
УправлениеПечатьюБП.ДоработатьФаксимильнуюПодписьИПечать(ТабличныйДокумент, ОбъектыПечати,
	СведенияОДокументе.Организация, СведенияОДокументе.Документ);

Оставьте свое сообщение

E-mail: