generator richtig verwenden

[Hansa]

Bei mir gibts (zumindest vorerst) nur Generator + Trigger. 8) Alles andere wird unnötig zu kompliziert. @Lemmy: ich weiß von Deinen SPs, aber den Sinn sehe ich nicht recht ein. Die Tabelle wird angelegt und dann wird Generator/Trigger definiert im IBExpert und basta. Für jede Tabelle fast derselbe als BI-Trigger. Z.B. so :

SQL-Code:

/* Trigger: TABLE8_BI0 */
CREATE TRIGGER TABLE8_BI0 FOR TABLE8
ACTIVE BEFORE INSERT POSITION 0
AS
begin
  IF (NEW.ID IS NULL) THEN
    NEW.ID = GEN_ID (GEN_TABLE8_ID,1);
end
^

Die Spezialitäten bei FIBplus liegen eher im Mehrplatzbetrieb. Bei einigen Tabellen steht WhenGetID im DataSet auf OnNewRecord und der Generatorname ist angegeben, bei anderen nicht. Sieht fast so aus, als ob es egal wäre. Auf jeden Fall geht es momentan immer problemlos.

[DelphiDeveloper]

Zitat:

Die Lösung über einen Trigger finde ich nicht gut, denn Du kannst dann im Client nur auf Umwegen auf die ID des eben erzeugten Datensatzes zugreifen.

Das hat schon seine Daseinsberechtigung. Denke bspw. an Master/Detail Relationen

Szenario: Rechkopf + Rechpositionen

Rechpositionen brauchen ID vom Rechkopf. Wenn du den Rechkopf postest weist du aber nicht was dein trigger fuer ne ID vergeben hat. Und somit mußt du die ID des Rechkopfes erst ermitteln um sie anschschließend in den Rechpositionen einzutragen.

[Robert_G]

Gibt es in IB ein Äquvalent zu den Package-variablen in Oracle? Also eine Variable, deren Wert sich nur in der UGA befindet.
Keine Session kann den Wert einer anderen überschreiben.
Dadurch könnte man unabhängig von parallen Transaktionen anderer Sessions herausfinden, welche ID der neue DS hat.
Eine IMHO eklige Lösung, aber vielleicht funktioniert es. Wenn nicht, dann warte bis IB oder FB ein Gegenstück zu RETURNING hat.

SQL-Code:

CREATE TRIGGER TABLE8_BI0 FOR TABLE8
ACTIVE BEFORE INSERT POSITION 0
AS
begin
  IF (NEW.ID IS NULL) THEN
    NEW.ID = GEN_ID (GEN_TABLE8_ID,1);

  Shema.Package.Variable := New.ID;
end

OT:
@Hansa
Übrigens,du verhinderst nicht, dass der User beim Öffnen der Tabelle mit einem anderen Programm irgendeinen Mist reinschreibt.
Bei einem INSERT sollte also immer die PK aus der Sequence beschrieben werden:

SQL-Code:

CREATE TRIGGER TABLE8_BI0 FOR TABLE8
ACTIVE BEFORE INSERT POSITION 0
AS
begin
    NEW.ID = GEN_ID (GEN_TABLE8_ID,1);
end

[Hansa]

Für so was gibt es auch Before Update Trigger. Aber ich denke mal, zuerst soll hier das konkrete Problem gelöst werden.

[Lemmy]

Hi,

Zitat von Robert_G:

Aber wenn Lemmy sagt es gibt keine Returning Cluse in IB, dann gibt's die auch nicht.

hoffentlich habe ich auch nichts überlesen.... *ggg*

@hansa: Wie willst denn Du an die ID des eben gespeicherten Datensatzes kommen? Da gibt es imho nur 3 Möglichkeiten:

1. Über ne Eigenschaft der Komponente (GeneratorField,...)
2. Über ne Stored Procedure (eine die den Insert erledigt)
3. Direkte Abfrage des Generators

Andere Möglichkeiten gibts nicht! Nur bei bestimmten Tabellen wenn es noch weitere eindeutige Spalten in der Tabelle gibt, kannst Du nach dem Insert die ID mit ner Abfrage holen, aber wie oft kommt das vor?

@Robert: Was ist die UGA? Mir ist aber auch nichts bekannt, dass es "globale" Variablen gibt.

Grüße
Lemmy

[Hansa]

Zitat von Lemmy:

@hansa: Wie willst denn Du an die ID des eben gespeicherten Datensatzes kommen?

ich habe hier eine Tabelle mit 6000 Einträgen. Die habe ich gelöscht und sie dann wieder mit den 6000 Einträge neu gefüllt. Die IDs, die ich jetzt habe sind von 6001 bis 12000 Den Generatorwert habe ich in Ruhe gelassen. Die IDs kommen vom Trigger. Das Programm braucht ca. 1 Min. und die IDs sind durchnummeriert. Geht ohne Probleme. Was brauche ich denn sonst noch ?

[Robert_G]

UGA = User Global Area
SGA = Shared Global Area
Package variablen in Oracle legen ihre Werte in der UGA ab, also kann die Variable für jede Session einen anderen Wert haben.
Deshalb meine Frage, ob es ein Gegenstück davon in IB gibt.
@Hansa
Ein Trigger, der bei BEFORE UPDATE feuert, sollte eigentlich nur die :New.PK auf :Old.PK setzen.
Ein Trigger, der die PK erzeugt sollte immer eine PK aus der Sequence (Generator oder wie das auch immer in IB heißt ) ziehen. Nicht nur bei :New.PK is null .

[Lemmy]

Zitat von Hansa:

Geht ohne Probleme. Was brauche ich denn sonst noch ?

Bei Masseninserts ist das ja auch egal, was machst Du aber bei folgendem:

Du legst ne neue Adresse an. Diese wird in der DB gespeichert. Jetzt musst Du aber noch in weiteren Referenztabellen Einträge mit der ID der Adresse einfügen! Oder was machst Du, wenn der User den eben eingefügten Datensatz in der Detailansicht sehen will. Dazu brauchst Du immer die ID der eben eingefügten Daten.

Grüße
Lemmy

[Hansa]

Wenn das bei 100 Records pro Sek. funktioniert, ja Kruzifix, wo liegt denn da der Haken ? Ich habe jetzt folgendes gemacht : 1. neuen Artikel angelegt. 2. neue Warengruppe und diese gespeichert. 3. dem neuen Artikel diese Warengruppe (also die ID der Warengruppe) zugeordnet und gespeichert. Programm beendet und neu gestartet. Alles war wie gewollt. 8)