Внешняя печатная форма "М-11" для типовой БУХГАЛТЕРИИ, ред.2.0 для Документов "ТребованиеНакладная", "ОтчетПроизводстваЗаСмену", "ПередачаМатериаловВЭксплуатацию", "ОтчетПроизводстваЗаСмену"выводится на печать "М11", "ТребованиеНакладная", "АктСписания", в зависимости от доп.параметров (имя "МАКЕТ", Значение - тпи "СТРОКА").
Вот с доп.пареметрами сложноватько - надо указать, что Макет и далее:
- "М11" - выводится на печать "М-11 ТребованиеНакладная"
- "ТребованиеНакладная" - выводится на печать "ТребованиеНакладная"
- "АктСписания" - выводится на печать "Печать_АктаСписания"
- без параметров выводится "М-11 ТребованиеНакладная"
Для НЕКУРЯЩИХ пользователей привожу код функции ПЕЧАТЬ():
Функция Печать() Экспорт
Если ТипЗнч(СсылкаНаОбъект) = Тип("ДокументСсылка.ТребованиеНакладная") Тогда
Если ДополнительныеПараметры.Макет = "М11" Тогда
ТабДокумент = ПечатьМ11_ТребованиеНакладная();
ИначеЕсли ДополнительныеПараметры.Макет = "ТребованиеНакладная" Тогда
ТабДокумент = Печать_ТребованиеНакладная();
ИначеЕсли ДополнительныеПараметры.Макет = "АктСписания" Тогда
ТабДокумент = Печать_АктаСписания(СсылкаНаОбъект);
Иначе
ТабДокумент = ПечатьМ11_ТребованиеНакладная();
Конецесли;
ИначеЕсли ТипЗнч(СсылкаНаОбъект) = Тип("ДокументСсылка.ОтчетПроизводстваЗаСмену") Тогда
Если ДополнительныеПараметры.Макет = "М11" Тогда
ТабДокумент = ПечатьМ11_ОтчетПроизводстваЗаСмену();
ИначеЕсли ДополнительныеПараметры.Макет = "АктСписания" Тогда
ТабДокумент = Печать_АктаСписания(СсылкаНаОбъект);
Иначе
ТабДокумент = ПечатьМ11_ОтчетПроизводстваЗаСмену();
КонецЕсли;
ИначеЕсли ТипЗнч(СсылкаНаОбъект) = Тип("ДокументСсылка.ПередачаМатериаловВЭксплуатацию") Тогда
ТабДокумент = ПечатьМ11_ПередачаМатериаловВЭксплуатацию();
Иначе
Возврат Неопределено;
Конецесли;
Возврат ТабДокумент;
КонецФункции
Кто подскажет как это автоматизировать - тому спасибо и бантик на макушку! :)