Kod: Tümünü seç
dmodul.kontrol.Close;
dmodul.kontrol.SQL.Clear;
dmodul.kontrol.SQL.Add('SELECT turnuvalar.id,turnuvalar.muhkod,turnuvalar.aciklama,turnuvaucret.turnuvaid,turnuvaucret.adsoyad,');
dmodul.kontrol.SQL.Add('sum(turnuvaucret.seans)as s,sum(turnuvaucret.brut) as brut,sum(turnuvaucret.yol)as yol,sum(turnuvaucret.yuzdeelli) as elli,');
dmodul.kontrol.SQL.Add('sum(turnuvaucret.gv)as gelir,sum(turnuvaucret.dv) as damga,sum(turnuvaucret.kestop)as kes,sum(turnuvaucret.odenentutar)as net,');
dmodul.kontrol.SQL.Add('turnuvalar.baslama,turnuvalar.bitis,turnuvaucret.ucrettip,turnuvaucret.tc,turnuvaucret.turnuvatur,turnuvalar.odendi');
dmodul.kontrol.SQL.Add('FROM TURNUVALAR,TURNUVAUCRET WHERE turnuvaucret.ucrettip=0 and turnuvalar.baslama>=:b1 and turnuvalar.bitis<=:b2');
dmodul.kontrol.SQL.Add('and turnuvalar.id=turnuvaucret.turnuvaid and turnuvaucret.turnuvatur=0');
// Tek Kişilik Rapor Almak İstenirse
if cxTextEdit1.Text<>'' then
dmodul.kontrol.SQL.Add(' and turnuvaucret.tc='+cxTextEdit1.Text);
// Sadece Seçili Faaliyet İçin Rapor Almak İstenirse
if cxLookupComboBox2.ItemIndex<>-1 then
dmodul.kontrol.SQL.Add(' and turnuvalar.muhkod='+turnuvaid);
if (cxComboBox1.ItemIndex=0) or (cxComboBox1.ItemIndex=1) then
dmodul.kontrol.SQL.Add(' and turnuvalar.odendi='+durum);
dmodul.kontrol.SQL.Add('GROUP BY turnuvaucret.turnuvaid,turnuvaucret.adsoyad');
dmodul.kontrol.ParamByName('b1').AsDate:=cxDateEdit1.Date;
dmodul.kontrol.ParamByName('b2').AsDate:=cxDateEdit2.Date;
dmodul.kontrol.Open;