не выводить табличный документ во внешней ПЧ

1. Dobro210 15.01.24 14:34 Сейчас в теме
Коллеги, можете подсказать как запретить выводить табличный документ(как на скриншоте).
Обработка формирует ActiveDocument, как надо она открывается в ворде, но 1С выводит его, это хотелось бы избежать этого.
Вот код обработки
Функция СведенияОВнешнейОбработке() Экспорт

    ИмяОтчета = ЭтотОбъект.Метаданные().Имя;
    Синоним = ЭтотОбъект.Метаданные().Синоним;
    Синоним = ?(ЗначениеЗаполнено(Синоним), Синоним, ИмяОтчета);

    РегистрационныеДанные = Новый Структура;
    РегистрационныеДанные.Вставить("Вид", "ПечатнаяФорма");
    РегистрационныеДанные.Вставить("Наименование", Синоним);
    РегистрационныеДанные.Вставить("Версия", "3.0");
    РегистрационныеДанные.Вставить("БезопасныйРежим", Истина);
    РегистрационныеДанные.Вставить("Информация", "ПечатнаяФорма " + Синоним);
   	РегистрационныеДанные.Вставить("Назначение", Новый Массив);

 	РегистрационныеДанные.Назначение.Добавить("Документ.ПриемНаРаботу");

    ТаблицаКоманд = ПолучитьТаблицуКоманд();
                                 
    ДобавитьКоманду(ТаблицаКоманд, Синоним, "ПечатьАктИнструктаж", "ВызовСерверногоМетода", Истина);

    РегистрационныеДанные.Вставить("Команды", ТаблицаКоманд);

    Возврат РегистрационныеДанные;

КонецФункции

Функция ПолучитьТаблицуКоманд()

    Команды = Новый ТаблицаЗначений;
    Команды.Колонки.Добавить("Представление", Новый ОписаниеТипов("Строка"));
    Команды.Колонки.Добавить("Идентификатор", Новый ОписаниеТипов("Строка"));
    Команды.Колонки.Добавить("Использование", Новый ОписаниеТипов("Строка"));
    Команды.Колонки.Добавить("ПоказыватьОповещение", Новый ОписаниеТипов("Булево"));
    Команды.Колонки.Добавить("Модификатор", Новый ОписаниеТипов("Строка"));

    Возврат Команды;

КонецФункции

Процедура ДобавитьКоманду(ТаблицаКоманд, Представление, Идентификатор, Использование = "ОткрытиеФормы", ПоказыватьОповещение = Ложь, Модификатор = "ПечатьMXL")

    НоваяКоманда = ТаблицаКоманд.Добавить();
    НоваяКоманда.Представление = Представление;
    НоваяКоманда.Идентификатор = Идентификатор;
    НоваяКоманда.Использование = Использование;
    НоваяКоманда.ПоказыватьОповещение = ПоказыватьОповещение;
    НоваяКоманда.Модификатор = Модификатор;

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

КонецПроцедуры   

Функция ПечатьМассиваОбъектов(МассивОбъектов)
	
	ТабДок = Новый ТабличныйДокумент;
	Для каждого Ссылка из МассивОбъектов Цикл
		ПечатьОбъекта(ТабДок, Ссылка);	
	КонецЦикла; 
	
	Возврат ТабДок;
	
КонецФункции
Показать
Прикрепленные файлы:
По теме из базы знаний
Ответы
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
2. user2033930 15.01.24 16:09 Сейчас в теме
Предлагать проверку на Неопределено не стоит?
Оставьте свое сообщение

Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот