Податоци Бендови
Тековната сума (кумулативна сума) претставува сума на сите податоци на податочната лента од почетокот на извештајот или од почетокот на лентата до записот кој моментално е прикажан. Во Пантheon користиме тековна сума на пример за прикажување на количината и вредноста на залихите. Може да се прикаже во секој ред или само на крајот.
Пример за користење на тековна сума е во извештајот '18А - Запис за малопродажба и купување на стоки' кој е во програмското мени 'Стоки | Извештај за издадени фактури | Комерцијални записи'.
var
nNabavaNeto, nSalePrice: Double;
...
процедура DetailOnBeforePrint(Sender: TfrxComponent);
почни
ако (<Line#> <> 1) или (<qReportIzpis."acKey"> <> '0000000000000') тогаш
почни
nNabavaNeto := nNabavaNeto + <qReportIzpis."NabavaNeto">;
nSalePrice := nSalePrice + <qReportIzpis."anSalePrice">;
крај;
крај;
...
почни
nNabavaNeto := 0;
nSalePrice := 0;
крај.
Ајде да го анализираме овој пример.
На врвот на кодот се декларирани променливи "nNabavaNeto" и "nSalePrice". Тие држат вредности во периодот, дефиниран од критериумите на извештајот (без почетен биланс). Потоа на настанот "OnBeforePrint" се додаваат вредностите на купување, примање на стоки и продажба на стоки. На крај, променливите се прикажуваат во резиме на извештајот.