Имя: Пароль:
1C
 
Помогите, пожалуйста, с ВПФ для ДоговорыКонтрагента
0 ladalk
 
22.03.16
13:30
Добрый день,
БП 3.0
Пытаюсь создать впф для печати из справочника ДоговорыКонтрагента (про шаблоны знаю). Пока не получается. Ошибка:  В обработчике печати не был сформирован табличный документ для: ДоговорОПР.
1 ladalk
 
22.03.16
13:31
Код:
2 ladalk
 
22.03.16
13:33
Функция СведенияОВнешнейОбработке() Экспорт
    
    МассивД = Новый Массив;
    МассивД.Добавить("Справочник.ДоговорыКонтрагентов");
    
    ПараметрыРегистрации = Новый Структура;
    ПараметрыРегистрации.Вставить("Вид", "ПечатнаяФорма");
    ПараметрыРегистрации.Вставить("Назначение", МассивД);
    ПараметрыРегистрации.Вставить("Наименование", "Договор Общеразвивающие Практические Работы");
    ПараметрыРегистрации.Вставить("Версия", "1.0");
    ПараметрыРегистрации.Вставить("Информация", "Печать договора ОПР");
    ПараметрыРегистрации.Вставить("БезопасныйРежим", Истина);
    
    Команды = Получить_Таблицу_Команд();
    ДобавитьКоманду(Команды, "Договор на услуги ОПР", "ДоговорОПР", "ВызовСерверногоМетода", Ложь, "ПечатьMXL");
        
    ПараметрыРегистрации.Вставить("Команды", Команды);
    Возврат ПараметрыРегистрации;
    
КонецФункции


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

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

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


Функция ПечатьДоговораОПР()

    ТабличныйДокумент = Новый ТабличныйДокумент;
    
    Макет = ПолучитьМакет("Макет1");        
    ОбластьМакетаШапка = Макет.ПолучитьОбласть("Шапка");
    ДанныеПечатиШапка = Новый Структура;
    ДанныеПечатиШапка.Вставить("ПарамОрг", "МояОрганизация");        
    ОбластьМакетаШапка.Параметры.Заполнить(ДанныеПечатиШапка);
    ТабличныйДокумент.Вывести(ОбластьМакетаШапка);

    Возврат ТабличныйДокумент;
    
КонецФункции
3 ladalk
 
22.03.16
13:53
Все работает, ошибка была в строке:
УправлениеПечатью.ВывестиТабличныйДокументВКоллекцию(КоллекцияПечатныхФорм, "Договор", "Договор ОПР",

надо было не "Договор", а "ДоговорОПР", по имени зарегистрированного
4 ladalk
 
22.03.16
13:54
Спасибо за помощь