Вывести адрес в печатную форму УТ 11.5.

Функция ПечатьВнешнейПечатнойФормы(МассивОбъектов, ОбъектыПечати, Подписант) Экспорт
    Если МассивОбъектов.Количество() = 0 Тогда
        Сообщить("Не переданы объекты для печати.");
        Возврат Неопределено;
    КонецЕсли;

    ДокСсылка = МассивОбъектов[0];

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

        НомерДокумента = ДокОбъект.Номер;
        ДатаДокументаСтрока = Формат(ДокОбъект.Дата, "ДФ=dd.MM.yyyy");
		
        Организация = ДокОбъект.Организация;
        ОрганизацияПредставление = Организация.НаименованиеПолное;
        ОГРН = Организация.ОГРН;

        Контрагент = ДокОбъект.Контрагент;
        ПокупательПредставление = Контрагент.НаименованиеПолное;

        СуммаДокумента = ДокОбъект.СуммаДокумента;
        СуммаПрописью = ЧислоПрописью(
            СуммаДокумента, 
            "Л=ru_RU;ДП=Истина", 
            "рубль,рубля,рублей,м,копейка,копейки,копеек,ж,2"
        );
    Иначе
        Сообщить("Передан объект, для которого не предусмотрена данная печатная форма.");
        Возврат Неопределено;
    КонецЕсли;

    ТабДок = Новый ТабличныйДокумент;
    ТабДок.ОриентацияСтраницы = ОриентацияСтраницы.Портрет;

    Макет = ПолучитьМакет("ДоговорРассрочки");
    МакетДоговор = Макет.ПолучитьОбласть("Шапка");

    МакетДоговор.Параметры.Номер = НомерДокумента;
    МакетДоговор.Параметры.Дата = ДатаДокументаСтрока;
    МакетДоговор.Параметры.ОрганизацияПредставление = ОрганизацияПредставление;
    МакетДоговор.Параметры.ПокупательПредставление = ПокупательПредставление;
    МакетДоговор.Параметры.Сумма = СуммаДокумента;
    МакетДоговор.Параметры.СуммаПрописью = СуммаПрописью;
    МакетДоговор.Параметры.ОГРН = ОГРН;

    ТабДок.Вывести(МакетДоговор);
    Возврат ТабДок;
КонецФункции