Помогите получить итог по колонке сумма в макете
☑
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) и все остальное, связанное с итогом - в топку
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший