Einzelnen Beitrag anzeigen

LOMBI
(Gast)

n/a Beiträge
 
#1

PosNummern in Rechnungsdaten

  Alt 24. Aug 2006, 16:34
Datenbank: Paradox • Zugriff über: TQuery, TDataSource
Tabelle: Rechnungsdaten
Feld: PosNr (n)umerisch


Hallo,

die Rechnungsdaten (Artikel) werden in einem DBGrid angezeigt. Jeder Artikel erhält eine fortlaufende PosNr

1.0 Artikel1
2.0 Artikel2
3.0 Artikel3
...

Delphi-Quellcode:
TFRechnungen.QueryRechnungsdatenAfterInsert(DataSet. TDataSet);
begin //PosNr hochzählen
  with DataSet do
    if QueryRechnungsdaten.FieldByName('PosNr').IsNull then
      QueryRechnungsdaten.FieldByName('PosNr').AsInteger :=
      NextKey('PosNr', 'Rechnungsdaten');
    end;
Problem:

Mit dem ersten Artikel in einer neuen Rechnung muß die PosNr wieder bei 1.0 starten.

Wie bitte erreiche ich das?

Gruß
Lombi
  Mit Zitat antworten Zitat