ID nicht gefunden nach last_insert_rowid()

[nahpets]

Als erstes interessiert mich, was bei meinem Quelltext 2 Posts höher rauskommt.

Exception, weil Feld nicht gefunden (also der bekannte Fehler) oder wird der Fehlerdialog angezeigt?

Das AutoCommit := True müsste bedeuten, dass das qMain.ExecSQL in einer eigenen Transaktion ausgeführt wird. Das Lesen von LAST_INSERT_ROWID() erfolgt also nach einem Commit.

Wenn andere Komponenten nicht jeweils eine eigene Transaktion machen, könnte es sein, dass es für LAST_INSERT_ROWID() noch keinen Wert gibt, weil der (eventuell) erst nach Abschluss einer Transaktion zur Verfügung steht.
Da müsste man sich dann mal durch die Datenbankdokumentation durchwühlen.

TransactIsolationLevel gibt an, ob Daten anderer Transaktionen gelesen werden, ob nur die per Commit festgeschriebenen oder auch die, die noch nicht per Commit festgeschrieben wurden ...

[EdAdvokat]

Hallo Stephan, nach Einfügen deines Code kommt folgende Exception:

Zitat:

qMain: Das Feld 'ID' wurde nicht gefunden

Also die bekannte Meldung.
In den dbExpress-Komp. gibt es leider nicht die Einstellmöglichkeiten der Zeos-Komp.
Ich könnte auch das anze Prog. posten, denn es ist nicht groß und dient lediglich meiner Übung.

[EdAdvokat]

setze ich if qMain.RecordCount > 0 then begin aufRecordCount = 0 oder -1 kommt Dein geschriebener Meldungstext.
Der RecordCount sollte doch stets >0 sein. Also irgendwas hindert das Programm das Feld 'ID' zu finden. Mit Debugger das Prog. geprüft und genau an der Stelle currentID := qMain.FieldByName('ID').AsString; kommt die Exception. Es ist ja nicht weltbewegend und sicher könnte man damit leben, doch ich bin in der Lernphase und da interessiert mich so eine Kleinigkeit doch etwas, genau wie das Problem der einzelnen Darstellung des letzten veränderten Datensatzes ohne die vorhierigen Datensätze darzustellen nach Aufruf der Bearbeiten-Procedure.

[himitsu]

Weil das schon mehrmals gesagt, aber immer wieder übersehn wurde:

Zitat:

Delphi-Quellcode:

qMain.SQL.Text := 'SELECT LAST_INSERT_ROWID() AS ID FROM KONTAKTE';
qMain.Open;
if qMain.RecordCount > 0 then begin

SELECT LAST_INSERT_ROWID() AS ID ist eine globale Funktion
und SELECT LAST_INSERT_ROWID() AS ID FROM KONTAKTE würde den Wert mehrmals liefern, für jeden Datensatz in KONTAKTE.

[nahpets]

Warum gibt es denn dann bei Zeos keinen Fehler, ansonsten aber schon?

Es müsste doch bei 'SELECT LAST_INSERT_ROWID() AS ID FROM KONTAKTE' n Ergebniszeilen kommen, die alle den gleichen Inhalt haben. Mit dem Zugriff auf die erste Zeile und die Spalte ID müsste man doch trotzdem das richtige Ergebns bekommen (auch wenn dieses Vorgehen dann nicht so wirklich korrekt und sinnvoll wäre.)

[EdAdvokat]

verstehe ich himitsu richtig, dass die globale Funktion an dieser Stelle entbehrlich wäre und gestrichten werden sollte?
Nochmals habe ich das ganze im Prog. mit den Zeos-Komp. geprüft und da ist wirklich alles paletti. Der neue erstellte Datensatz wird sofort mit entsprechender ID! dargestellt und gespeichert, so wie ich es mir auch mit dem dbExpress-Komp-Prg. vorgestellt habe.
Im dbExpress-Prg. (mit auskommentierter Zeile!) wird nach Aufruf von übernehmen zwar der Datensatz angezeigt, jedoch ohne ID!. Erst nach Neustart des Programms ist der Datensatz dann mit entsprechender ID aufgeführt.
Es entsteht der Eindruck, dass im Prog. keine ID verarbeitet wird, aber die DB dann die ID vergibt, die dann nach Neustart des Programms exakt aufgeführt wird?!

[nahpets]

himitsu meint (zu recht), dass das SQL abgeändert werden muss:

Delphi-Quellcode:

qMain.SQL.Text := 'SELECT LAST_INSERT_ROWID()';
qMain.Open;
if qMain.RecordCount > 0 then begin

Die globale Funktion liefert die ID auch ohne Angabe einer Tabelle.

Das bei den dbExpress-Prg. genannte Verhalten ist eigentlich eher der Normalfall.

Nach einem Insert muss man den Datensatz lesen, um die dann aktuellen Werte zu erhalten. Das Programm kennt nur die Werte, die es selbst mit dem Insert in die Datenbank schreibt, es kennt aber nicht die Werte, die dann (auf welchem Weg auch immer) von der Datenbank vergeben werden.

Das Lesen geht auch ohne einen Programmneustart.
Man muss halt die Routine, mit der man die Daten beim Programmstart liest, erneut aufrufen oder eine andere Leseroutine implementieren.

[himitsu]

Zitat von EdAdvokat:

verstehe ich himitsu richtig, dass die globale Funktion an dieser Stelle entbehrlich wäre und gestrichten werden sollte?

Jupp, diese Funktion liefert die letzte ID, vom letzten INSERT, egal auf welche Tabelle.

Wenn du unbedingt willst, dann kannst du auch gern alle deine Tabellen miteinander JOINen und Millionen Datensätze abrufen, aber es ändert nichts daran, dass diese Funktion global ist und nicht an einer Tabelle hängt.
Es kommt immer das selbe Ergebnis raus ... nur halt mehrfach.

SQL-Code:

SELECT last_insert_rowid() AS ID FROM KONTAKTE JOIN SONSTWAS ON TRUE JOIN NOCHWAS ON TRUE JOIN ...;

SELECT current_user() AS ID FROM KONTAKTE JOIN SONSTWAS ON TRUE JOIN NOCHWAS ON TRUE JOIN ...;

SELECT date('now') AS ID FROM KONTAKTE JOIN SONSTWAS ON TRUE JOIN NOCHWAS ON TRUE JOIN ...;

Zitat:

SELECT * FROM KONTAKTE

Fragt natürlich sinnlos alle Felder der Tabelle ab, obwohl nur das ID-Feld verwendet wird.
SELECT ID FROM KONTAKTE
Aber hier kommen natürlich alle IDs an, und das auch noch in beliebiger Reihenfolge.
Dass zufällig die ID des ersten Datensatzes die richtige ID ist, ist eher unwahrscheinlich.
SELECT ID FROM KONTAKTE ORDER BY ID DESC
So wäre als erster Datensatz schonmal das Richtige, aber es werden natürlich immernoch sinnlos alle anderen Datensätze mit runtergeladen.
SELECT ID FROM KONTAKTE ORDER BY ID DESC LIMIT 1 -- oder SELECT FIRST 1 ID FROM KONTAKTE ORDER BY ID DESC ???

und das schon genannte MAX wäre auch ein guter Weg
SELECT MAX(ID) FROM KONTAKTE

Natürlich funktioniert das alles nur, wenn die IDs aufsteigend sind und es keine Lücken gibt, welche automatisch gefüllt werden,
also nur, wenn die letzte ID auch immer die Größte ist.