Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
22 янв 2025, 08:49

Не отображается подменю Печать в ДоговорРаботыУслуги

Автор kertAW, 24 дек 2024, 22:48

0 Пользователей и 1 гость просматривают эту тему.

kertAW

Добрый вечер! По какой-то причине у меня не отображается подменю Печать в форме документа договора работы услуги, при этом оно есть в форме списка.







Вот так выглядит код внешней обработки, в которой создается команда для печати:

#Область Инициализация_Обработки

Функция СведенияОВнешнейОбработке () экспорт 
ПараметрыРегистрации = Новый Структура;
ПараметрыРегистрации.Вставить("Вид","ПечатнаяФорма");
ПараметрыРегистрации.Вставить( "Назначение",ПолучитьНазначениеОбработки());
ПараметрыРегистрации.Вставить( "Наименование","Договор возмездного оказания услуг");
ПараметрыРегистрации.Вставить( "Версия","1.0");
ПараметрыРегистрации.Вставить( "Информация","Дополнительная печатная форма: Договор возмездного оказания услуг");
ПараметрыРегистрации.Вставить( "БезопасныйРежим",Истина);
Команды = ПолучитьТаблицуКоманд();
ДобавитьКоманду(Команды,"Договор возмездного оказания услуг",
"ДоговорВозмездногоОказанияУслуг","ВызовСерверногоМетода",Ложь,"ПечатьMXL");
ПараметрыРегистрации.Вставить("Команды", Команды);
Возврат ПараметрыРегистрации;
КонецФункции 

Функция ПолучитьНазначениеОбработки ()
Массив = Новый Массив;
Массив.Добавить("Документ.ДоговорРаботыУслуги");
Возврат Массив;
КонецФункции

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

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

Процедура ДобавитьКомандыПечати(КомандыПечати) Экспорт
КомандаПечати = КомандыПечати.Добавить();                                                                   
КомандаПечати.Обработчик = "УправлениеПечатьюБЗККлиент.ВыполнитьКомандуПечати";
КомандаПечати.МенеджерПечати = "Документ.ДоговорРаботыУслуги";
КомандаПечати.Идентификатор = "ДоговорВозмездногоОказанияУслуг";
КомандаПечати.Представление = НСтр("ru = 'Договор возмездного оказания услуг'");
КомандаПечати.Порядок = 30;
КомандаПечати.ПроверкаПроведенияПередПечатью = Ложь;
КонецПроцедуры                                                               

Процедура Печать(МассивОбъектов, КоллекцияПечатныхФорм, ОбъектыПечати, ПараметрыВывода) Экспорт          
УправлениеПечатью.ВывестиТабличныйДокументВКоллекцию(КоллекцияПечатныхФорм,
"ДоговорВозмездногоОказанияУслуг",
НСтр("ru = 'Договор возмездного оказания услуг'"),
СформироватьПечатнуюФорму(МассивОбъектов[0], ОбъектыПечати));
КонецПроцедуры

#КонецОбласти



Как можно добавить подменю печати в форму документа?

fruitella

еще->изменить форму->там искать папку с печатью

Похожие темы (5)

Рейтинг@Mail.ru

Поиск