Имя: Пароль:
1C
1С v8
Изменение ВПФ УПД
,
0 bluekrab
 
28.06.16
10:24
Есть ВПФ стандартного УПД. Необходимо добавить к строке товара информацию из доп.сведения. Добавляю к параметру нужный кусок, не выводится.
Вот тот кусок кода, заполняющий область "Строка!:

    ОбластьМакета = Макет.ПолучитьОбласть("Строка");
    
    КоличествоСтраниц = 1;
    
    СчетФактураБезНДС = Истина;
    НДСНеВыставляетя  = Истина;
    
        Ком = ВыборкаСФ.ДокументыОснования.Получить(0);
        Коммент = Ком.Комментарий;
        ДлинаКом = СтрДлина(Коммент);
        ДлинаСтроки = Число(ДлинаКом - 11 - 22);
        ДлинаГод = Число(ДлинаКом - 16);
        //Сообщить(ДлинаСтроки);
        
    НомерСтроки = 0;
    НомерЛиста = 1;
    КоличествоСтрок = ТаблицаДокумента.Количество();
    Для каждого СтрокаДокумента Из ТаблицаДокумента Цикл
        
        НомерСтроки = НомерСтроки + 1;
        СтрокаДокумента.НомерСтроки = НомерСтроки;
        
        ОбластьМакета.Параметры.Заполнить(СтрокаДокумента);
        ОбластьМакета.Параметры.ТоварНаименование = ОбластьМакета.Параметры.ТоварНаименование + ДопСведение();

        Если НЕ ЗначениеЗаполнено(СтрокаДокумента.СтавкаНДС) Тогда
            ОбластьМакета.Параметры.СтавкаНДС = "--";
            Если СтрокаДокумента.СуммаНДС = 0 Тогда
                ОбластьМакета.Параметры.СуммаНДС = "--";
            КонецЕсли;
        КонецЕсли;
        ДозаполнитьСтрокуСчетаФактуры1137(ОбластьМакета, ВыборкаСФ.ВидСчетаФактуры);
        
        Если НЕ ПроверитьВыводСчетаФактурыНаСтраницу(ТабДокумент, ОбластьМакета, (НомерСтроки = КоличествоСтрок), Макет, НомерЛиста, НомерСчетаФактуры, ЭтоУниверсальныйПередаточныйДокумент) Тогда
            КоличествоСтраниц = КоличествоСтраниц + 1;
        КонецЕсли;
        ТабДокумент.Вывести(ОбластьМакета);
        
        СчетФактураБезНДС = СчетФактураБезНДС И СтрокаДокумента.СуммаНДС = 0
            И СтрокаДокумента.СтавкаНДС = Перечисления.СтавкиНДС.БезНДС;
        
        НДСНеВыставляетя = НДСНеВыставляетя И СтрокаДокумента.СуммаНДС = 0
            И НЕ ЗначениеЗаполнено(СтрокаДокумента.СтавкаНДС);
        
    КонецЦикла;

    ТабДокумент.Область(ТабДокумент.ВысотаТаблицы,,ТабДокумент.ВысотаТаблицы,).ВместеСоСледующим = Истина;

Что  я делаю не так?
1 kn
 
28.06.16
10:31
Можно сделать так (типа отладка)
Сообщить(ОбластьМакета.Параметры.ТоварНаименование);
Сообщить(ДопСведение());
ОбластьМакета.Параметры.ТоварНаименование = ОбластьМакета.Параметры.ТоварНаименование + ДопСведение();
Сообщить(ОбластьМакета.Параметры.ТоварНаименование);

Возвможно не хватает СокрЛП()
Программист всегда исправляет последнюю ошибку.