Select Rückgabe

[bjma]

hallo hier der code:


ich wechsle bei jedem Aufruf nur die variante "bau_name" aus.

Delphi-Quellcode:

data2.Datei.Active:=false;
with data2.Datei.SQL do
begin
data2.Datei.sql.Clear;
add('select d.bauname,d.baustelle, concat(name,'+chr(39)+' , '+chr(39)+',vorname) as anschrift, m.strasse,m.ort,m.post,d.kundennr, betr1,betr2,bau_strass,bau_ort,Materialek, Materialvk,Mat_auf,Lohnpreis,dmjestd,d.kundennr, maschine,min_ges,lohn_ges,preis');
add('from datei d left join marketin m');
add('using (kundennr)');
add('where d.auftrag='+chr(39)+'J'+chr(39)+' and d.faktura='+chr(39)+'N'+chr(39)+' and bauname Like'+chr(39)+Bau_name+'%'+chr(39));
add('order by d.bauname');
 end;
data2.Datei.active:=true;

dieser Code funktioniert beim erstmaligen Aufruf.Danach ist die Datenmenge leer.

jürgen

[edit=Admin]Code in Delphi-Tags gesetzt. Bitte künftig selber machen, danke. Mfg, Daniel[/edit]