C_Min

Internφ programovacφ jazykC/C++Pascal

function C_Min(curs : tcurstab; var attrname, condition : string; var res : untyped) : Boolean;
BOOL [cd_]C_Min([cdp_t cdp], tcurstab curs, const char * attrname, const char * condition, void * res);
function [cd_]C_Min([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 - maximßlnφ hodnota sloupce attrname; beztypovß prom∞nnß
[cdp kontextovß prom∞nnß klienta]

Popis

Funkce vypoΦφtß minimßlnφ hodnotu 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.

Sloupce musφ b²t bu∩ numerickΘho typu, °et∞zec, znak typ Time nebo Date.

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

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

Hodnota funkce

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

P°φklad

table
  faktury;
var
  u : untyped;
  mo : money;
  c : cursor;
  
begin
  if not Open_sql_cursor(c,'select Sum(CASTKA), '
             'FIRMA From FAKTURY Group By FIRMA ') 
  then 
  if not C_Min(c,'SUM1','',u) then begin
    mo := u;
    Info_box('Nejni₧Üφ obrat',Money2str(mo,0));
  end;
  Close_cursor(c);
end.

Viz