Запутался с внешней формой

Прошу консультации
ЭтотОбъект , поменял СсылкаНаОбъект при распечатывание выдает сообщение
Не удалось сформировать внешнюю печатную форму!
Поле объекта не обнаружено (Ссылка)

Конфигурация Бухгалтерия 2.0

Сам код
-----------------------------------------------------------------

Функция ПечатьОтчетаКомитенту()

ДопКолонка = Константы.ДополнительнаяКолонкаПечатныхФормДокументов.Получить();
Если ДопКолонка = Перечисления.ДополнительнаяКолонкаПечатныхФормДокументов.Артикул Тогда
ВыводитьКоды = Истина;
Колонка = "Артикул";
ТекстКодАртикул = "Артикул";
ИначеЕсли ДопКолонка = Перечисления.ДополнительнаяКолонкаПечатныхФормДокументов.Код Тогда
ВыводитьКоды = Истина;
Колонка = "Код";
ТекстКодАртикул = "Код";
Иначе
ВыводитьКоды = Ложь;
Колонка = "";
ТекстКодАртикул = "Код";
КонецЕсли;

Если ВыводитьКоды Тогда
ОбластьШапки = "ШапкаСКодом";
ОбластьСтроки = "СтрокаСКодом";
Иначе
ОбластьШапки = "ШапкаТаблицы";
ОбластьСтроки = "Строка";
КонецЕсли;

Запрос = Новый Запрос;
Запрос.УстановитьПараметр("ТекущийДокумент", СсылкаНаОбъект);
Запрос.Текст =
"ВЫБРАТЬ
| ОтчетКомитентуОПродажах.Номер,
| ОтчетКомитентуОПродажах.Дата,
| ОтчетКомитентуОПродажах.ДоговорКонтрагента,
| ОтчетКомитентуОПродажах.Контрагент,
| ОтчетКомитентуОПродажах.Организация,
| ОтчетКомитентуОПродажах.СуммаДокумента,
| ОтчетКомитентуОПродажах.ВалютаДокумента,
| ОтчетКомитентуОПродажах.СтавкаНДСВознаграждения,
| ОтчетКомитентуОПродажах.СуммаВознаграждения,
| ОтчетКомитентуОПродажах.Товары.(
| НомерСтроки,
| Номенклатура,
| Номенклатура."+ ТекстКодАртикул + " КАК КодАртикул,
| Номенклатура.НаименованиеПолное КАК Товар,
| КоличествоМест,
| Количество,
| ЕдиницаИзмерения.Представление КАК ЕдиницаИзмерения,
| Номенклатура.БазоваяЕдиницаИзмерения КАК ЕдиницаХранения,
| ЦенаПоступления,
| СуммаПоступления,
| СуммаВознаграждения
| )
|ИЗ
| Документ.ОтчетКомитентуОПродажах КАК ОтчетКомитентуОПродажах
|ГДЕ
| ОтчетКомитентуОПродажах.Ссылка = &ТекущийДокумент";
Шапка = Запрос.Выполнить().Выбрать();

Шапка.Следующий();

ВыборкаСтрокТовары = Шапка.Товары.Выбрать();

ТабДокумент = Новый ТабличныйДокумент;
ТабДокумент.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_ОтчетКомитентуОПродажах_ОтчетКомитентуОПродажах";
Макет = ПолучитьМакет("ОтчетКомитентуОПродажах");

// Выводим шапку накладной

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

СведенияОбОрганизации = УправлениеКонтактнойИнформацией.СведенияОЮрФизЛице(Шапка.Организация, Шапка.Дата);
ПредставлениеОрганизации = ФормированиеПечатныхФорм.ОписаниеОрганизации(СведенияОбОрганизации, "НаименованиеДляПечатныхФорм,");

СведенияОКонтрагенте = УправлениеКонтактнойИнформацией.СведенияОЮрФизЛице(Шапка.Контрагент, Шапка.Дата);
ПредставлениеКонтрагента = ФормированиеПечатныхФорм.ОписаниеОрганизации(СведенияОКонтрагенте, "НаименованиеДляПечатныхФорм,");

ОбластьМакета = Макет.ПолучитьОбласть("Поставщик");
ОбластьМакета.Параметры.Заполнить(Шапка);
ОбластьМакета.Параметры.ПредставлениеПоставщика = ПредставлениеКонтрагента;
ОбластьМакета.Параметры.Поставщик = Шапка.Контрагент;
ТабДокумент.Вывести(ОбластьМакета);

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

ОбластьМакета = Макет.ПолучитьОбласть(ОбластьШапки);
Если ВыводитьКоды Тогда
ОбластьМакета.Параметры.ИмяКодАртикул = ТекстКодАртикул;
КонецЕсли;
ТабДокумент.Вывести(ОбластьМакета);

ОбластьМакета = Макет.ПолучитьОбласть(ОбластьСтроки);

Итого = 0;

Пока ВыборкаСтрокТовары.Следующий() Цикл

ОбластьМакета.Параметры.Заполнить(ВыборкаСтрокТовары);
ТабДокумент.Вывести(ОбластьМакета);

Итого = Итого + ВыборкаСтрокТовары.СуммаПоступления;

КонецЦикла;

ОбластьМакета = Макет.ПолучитьОбласть("Итого");
ОбластьМакета.Параметры.Всего = Итого;
ТабДокумент.Вывести(ОбластьМакета);

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

ОбластьМакета = Макет.ПолучитьОбласть("Подписи");
ОбластьМакета.Параметры.Заполнить(Шапка);
ТабДокумент.Вывести(ОбластьМакета);

Возврат ТабДокумент;

КонецФункции // ПечатьОтчетаКомитенту()

Функция Печать(КоличествоЭкземпляров = 1, НаПринтер = Ложь, НепосредственнаяПечать = Ложь) Экспорт
ТабДокумент =ПечатьОтчетаКомитенту();

УниверсальныеМеханизмы.НапечататьДокумент(ТабДокумент, КоличествоЭкземпляров, НаПринтер, ОбщегоНазначения.СформироватьЗаголовокДокумента(ЭтотОбъект, ЭтотОбъект.Метаданные().Представление()), НепосредственнаяПечать);

КонецФункции // Печать