Sortierung bei SQL

[Hansa]

Hi Sharky,

einwandfrei Das war der richtige Weg Hier ist etwas mehr Quelltext :

Code:

procedure TReDruck.Button1Click(Sender: TObject);
begin
  RecDataMod.ReckopfDS.active := false;
  RecDataMod.KuDataSet.active := false;
  WITH RecDataMod.ReckopfDS DO
    SelectSQL.Text := 'SELECT * FROM RECKOPF8 WHERE RECHNNR ='+Edit1.TEXT;
  RecDataMod.ReckopfDS.Active := true;
  WITH RecDataMod.KuDataSet DO
    SelectSQL.Text := 'SELECT * FROM KUNDE8 WHERE ID = ' +
    RecDataMod.ReckopfDS.FieldByName ('ID_KUNDE').AsString;
  RecDataMod.KuDataSet.active := true;
  QuickRep1.Preview;
  Close;
end;

Was hierbei wichtig ist : da ich keine Query verwende, muß das Active der DataSets an der richtigen Stelle stehen. Bisher hatte ich bei BEIDEN DataSets am Anfang der Prozedure active auf false und am Schluß active auf true gesetzt. An die ID_KUNDE der Rechnung komm ich aber nur ran, wenn das erste SQLselect bereits ausgeführt ist !!!

Gruß
Hansa

P.S.: Um diesem Thema hier gerecht zu werden kann ich ja jetzt mit den Artikeln weitermachen, die müssen ja sortiert werden und nicht ein einzelner Kunde.