Метод объекта не обнаружен(Печать)

Конфигурация Альфа-Авто 4.1. Внешняя печатная форма. В качестве макета - документ Word. В модуле обработки описана функция Печать() Экспорт. и в ней написано "возврат неопределено". А перед этим код, вызывающий вордовский макет, заполняющий его и активизурующий. В документе при попытке напечатать - сообщение "Обработчик печатной формы БланкНаСервис (внешняя): {Справочник.ВнешниеПечатныеФормы(100)}: Метод объекта не обнаружен (Печать)". Подскажите, пожалуйста, в чем может быть дело.

up

Платформа не 8.2 случайно?

8.1

Может выложите текст модуля этой обработки?

"Функция Печать(ДокументОбъект, ТабДокумент) Экспорт<br>    ДокументОбъект = СсылкаНаОбъект;<br>    ТабДокумент = неопределено;<br>////////////////////////////////////////////////////////­////////////////////<br>    ДатаОбращ = СокрЛП(Строка(Формат(СсылкаНаОбъект.Дата, "ДФ=dd.MM.yyyy")));<br>    ДатаПост = СокрЛП(Строка(Формат(СсылкаНаОбъект.ДатаНачала, "ДФ=dd.MM.yyyy")));<br>    ФИО =  СокрЛП(Строка(СсылкаНаОбъект.Заказчик));<br>    Авто = СокрЛП(Строка(СсылкаНаОбъект.Автомобиль));<br>    <br>    //Пробег<br>    Запрос = Новый Запрос;<br>    Запрос.Текст = "ВЫБРАТЬ<br>                   |    АвтомобилиСрезПоследних.Значение<br>                   |ИЗ<br>                   |    РегистрСведений.Автомобили.СрезПоследних КАК АвтомобилиСрезПоследних<br>                   |ГДЕ<br>                   |    АвтомобилиСрезПоследних.Автомобиль = &Авто<br>                   |    И АвтомобилиСрезПоследних.ВидЗначения = &Пробег";<br>    Запрос.УстановитьПараметр("Авто", СсылкаНаОБъект.Автомобиль);<br>    Запрос.УстановитьПараметр("Пробег", Перечисления.ДополнительнаяИнформацияАвтомобилей.Пробег);<br>    Результат = Запрос.Выполнить().Выбрать();<br>    Пока Результат.Следующий() Цикл<br>        Пробег = СокрЛП(Строка(Результат.Значение));<br>    КонецЦикла; <br>    ГодВып = СокрЛП(Строка(СсылкаНаОбъект.Автомобиль.ГодВыпуска));<br>    Причина = СокрЛП(СсылкаНаОбъект.ПричинаОбращения);<br>    <br>    //История<br>    Запрос = Новый Запрос;<br>    //Это последний заказ-наряд<br>    Запрос.Текст = "ВЫБРАТЬ<br>                   |    ЗаказНаряд.Ссылка,<br>                   |    МАКСИМУМ(ЗаказНаряд.Дата) КАК Дата<br>                   |ИЗ<br>                   |    Документ.ЗаказНаряд КАК ЗаказНаряд<br>                   |ГДЕ<br>                   |    ЗаказНаряд.Автомобиль = &авто<br>                   |<br>                   |СГРУППИРОВАТЬ ПО<br>                   |    ЗаказНаряд.Ссылка";<br>    Запрос.УстановитьПараметр("авто", ссылканаобъект.Автомобиль);<br>    Результат = Запрос.Выполнить().Выбрать();<br>    Пока Результат.Следующий() Цикл<br>        ПослЗаказСсылка = Результат.Ссылка;<br>    КонецЦикла;<br>    История = """";<br>    <br>    Если НЕ ПослЗаказСсылка.Пустая() тогда<br>        //Если последнее было ТО<br>        Если ПослЗаказСсылка.ВидРемонта = Справочники.ВидыРемонта.НайтиПоКоду("ЦБ000004") тогда<br>            История = СокрЛП(Строка(ПослЗаказСсылка.ВидРемонта)) + " от " + <br>            СокрЛП(Строка(Формат(ПослЗаказСсылка.Дата, "ДФ=dd.MM.yyyy")))+ ". Рекомендации: " + <br>            СокрЛП(ПослЗАказСсылка.Рекомендации);<br>        //Если последнее не ТО    <br>        Иначе<br>            //Что делали последним<br>            ПослИстория = """";<br>            ПослИстория = СокрЛП(Строка(ПослЗаказСсылка.ВидРемонта)) + " от " + <br>            СокрЛП(Строка(Формат(ПослЗаказСсылка.Дата, "ДФ=dd.MM.yyyy")))+ ". Рекомендации: " + <br>            СокрЛП(ПослЗАказСсылка.Рекомендации);<br><br>            //Найти последнее ТО<br>            Запрос = Новый Запрос;<br>            //Это последний заказ-наряд<br>            Запрос.Текст = "ВЫБРАТЬ<br>                       |    ЗаказНаряд.Ссылка,<br>                       |    МАКСИМУМ(ЗаказНаряд.Дата) КАК Дата<br>                       |ИЗ<br>                       |    Документ.ЗаказНаряд КАК ЗаказНаряд<br>                       |ГДЕ<br>                       |    ЗаказНаряд.Автомобиль = &авто И ЗаказНаряд.ВидРемонта = &ВидРемонта<br>                       |<br>                       |СГРУППИРОВАТЬ ПО<br>                       |    ЗаказНаряд.Ссылка";<br>            Запрос.УстановитьПараметр("авто", ссылканаобъект.Автомобиль);<br>            Запрос.УстановитьПараметр("ВидРемонта", Справочники.ВидыРемонта.НайтиПоКоду("ЦБ000004"));<br>            Результат = Запрос.Выполнить().Выбрать();<br>            Пока Результат.Следующий() Цикл<br>                ПослЗаказСсылка = Результат.Ссылка;<br>            КонецЦикла;<br>            Если НЕ ПослЗаказСсылка.Пустая() тогда<br>                История = СокрЛП(Строка(ПослЗаказСсылка.ВидРемонта)) + " от " + <br>                СокрЛП(Строка(Формат(ПослЗаказСсылка.Дата, "ДФ=dd.MM.yyyy")))+ ". Рекомендации: " + <br>                СокрЛП(ПослЗАказСсылка.Рекомендации)+ "; " + ПослИстория;<br>            Иначе <br>                История = ПослИстория;<br>            КонецЕсли;<br>        КонецЕсли;<br>    КонецЕсли;<br>    <br>    // Установленное дополнительное оборудование<br>    СписокВидов = Новый Массив;<br>    СписокВидов.Добавить(СПравочники.ВидыРемонта.ДополнительноеОборудование);<br>    СписокВидов.Добавить(Справочники.ВидыРемонта.КомплектацияАвтомобиля);<br>    СписокВидов.Добавить(Справочники.ВидыРемонта.НайтиПоКоду("ЦБ000005"));<br>    Запрос = Новый Запрос;<br>    Запрос.Текст = "ВЫБРАТЬ<br>                   |    ЗаказНарядТовары.Номенклатура<br>                   |ИЗ<br>                   |    Документ.ЗаказНаряд.Товары КАК ЗаказНарядТовары<br>                   |ГДЕ<br>                   |    ЗаказНарядТовары.Ссылка В<br>                   |            (ВЫБРАТЬ<br>                   |                ЗаказНаряд.Ссылка КАК Ссылка<br>                   |            ИЗ<br>                   |                Документ.ЗаказНаряд КАК ЗаказНаряд<br>                   |            ГДЕ<br>                   |                ЗаказНаряд.Автомобиль = &авто<br>                   |                И ЗаказНаряд.ВидРемонта В (&СписокВидов))";<br>    Запрос.УстановитьПараметр("СписокВидов", СписокВидов);<br>    Запрос.УстановитьПараметр("Авто", СсылкаНаОбъект.Автомобиль);<br>    Результат = Запрос.Выполнить().Выбрать();<br>    ДопОборуд = """";<br>    счетчик = 1;<br>    Пока Результат.Следующий() Цикл<br>        Если счетчик = 1 тогда<br>            ДопОборуд = СокрЛП(Строка(Результат.Номенклатура)) + "; ";<br>            счетчик = счетчик + 1;<br>        Иначе<br>             ДопОборуд = ДопОборуд + СокрЛП(Строка(Результат.Номенклатура)) + "; ";<br>        КонецЕсли;<br>    КонецЦикла;<br>    <br>    //Дополнительные Услуги<br>    ДопУслуги = """";<br>    Если СсылкаНаОбъект.ДопМойкаТехнологическая = Перечисления.ОтветДопРаботы.Да тогда<br>        ДопУслуги = "Технологическая мойка; ";<br>    КонецЕсли;<br>    Если СсылкаНаОбъект.ДопМойкаПолностью = Перечисления.ОтветДопРаботы.Да тогда<br>        ДопУслуги = ДопУслуги + "мойка полностью; ";<br>    КонецЕсли;<br>    Если СсылкаНаОбъект.ДопМойкаДвигатель = Перечисления.ОтветДопРаботы.Да тогда<br>        ДопУслуги = ДопУслуги + "мойка двигателя; ";<br>    КонецЕсли;<br>    Если СсылкаНаОбъект.ДопМойкаСверху = Перечисления.ОтветДопРаботы.Да тогда<br>        ДопУслуги = ДопУслуги + "мойка сверху; ";<br>    КонецЕсли;<br>    Если СсылкаНаОбъект.ДопАвтонабор = Перечисления.ОтветДопРаботы.Да тогда<br>        ДопУслуги = ДопУслуги + "автонабор; ";<br>    КонецЕсли;<br>    Если СсылкаНаОбъект.ДопБалансировкаКолес = Перечисления.ОтветДопРаботы.Да тогда<br>        ДопУслуги = ДопУслуги + "балансировка колес; ";<br>    КонецЕсли;<br>    Если СсылкаНаОбъект.ДопБрызговики = Перечисления.ОтветДопРаботы.Да тогда<br>        ДопУслуги = ДопУслуги + "брызговики; ";<br>    КонецЕсли;<br>    Если СсылкаНаОбъект.ДопДиагностическийСтенд = Перечисления.ОтветДопРаботы.Да тогда<br>        ДопУслуги = ДопУслуги + "диагностический стенд; ";<br>    КонецЕсли;<br>    Если СсылкаНаОбъект.ДопКоврыВБагажник = Перечисления.ОтветДопРаботы.Да тогда<br>        ДопУслуги = ДопУслуги + "ковры в багажник; ";<br>    КонецЕсли;<br>     Если СсылкаНаОбъект.ДопКоврыВСалон = Перечисления.ОтветДопРаботы.Да тогда<br>        ДопУслуги = ДопУслуги + "ковры в салон; ";<br>    КонецЕсли;<br>    Если СсылкаНаОбъект.ДопКомплектЛамп = Перечисления.ОтветДопРаботы.Да тогда<br>        ДопУслуги = ДопУслуги + "комплект ламп; ";<br>    КонецЕсли;<br>    Если СсылкаНаОбъект.ДопПредложениеВременногоРешения = Перечисления.ОтветДопРаботы.Да тогда<br>        ДопУслуги = ДопУслуги + "предложение временного решения; ";<br>    КонецЕсли;<br>    Если СсылкаНаОбъект.ДопЩетки = Перечисления.ОтветДопРаботы.Да тогда<br>        ДопУслуги = ДопУслуги + "щетки; ";<br>    КонецЕсли;<br><br> <br>////////////////////////////////////////////////////////­//////////////    <br>    АктивныйДокумент = ПолучитьМакет("БланкНаСервис");<br>    Документ = АктивныйДокумент.Получить();<br>    Документ.Content.Find.Execute("<датаобращ>", Ложь, Истина, Ложь, , , Истина, , Ложь, ДатаОбращ);<br>    Документ.Content.Find.Execute("<датапост>", Ложь, Истина, Ложь, , , Истина, , Ложь, ДатаПост);<br>    Документ.Content.Find.Execute("<фио>", Ложь, Истина, Ложь, , , Истина, , Ложь, фио);<br>    Документ.Content.Find.Execute("<авто>", Ложь, Истина, Ложь, , , Истина, , Ложь, авто);<br>    Документ.Content.Find.Execute("<пробег>", Ложь, Истина, Ложь, , , Истина, , Ложь, пробег);<br>    Документ.Content.Find.Execute("<годвып>", Ложь, Истина, Ложь, , , Истина, , Ложь, годвып);<br>    Документ.Content.Find.Execute("<причина>", Ложь, Истина, Ложь, , , Истина, , Ложь, причина);<br>    Документ.Content.Find.Execute("<история>", Ложь, Истина, Ложь, , , Истина, , Ложь, история);<br>    Документ.Content.Find.Execute("<допоборуд>", Ложь, Истина, Ложь, , , Истина, , Ложь, ДопОборуд);<br>    Документ.Content.Find.Execute("<допуслуги>", Ложь, Истина, Ложь, , , Истина, , Ложь, ДопУслуги);<br>    Документ.Application.Visible = Истина; <br>    Документ.Activate();<br>        <br>    Возврат ТабДокумент;<br>КонецФункции // Печать"

> Функция Печать(ДокументОбъект, ТабДокумент) Экспорт<br>Именно в этом дело.<br>Ищется и вызывается:<br><br><pre>Функция Печать () Экспорт<br>...<br>КонецФункции </pre>

Конфигурация Альфа Авто. Разработчики на сайте раруса советуют делать именно через два параметра, как написано у меня.

В Альфа-Авто вроде бы есть возможность держать обработку во внешнем файле, а не размещать ее в реквизите справочника как хранилище значения. Поэтому можно "прогнать" отладчиком и посмотреть у какого вообще объекта программа пытается найти метод "Печать".

все верно, спасибо, прогнал и вычислил что ссылку на объект надо вставлять сразу же в печать, т.е. печать(ссылканаобъект, табдокумент)