Имя: Пароль:
1C
1С v8
Помогите получить итог по колонке сумма в макете
0 bebs2010
 
13.09.13
10:23
подскажи пожалуйста как с помощью переменной получить итог по колонке сумма во внешней печатной форме ? можете писать мне в скайп bebs20104

Функция Печать ()  Экспорт
    ТабДок = Новый ТабличныйДокумент ;

    Макет = ПолучитьМакет ("Макет");

    СекцияШапка = Макет.ПолучитьОбласть("Шапка");
    СекцияСтрока = Макет.ПолучитьОбласть("Строка");
    СекцияОблИтоги= Макет.ПолучитьОбласть("ОблИтоги");
    СекцияШапка.Параметры.НаименованиеБанка = СсылкаНаОбъект.Банк ;
    СекцияШапка.Параметры.НаименованиеОрганизации = СсылкаНаОбъект.Организация ;
    СекцияШапка.Параметры.НомерСчета = НомерСчета ;
    СекцияШапка.Параметры.НомерПП = СокрЛП(Строка(НомерПП));
    СекцияШапка.Параметры.ДатаПП = Формат(ДатаПП,"ДФ=""дд.ММ.гггг""");

    ТабДок.Вывести(СекцияШапка) ;
       номерПП = 1;
     СекцияСтрока.Параметры.номерПП = номерПП;

        Для каждого СтрТаб Из СсылкаНаОбъект.Зарплата Цикл
      
        Отбор = Новый Структура;
        Отбор.Вставить("ФизЛицо", СтрТаб.ФизЛицо);
      
        Выборка = РегистрыСведений.ЛицевыеСчетаРаботниковОрганизации.Выбрать(Отбор);
        
                Если Не Выборка.Следующий() Тогда
            Продолжить;
        КонецЕсли;
                
        СекцияСтрока.Параметры.ЛицевойСчет = Выборка.НомерЛицевогоСчета;
        
        МассивФИО = ОбщегоНазначения.ПолучитьМассивФИО(Строка(СтрТаб.ФизЛицо));
    
        СекцияСтрока.Параметры.Фамилия = МассивФИО[0];
        СекцияСтрока.Параметры.Имя = МассивФИО[1];
        СекцияСтрока.Параметры.Отчество = МассивФИО[2];
        
        СекцияСтрока.Параметры.Сумма = СтрТаб.Сумма;
        СуммаИтог = 0;
           СекцияСтрока.Параметры.номерПП = номерПП;

        номерПП = номерПП + 1;
         СуммаИтог = СуммаИтог + Сумма;

        ТабДок.Вывести(СекцияСтрока);

    КонецЦикла;    
    СекцияОблИтоги.Параметры.ИтогоСумма = СуммаИтог;
    
ТабДок.Вывести(СекцияОблИтоги);

    Возврат ТабДок;
    
КонецФункции
1 pessok
 
13.09.13
10:25
СуммаИтог = 0; //это треба вынести за цикл
2 pessok
 
13.09.13
10:25
вообще, у параметров табличного документа есть кошерный метод Заполнить(), а в запросах можно использовать итоги
3 KUBIK
 
13.09.13
10:26
СуммаИтог = 0;
не там стоит
4 Шапокляк
 
13.09.13
10:27
А вместо Сумма надо СтрТаб.Сумма
5 pessok
 
13.09.13
10:27
а, тут обход ТЧ, блин...
СекцияОблИтоги.Параметры.ИтогоСумма = СссылкаНаОбъект.Зарплата.Итог("Сумма");
6 pessok
 
13.09.13
10:27
+(5) и все остальное, связанное с итогом - в топку
Оптимист верит, что мы живем в лучшем из миров. Пессимист боится, что так оно и есть.