Kod: Tümünü seç
data.cek_table.SQL.Clear;
data.cek_table.SQL.Add('select bordro.carikod,cari.unvan,bordro.tarih,cek.sira,cek.portno,cek.cekno,cek.banka,');
data.cek_table.SQL.Add('cek.sube,cek.hesap,cek.vade,cek.borclu,cek.tutar,cek.keside');
data.cek_table.SQL.Add('cek.keside_vd,cek.keside_vno,cek.keside_il,cek.keside_ilce');
data.cek_table.SQL.Add('cek.keside_tel,cek.keside_ceptel,cek.keside_adres,SUM(TUTAR) from bordro ');
data.cek_table.SQL.Add('right outer join cek_bordro on bordro.bordrono=cek_bordro.bordrono');
data.cek_table.sql.Add('right outer join cek on cek_bordro.portno=cek.portno');
data.cek_table.sql.Add('left outer join cari on bordro.carikod=cari.kodu');
data.cek_table.sql.Add('where bordro.btur="Portföye Çek Giriş Bordrosu"');
data.cek_table.SQL.Add('and bordro.tarih between "'+datetostr(btar1.Date)+'" and "'+datetostr(btar2.Date)+'"');
data.cek_table.SQL.Add('and cek.vade between "'+datetostr(vtar1.Date)+'"and "'+datetostr(vtar2.Date)+'"');
if kod1.Text<>'' then
begin
if kod2.Text<>'' then
data.cek_table.SQL.Add('and bordro.carikod between '+quotedstr(kod1.Text)+' and '+quotedstr(kod2.Text))
else data.cek_table.SQL.Add('and bordro.carikod>='+quotedstr(kod1.Text));
end
else if kod2.Text<>'' then
data.cek_table.sql.Add('and bordro.carikod<='+quotedstr(kod2.Text));
if pno1.Text<>'' then
begin
if pno2.Text<>'' then
data.cek_table.sql.Add('and cek.portno between '+quotedstr(pno1.Text)+' and '+quotedstr(pno2.Text))
else data.cek_table.SQL.Add('and cek.portno>='+quotedstr(pno1.Text));
end
else if pno2.Text<>'' then
data.cek_table.SQL.Add('and cek.portno<='+quotedstr(pno2.Text));
if bno1.Text<>'' then
begin
if bno2.Text<>'' then
data.cek_table.sql.Add('and bordro.bordrono between '+quotedstr(bno1.Text)+' and '+quotedstr(bno2.Text))
else data.cek_table.SQL.Add('and bordro.bordrono>='+quotedstr(bno1.Text));
end
else if bno2.Text<>'' then
data.cek_table.SQL.Add('and bordro.bordrono<='+quotedstr(bno2.Text));
if borclu.Text<>'' then
data.cek_table.SQL.Add('and cek.borclu='+quotedstr(borclu.Text));
data.cek_table.SQL.Add('group by bordro.carikod,cari.unvan,bordro.tarih,cek.sira,cek.portno,cek.cekno,cek.banka,');
data.cek_table.SQL.Add('cek.sube,cek.hesap,cek.vade,cek.borclu,cek.tutar,cek.keside,');
data.cek_table.SQL.Add('cek.keside_vd,cek.keside_vno,cek.keside_il,cek.keside_ilce,');
data.cek_table.SQL.Add('cek.keside_tel,cek.keside_ceptel,cek.keside_adres');
data.cek_table.Open;