C_Sum

Internφ programovacφ jazykC/C++Pascal

function C_Sum(curs : tcurstab; var attrname, condition : string; var res : untyped) : Boolean;
BOOL [cd_]C_Sum([cdp_t cdp], tcurstab curs, const char * attrname, const char * condition, void * res);
function [cd_]C_Sum([cdp : cdp_t]; curs : tcurstab; attrname, condition : PChar; var res) : Boolean;

Parametry

curs deklarovanß tabulka nebo otev°en² kurzor -viz podrobnosti
attrname jmΘno sloupce
condition dodateΦnß podmφnka na v²b∞r
res v²stupnφ parametr - souΦet hodnot sloupce attrname; beztypovß prom∞nnß
[cdp kontextovß prom∞nnß klienta]

Popis

Funkce vypoΦφtß souΦet hodnot sloupce attrname v tabulce nebo dotazu curs, p°φpadn∞ omezenΘho navφc podmφnkou condition. Je-li parametr condition prßzdn² °et∞zec, berou se vÜechny zßznamy z curs.

Sloupec musφ b²t numerickΘho typu.

V²sledek bude zapsßn do beztypovΘ prom∞nnΘ res.

Hodnota funkce

Funkce p°i chyb∞ vrßtφ TRUE, p°i ·sp∞chu FALSE.

Funkci nelze pou₧φt pro multiatributy, sloupce prom∞nnΘ velikosti ani ukazatele.

P°φklad

var 
  suma : untyped;
  pr : money;
table
  Faktury;
begin
  if not [cd_]C_Sum(Faktury,'Castka','druh=1',suma) then begin
    pr := prumer;
    Info_box('SouΦet faktur:',Money2str(pr,1));
  end;
end.

Viz