8.х Правильно вставить данные в Word-макет ВПФ

Тема в разделе "Конфигурирование на платформе "1С:Предприятие 8"", создана пользователем Katakiarika, 20 фев 2017.

  1. TopicStarter Overlay
    Katakiarika
    Offline

    Katakiarika Опытный в 1С

    Регистрация:
    9 сен 2016
    Сообщения:
    68
    Симпатии:
    0
    Баллы:
    26
    Здравствуйте. Возникла следующая ситуация:
    Дорабатываю внешнюю обработку с анкетой физического лица в ломбарде.
    Макет на печать составлен в MS Word. Есть следующие проблемы:

    1) колонка с датой рождения не заполняется (при отрабатывании обработки пустая колонка)
    111.png - красным выделено поле, которое должно заполниться. Макет заполнял в соответствии с типовым договором займа. (в типовом параметр называется ДатаРожденияЗалогодателя и у меня так же).
    Код:
        Данные.Вставить ("СтоимостьКредита", СтруктУсловияДоговора.СтоимостьКредитаБезПериода);
        Данные.Вставить ("НазваниеОрганизации2", СтруктЛеваяЧасть.ОрганизацияНаименование);
        Данные.Вставить ("ИННОрганизации", СтруктЛеваяЧасть.ОрганизацияИНН);
        Данные.Вставить ("КППОрганизации", СтруктЛеваяЧасть.ОрганизацияКПП);
        Данные.Вставить ("ЮрАдресОрганизации", СтруктЛеваяЧасть.ОрганизацияАдресЮридический);
        Данные.Вставить ("ТелефонОрганизации", СтруктЛеваяЧасть.ОрганизацияТелефон);
        Данные.Вставить ("РуководительОрганизации", СтруктРасчетОплаты.ФИОРуководителя);
        Данные.Вставить ("НазваниеКонтрагента", СтруктЛеваяЧасть.ФИОЗалогодателя);
        Данные.Вставить ("Паспорт", СтруктЛеваяЧасть.ПаспортныеДанныеЗалогодателя); 
        Данные.Вставить ("ДатаРождения", СтруктЛеваяЧасть.ДатаРожденияЗалогодателя);
    Часть кода, все отрабатывает, кроме последней строки.

    А это весь код функции
    Код:
    Функция Печать () Экспорт
        Состояние ("Вывод данных в Word...");
       
        Данные = ПолучитьДокументВордИзМакета ("Макет");
       
        Приложение = Данные.Приложение;
        Документ = Данные.Документ;
        Закладки = Документ.Bookmarks;
        Выделение = Приложение.Selection;
       
        Данные = Новый Структура;
       
        СоответствиеПараметров = ЛМБ_ПечатьЗалоговыхБилетов.ПолучитьДанныеПоЗалогу(
            СсылкаНаОбъект);
       
        СтруктЛеваяЧасть      = СоответствиеПараметров.Получить("ОсновныеПараметры");
        СтруктУсловияДоговора = СоответствиеПараметров.Получить("УсловияДоговора");
        СтруктРасчетОплаты    = СоответствиеПараметров.Получить("РасчетОплаты");
        СтруктМобПриложения   = СоответствиеПараметров.Получить("МобильноеПриложение");
       
        Данные.Вставить ("НомерДокумента", СтруктЛеваяЧасть.СерияЗБ + " " +
            СтруктЛеваяЧасть.НомерЗБ);
        Данные.Вставить ("ДатаДокумента", СтруктЛеваяЧасть.ДатаЗалога);
        Данные.Вставить ("ДатаДокумента2", СтруктЛеваяЧасть.ДатаЗалога);
        Данные.Вставить ("НазваниеОрганизации", СтруктЛеваяЧасть.ОрганизацияНаименование);
        Данные.Вставить ("РеквизитыКонтрагента", СтруктЛеваяЧасть.ОписаниеЗалогодателя);
        Данные.Вставить ("ПолнаяСтоимость",
            "" + СтруктУсловияДоговора.ПолнаяСтоимостьКредита + " %");
        Данные.Вставить ("ПолнаяСтоимостьПрописью",
            СтруктУсловияДоговора.ПолнаяСтоимостьКредитаСтрокойСИзмерением);
        Данные.Вставить ("СуммаЗайма", " " + СтруктЛеваяЧасть.СуммаОценки + " (" +  ОбщегоНазначения.СформироватьСуммуПрописью(СтруктЛеваяЧасть.СуммаОценки, Константы.ВалютаРегламентированногоУчета.Получить()) + ")");
       
            Данные.Вставить ("СуммаЗайма2", "" + СтруктЛеваяЧасть.СуммаЗайма + " (" +
            СтруктЛеваяЧасть.СуммаЗаймаСтрокой1 + ")");
            Данные.Вставить ("СрокДействия", СтруктЛеваяЧасть.ДатаВозврата +
            " (" + СтруктЛеваяЧасть.СрокЗайма + ")");
        Данные.Вставить ("ПроцентнаяСтавка",
            СтруктУсловияДоговора.ПолнаяСтоимостьКредитаСИзмерением);
        Данные.Вставить ("ДатаВозврата", СтруктЛеваяЧасть.ДатаВозврата);
        Данные.Вставить ("ДатаВозврата2", СтруктЛеваяЧасть.ДатаВозврата);
            Данные.Вставить ("ЗалоговаяВещь1", СтруктЛеваяЧасть.ЗалоговаяВещь1);
            Данные.Вставить ("ЗалоговаяВещь2", СтруктЛеваяЧасть.ЗалоговаяВещь2);
            Данные.Вставить ("ЗалоговаяВещь3", СтруктЛеваяЧасть.ЗалоговаяВещь3);
            Данные.Вставить ("ЗалоговаяВещь4", СтруктЛеваяЧасть.ЗалоговаяВещь4);
           
        Данные.Вставить ("СуммаПлатежа", СтруктУсловияДоговора.СуммаПриВыкупеВСрок +
            " (" + ОбщегоНазначения.СформироватьСуммуПрописью (
            СтруктУсловияДоговора.СуммаПриВыкупеВСрокРуб,
            Константы.ВалютаРегламентированногоУчета.Получить()) + ")");
        Данные.Вставить ("СрокДействия2", СтруктЛеваяЧасть.ДатаВозврата +
            " + " + СтруктЛеваяЧасть.СрокЗайма);
            Данные.Вставить ("СтоимостьКредита", СтруктУсловияДоговора.СтоимостьКредитаБезПериода);
        Данные.Вставить ("НазваниеОрганизации2", СтруктЛеваяЧасть.ОрганизацияНаименование);
        Данные.Вставить ("ИННОрганизации", СтруктЛеваяЧасть.ОрганизацияИНН);
        Данные.Вставить ("КППОрганизации", СтруктЛеваяЧасть.ОрганизацияКПП);
        Данные.Вставить ("ЮрАдресОрганизации", СтруктЛеваяЧасть.ОрганизацияАдресЮридический);
        Данные.Вставить ("ТелефонОрганизации", СтруктЛеваяЧасть.ОрганизацияТелефон);
        Данные.Вставить ("РуководительОрганизации", СтруктРасчетОплаты.ФИОРуководителя);
        Данные.Вставить ("НазваниеКонтрагента", СтруктЛеваяЧасть.ФИОЗалогодателя);
        Данные.Вставить ("Паспорт", СтруктЛеваяЧасть.ПаспортныеДанныеЗалогодателя); 
        Данные.Вставить ("ДатаРождения", СтруктЛеваяЧасть.ДатаРожденияЗалогодателя);
        //Данные.Вставить ("МестоРождения", СтруктЛеваяЧасть.МестоРожденияЗалогодателя);
        //Данные.Вставить ("ДатаНачалаОтношенийСКлиентом", СтруктЛеваяЧасть.ЛМБ_ДатаНачалаОтношенийСКлиентом);
        //Данные.Вставить ("ДатаОперации", СтруктЛеваяЧасть.ДатаОперации);
        Данные.Вставить ("АдресКонтрагента", СтруктЛеваяЧасть.АдресЗалогодателя);
        Данные.Вставить ("ТелефонКонтрагента", СтруктЛеваяЧасть.ТелефонЗалогодателя);
       
        ЗаполнитьСвойстваДокументаВорд (Выделение, Документ, Данные);
        Приложение.Visible = Истина;
    КонецФункции // Печать
    Если маловато инфы - поправьте.
  2. TopicStarter Overlay
    Katakiarika
    Offline

    Katakiarika Опытный в 1С

    Регистрация:
    9 сен 2016
    Сообщения:
    68
    Симпатии:
    0
    Баллы:
    26
    Пропустил через отладчик пошагово. Всё заполнилось. Никаких ошибок не выдает, ничего. Я в замешательстве.