Имя: Пароль:
1C
1С v8
Подскажите как сделать ВПФ в УТ 11
0 1сПупс
 
06.08.24
12:41
Всем ку, братцы.
Тз такое: сделать впф из ут 11, штатную.

1. в документе РеализацияТИУ есть

Процедура ДобавитьКомандыПечати


// 1-Т (Товарно-транспортная накладная) 
		КомандаПечати = КомандыПечати.Добавить();
		КомандаПечати.МенеджерПечати = "";
		КомандаПечати.Обработчик = "ТранспортнаяНакладнаяКлиент.ПечатьТТН";
		КомандаПечати.Идентификатор = "ТТН";
		КомандаПечати.Представление = НСтр("ru = 'Товарно-транспортная накладная (1-Т)'");
		КомандаПечати.ПроверкаПроведенияПередПечатью = Истина;
		КомандаПечати.ДополнительныеПараметры = Новый Структура("ИнтерактивноеДобавление", ИнтерактивноеДобавление);



2. Теперь понимаю как формируется печатная форма, иду в ТранспортнаяНакладнаяКлиент.ПечатьТТН:


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


3. не вижу как формируется табличный документ, подскажите, может что просмотрел?
1 Garykom
 
06.08.24
12:14
МенеджерПечати = "Документ.ТранспортнаяНакладная.Печать";
ну открой уже модуль менеджера документа ТранспортнаяНакладная, там процедура Печать
2 1сПупс
 
06.08.24
12:18
(1) спасибо за помощь!
3 1сПупс
 
06.08.24
12:36
этому не придал значения:

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