22.09.2011, 10:39 | #21 |
Участник
|
3. Итоги по группам. VB Script и PDF
- заводим футер группы - он всегда скрыт и для понимания назначения имеет красный цвет шрифта - получаем итоги по группе Код: =Sum(CDec(Fields!lReportValues4.Value), "table1_Group1") - переименовываем техтбоксы на скрытом футере из text123.. в Amount,VatAmount,AmountWithVat - в свойствах отчета на закладке код обявляем 3 переменные и функцию на VBScript Код: Public Dim Amount as Decimal Public Dim AmountVat as Decimal Public Dim AmountWithVat as Decimal Public Function SetValue (ByVal Value1 as Decimal,ByVal Value2 as Decimal,ByVal Value3 as Decimal) as Decimal Amount =Amount+Value1 AmountVat =AmountVat+Value2 AmountWithVat =AmountWithVat+Value3 Return Nothing End Function Код: =Code.Amount Код: =Code.SetValue(ReportItems!AmountGroup.Value,ReportItems!VatGroup.Value,ReportItems!AmountWithVatGroup.Value) Send email with PDF attachment in NAV 2009 Всем удачи и хорошего дня!
__________________
--------------------------------------------------------------------------------------------- "Собрать стадо из баранов легко, трудно собрать стадо из кошек" Профессор Сергей Капица |
|