Firebird Autoincrement

[brunoM]

Hallo zusammen
Ich bin daran von AbsoluteDatabase auf Firebird umzusteigen. Firebird ist Neuland und ich habe ein Problem mit Autoincrement-Feldern bzw. mit dem Import von Daten mittels Delphi.

Von AbsoluteDB gewohnt:
tabelle.Insert;
tabelle.Fieldbyname('yx').AsString :='Text....';
tabelle.Fieldbyname('yx').AsString :='Text....';
tabelle.Post.
Soweit so gut - das Autoincrement-Feld wird dabei automatisch erhöt und der Wert mitgespeichert.

Dass es bei Firebird kein Autoincrement-Feld gibt weis ich - habe deshalb auch einen Generator und einen Trigger angelegt bzw. das hat SQL-Manager erledigt. Erfasse ich Daten innerhalb des SQL-Managers funktioniert die Zählung des Autoincrement-Feldes. Versuche ich jedoch über Delphi Daten analog der oben beschriebenen Vorgehensweise zu erfassen, erscheint die Meldung Feld "id" (das besagte Autoincrement-Feld) muss einen Wert haben - scheinbar muss ich da noch etwas unternehmen dass ein Wert vom Generator geliefert und in das id-Feld eingetragen wird. Ich benutze die Unidac-Komponenten von Devart

Leider komme ich nicht weiter - aber vielleicht hat ja hier jemand einen Tipp, jedenfalls schon Danke im Voraus für eure Hilfe.

Gruss
Bruno

[haentschman]

Moin...
Prinzipiell geht das auch. Zeige mal den Trigger und den Generator.
z.B. Trigger mit Generator (id_gen):

Delphi-Quellcode:

begin
  if (new.id is null) then 
    new.id = gen_id(id_gen,1);
end

[NicoDE]

edit: Upz, habe UniDAC überlesen. Ich lasse das folgende für FireDAC trotzdem stehen

Interessant für dich sind "UpdateOptions.AutoIncFields" und optional "UpdateOptions.GeneratorName" (wenn der Before-Insert-Trigger sich nicht darum kümmert).
Wenn du mit persistenten Feldern arbeitest, dann sieh dir am Schlüsselfeld die Eigenschaft "AutoGenerateValue" an. Sollte auf "arAutoInc" stehen (mindestens "arDefault"), damit das Dataset sich nach der Aktion den Wert holt (intern mit RETURNING INTO, damit es sich nicht über den Schlüssel ("UpdateOptions.KeyFields" bzw. "ProviderFlags" [...,pfInWhere,pfInKey]), mit einer weiteren Abfrage, die aktuelle Zeile holen muss). Dazu muss am Feld "Required" natürlich auf "False" stehen.

[kretabiker]

Ich habe zwar nicht UNIDAC, aber IBDAC vom gleichen Hersteller, vielleicht gibt es da Ähnlichkeiten.

Es müssen in den Komponenten folgende Felder gesetzt sein (Beispiel für IBCQuery):
- Key Generator (auf den Namen des Generators in FB)
- Key Field (auf das Feld in der Tabelle, welches als "Autoinc" dient)
- evtl. noch den GeneratorMode wechseln von gmPost auf gmInsert

So klappt es bei mir mit Pseudo-Autoinc-Feldern

*** Ups, übersehen, dass du einen Trigger einsetzt. Meine Lösung funktioniert ohne Trigger. Vielleicht hat noch jemand eine Idee bezüglich des Triggers

[Neutral General]

Man muss bei den Komponenten nix einstellen.
Wenn Trigger und Generator korrekt sind reicht es einfach die ID nicht zu setzen und dann wird sie automatisch beim Insert generiert!

Zeig am besten mal den Trigger Code und stell sicher, dass der Trigger als BEFORE INSERT eingestellt und nicht deaktiviert ist.

[mrtwo12]

Moin,

ich meine, wenn mich meine grauen Zellen nicht trügen, es gibt ein Parameter unter Options->RequiredFields in der Table Komponente, die false sein soll.

War, bzw. ist es nicht so, dass der Fehler bei Feld notNull richtig ist wenn man nichts übergiebt, was ja hier richtig ist.

mfg
S.Simon

[brunoM]

Zitat von Neutral General:

Man muss bei den Komponenten nix einstellen.
Wenn Trigger und Generator korrekt sind reicht es einfach die ID nicht zu setzen und dann wird sie automatisch beim Insert generiert!

Zeig am besten mal den Trigger Code und stell sicher, dass der Trigger als BEFORE INSERT eingestellt und nicht deaktiviert ist.

Nachfolgend der Code der durch SQl-Manager generiert worden ist - und der auch intern im SQL-Manager funktioniert:

SET TERM ^ ;

CREATE TRIGGER BI_MDATEN_ID FOR MDATEN
ACTIVE BEFORE
INSERT
POSITION 0
AS
BEGIN
IF (NEW.ID IS NULL) THEN
NEW.ID = GEN_ID(MDATEN_ID_GEN, 1);
END^

SET TERM ; ^