UNIQUE KEY auf RechnungsNr setzen

Hi,

ich möchte auf die fortlaufende Rechnungsnummer einen unique Key setzen, damit jede Nummer zuverlässig nur einmal gespeichert wird.

Ist meine Vorgehensweise so i.O.?

1.) In der Datenbankoberfläche setze ich auf die RechnungsNr einen
Sekundärindex.

2.)

markieren

Delphi-Quellcode:

			    procedure TFormRechnungen.QueryRechnungenBeforePost(DataSet:

    TDataSet);          //Rechnungsnummer prüfen

    begin

      if QueryRNr.Fields[0].AsInteger > 0 then

       DataSet.FieldByName('RNr').AsInteger := NextKey('RNr',

       'Rechnungen');

    end;

Besten Dank für die Hilfe!

Gruß
Lombi

UNIQUE KEY auf RechnungsNr setzen

UNIQUE KEY auf RechnungsNr setzen

Forumregeln