Problem mit Generator

[IBExpert]

mal ganz doof gefragt:

warum machst du in deiner AddEntry Routine den extrem seltsamen Umweg über ein konstantes
Select Sql und überlässt dann den Dataset Komponenten da irgendwas mit Append zu machen?

Warum umständlich wenn man es auch einfach über einen Insert Befehl gehen würde ...

(und der könnte dann über returning auch den gerade generierten wert vom Generator
zurückmelden, so das du den auch in deinem Dataset zur weiteren Identifikation des
Datensatzes haben kannst.

[TurboMagic]

Zitat von IBExpert:

mal ganz doof gefragt:

warum machst du in deiner AddEntry Routine den extrem seltsamen Umweg über ein konstantes
Select Sql und überlässt dann den Dataset Komponenten da irgendwas mit Append zu machen?

Warum umständlich wenn man es auch einfach über einen Insert Befehl gehen würde ...

(und der könnte dann über returning auch den gerade generierten wert vom Generator
zurückmelden, so das du den auch in deinem Dataset zur weiteren Identifikation des
Datensatzes haben kannst.

Danke für den Hinweis. Ich glaube mich jedoch zu erinnern, dass ich diese Art der Umsetzung
auf Basis einer Forumsdiskussion hier gemacht habe. Das funktioniert ja auch grundsätzlich.
Nur irgendwie im Ablauf des Update Mechanismus scheint es ein Problem zu geben.

[Frickler]

Zitat von TurboMagic:

Ich glaube mich jedoch zu erinnern, dass ich diese Art der Umsetzung
auf Basis einer Forumsdiskussion hier gemacht habe.

"Diese Art der Umsetzung" wurde früher gerne verwendet, weil sie kompatibel ist zum "TTable"-Ansatz der BDE und damit zu Datenbanken wie Paradox oder dBase (navigierender Zugriff oder ISAM).

P.S.: ich meine, es gab eine Änderung bei FB4, was den Startwert eines Generators betrifft. Denn das Problem betrifft - wenn ich das richtig sehe - immer den letzten Datensatz. Setz doch probehalber den Startwert auf "Value + 1" und schau, was passiert.

[Delphi.Narium]

Oder statt Query.ExecSQL('ALTER SEQUENCE ' + GeneratorName + ' RESTART WITH ' + Value.ToString); für Value.ToString select Max(id) + 1 from tabelle nehmen.

Oder, da es ja bei diesem Update ein grundsätzliches Problem ist:
Value := 1 + GetCurrentGeneratorValue(FGeneratorReadQuery, Generator);
Oder hier einfach den nächsten Generatorwert auslesen, also sinngemäß:
Value := GEN_ID(GeneratorName, 1);

Das Problem scheint zu sein, dass in der "alten" Datenbank der Wert des Generators der zuletzt vergebene Wert zu sein scheint, während die "neue" Datenbank diesen Wert als den nächsten zu vergebenden Wert betrachtet. Beim ersten Lesen des Generatorwertes kracht es daher einmalig. Danach ist der Generatorwert dann "höher" als die letzte ID und somit ist der Fehler (unelegant) behoben.

Grob formuliert:

Alte Datenbank erhöht den Wert des Generators und gibt ihn dann aus.
Neue Datenbank gibt den Wert des Generators aus und erhöht ihn dann.

Daraus resultiert die einmalig "doppelte" Ausgabe eines Wertes, was dann nach einem einmaligen Fehler "korrigiert" erscheint.

[TurboMagic]

Hallo,

danke an alle für den Tipp mit Firebird 4.0.
Das hab' ich damals scheinbar in der Änderungshistorie überlesen.
Ich schaue mir diese und eure Lösungsvorschläge in der nächsten Programmiersitzung
für die betreffende Anwendung gleich an.

Grüße

TurboMagic

[TurboMagic]

Hallo,

ok, ich hab' jetzt schon die Stelle in den FB 4.0.4 relase notes gefunden.
Das Verhalten von Sequences wurde tatsächlich abgeändert.

Ich schau' mir jetzt an, wie ich damit umgehe.

Grüße
TurboMagic