Autoincrement-Wert bei Firebird

[Opa Knack]

Hallo,

irgendwie komme ich mal wieder nicht weiter. Ich kenne die autoincrement-Felder eigentlich nur von MySQL-Datenbanken, bei denen bei jedem Insert automatisch der autoinc-Wert erhöht wird. Soweit mich meine Suche jetzt nicht absolut in die Irre geführt hat, ist dies bei Firebird nicht so, so dass folgender Code im Endeffekt nicht funktionieren kann:

Delphi-Quellcode:

queryKategorien.SQL.Text :=
'INSERT INTO tabelle_kategorie_sub (KATEGORIE) ' +
' VALUES (' +
QuotedStr(Node.Text) + ');';
queryKategorien.ExecSQL;

(Zur Erläuterung: In der Tabelle gibt's neben dem Feld 'Kategorie' noch das Feld 'ID', welches automatisch erhört werden soll)

Leider kriege ich's aber anscheinend nicht in meine alternde Murmel, wie ich denn nun den ID-Wert erhöhen kann. Ich habe zwar viel von SP gelesen und verschiedene SQL-Statements gesehen, aber das hat alles nicht geklappt.

Hat jemand einen Tipp für mich?

Danke und Gruß
Opa

[mkinzler]

Kombination Generator + Trigger. Welches Admintool nutzt du?

[Opa Knack]

Hallo,

den EMS SQL Manager 2005. Die Generatoren habe ich angelegt, aber wie kann ich die auch nutzen?

Gruß
Opa

[omata]

Hallo Opa Knack,

anlegen...

SQL-Code:

  CREATE GENERATOR GEN_name

initialisieren...

SQL-Code:

  SET GENERATOR GEN_name TO 0

ID erzeugen...

SQL-Code:

  INSERT INTO tabelle (id, bezeichnung)
  VALUES (gen_id(GEN_name, 1), 'Test')

Gruss
Thorsten

[Opa Knack]

Hallo,

Super, klappt. Danke und gute Nacht

Gruß
Opa

[mkinzler]

Man kann, wie schon erwähnt, auch einen Trigger verwenden, welcher dann die werte automatisch setzt:

SQL-Code:

SET TERM !! ;


CREATE TRIGGER <TABELLE>_BI FOR <TABELLE>
ACTIVE BEFORE INSERT POSITION 0
AS
BEGIN
  IF (NEW.ID IS NULL) THEN
    NEW.ID = GEN_ID(GEN_<TABELLE>_ID,1);
END
!!


SET TERM ; !!