Podaci o trakama

Trčajući zbir (kumulativna suma) predstavlja zbir svih podataka na traci od početka izveštaja ili od početka trake do zapisa koji je trenutno prikazan. U Pantheonu koristimo trčajući zbir, na primer, za prikaz količine i vrednosti zaliha. Može se prikazati u svakoj vrsti ili samo na kraju.

Primer korišćenja trčajućeg zbira je u izveštaju '18A - Zapis o maloprodaji i kupovini dobara' koji se nalazi u programskom meniju 'Dobara | Izveštaj o izdatim fakturama | Komercijalni zapisi'.

  var
    nNabavaNeto, nSalePrice: Double;

...

  procedura DetailOnBeforePrint(Sender: TfrxComponent);
  počni
    ako (<Line#> <> 1) ili (<qReportIzpis."acKey"> <> '0000000000000') onda
    počni
      nNabavaNeto := nNabavaNeto + <qReportIzpis."NabavaNeto">;
      nSalePrice  := nSalePrice  + <qReportIzpis."anSalePrice">;
    kraj;
  kraj;

...

počni
  nNabavaNeto := 0;
  nSalePrice := 0;
kraj.

Hajde da analiziramo ovaj primer.

Na vrhu koda su deklarisane promenljive "nNabavaNeto" i "nSalePrice". One drže vrednosti u periodu, definisanom kriterijumima izveštaja (bez početnog stanja). Zatim se na događaju "OnBeforePrint" dodaju vrednosti kupovine, prijema dobara i prodaje dobara. Na kraju se promenljive prikazuju u rezimeu izveštaja.