Podatkovni trakovi

Trenutni skupni znesek (kumulativni znesek) predstavlja vsoto vseh podatkov na podatkovnem traku od začetka poročila ali od začetka traku do zapisa, ki je trenutno prikazan. V Pantheonu uporabljamo trenutni skupni znesek, na primer za prikaz količine in vrednosti zalog. Prikazan je lahko v vsakem vrstici ali le na koncu.

Primer uporabe trenutnega skupnega zneska je v poročilu '18A - Zapis o maloprodaji in nakupu blaga', ki je v programskem meniju 'Blago | Poročilo o izdanih računih | Komercialni zapisi'.

  var
    nNabavaNeto, nSalePrice: Double;

...

  postopek DetailOnBeforePrint(Sender: TfrxComponent);
  začni
    če (<Line#> <> 1) ali (<qReportIzpis."acKey"> <> '0000000000000') potem
    začni
      nNabavaNeto := nNabavaNeto + <qReportIzpis."NabavaNeto">;
      nSalePrice := nSalePrice + <qReportIzpis."anSalePrice">;
    konec;
  konec;

...

začni
  nNabavaNeto := 0;
  nSalePrice := 0;
konec.

Analizirajmo ta primer.

Na vrhu kode so deklarirane spremenljivke "nNabavaNeto" in "nSalePrice". Držijo vrednosti v obdobju, ki ga določajo kriteriji poročila (brez začetnega stanja). Nato se na dogodku "OnBeforePrint" dodajo vrednosti nakupa, prejemanja blaga in prodaje blaga. Na koncu se spremenljivke prikažejo v povzetku poročila.