AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

LastRowID wie auslesen?

Ein Thema von AlexII · begonnen am 26. Aug 2014 · letzter Beitrag vom 1. Dez 2020
Antwort Antwort
UliTs

Registriert seit: 20. Mai 2020
Ort: 52074 Aachen
50 Beiträge
 
Delphi 10.4 Sydney
 
#1

AW: LastRowID wie auslesen?

  Alt 25. Nov 2020, 12:17
Ich habe ein ähnliches Problem, wenn ich mittels Insert / Post einen Datensatz anlege und RowId des neu angelegten Datensatzes bestimmen möchte:
Code:
FDQuery.Insert;
FDQuery.FieldByName( 'Name' ).value := 'Müller';
...
FDQuery.Post;

RowId := FDConnection.ExecSQLScalar( 'select top 1 LastRowId() LastRowId from Personen' );
Da kommt leider immer nur #0#0#0#0... heraus. Was mache ich falsch?
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.666 Beiträge
 
Delphi 12 Athens
 
#2

AW: LastRowID wie auslesen?

  Alt 25. Nov 2020, 12:20
Das sieht nach FireDAC aus, dann versuch mal:
FDConnection.GetLastAutoGenValue('');
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
UliTs

Registriert seit: 20. Mai 2020
Ort: 52074 Aachen
50 Beiträge
 
Delphi 10.4 Sydney
 
#3

AW: LastRowID wie auslesen?

  Alt 25. Nov 2020, 19:04
Klappt leider nicht . NULL ist der Rückgabewert.
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.666 Beiträge
 
Delphi 12 Athens
 
#4

AW: LastRowID wie auslesen?

  Alt 25. Nov 2020, 19:14
Hat denn die Tabelle einen Primärschlüssel, der automatisch hochgezählt wird?
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
UliTs

Registriert seit: 20. Mai 2020
Ort: 52074 Aachen
50 Beiträge
 
Delphi 10.4 Sydney
 
#5

AW: LastRowID wie auslesen?

  Alt 25. Nov 2020, 19:51
Nein, hat sie nicht. Das Problem ist, dass ich die Datenstruktur nicht so einfach ändern kann, da mit einem alten Programm noch mindestens 7 Monate (parallel über den Datenbankserver) darauf zugegriffen werden muß und das alte Programm äußerst empfindlich auf Änderungen in den Tabellen reagiert . Deshalb auch der Lösungsansatz über LastRowId() (es handelt sich um den Advantage DataBase Server).
Folgendes funktioniert:

Code:
cRowId := FDConnection.ExecSQLScalar(
'insert into TableName( Name ) values( ''Müller'' );'+
'select top 1 LastRowId() LastRowId from TableName' );
Nur ich brauche eine Lösung mittels FDQuery.Insert...FDQuery.Post und anschließend die RowId.
Vielleicht habe ich einen Fehler, wenn FDQuery.Post ausgeführt wird (da passiert noch einiges mehr) und dadurch die RowId nicht mehr verfügbar ist...
Mal sehen, was ich heute Nacht oder morgen noch hinbekomme .
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.880 Beiträge
 
Delphi 11 Alexandria
 
#6

AW: LastRowID wie auslesen?

  Alt 26. Nov 2020, 08:48
Zitat:
Das Problem ist, dass ich die Datenstruktur nicht so einfach ändern kann, da mit einem alten Programm noch mindestens 7 Monate (parallel über den Datenbankserver) darauf zugegriffen werden muß ...
Das sollte grundsätzlich kein Problem sein. Ein weiteres Feld als PK deklarieren und dieses automatisch beim Insert per autoinc oder durch einen Trigger füllen lassen. Das bekommt das Programm dann nicht mit.
Markus Kinzler
  Mit Zitat antworten Zitat
Benutzerbild von joachimd
joachimd

Registriert seit: 17. Feb 2005
Ort: Weitingen
685 Beiträge
 
Delphi 12 Athens
 
#7

AW: LastRowID wie auslesen?

  Alt 26. Nov 2020, 10:28
(es handelt sich um den Advantage DataBase Server)
Mönsch, sag das doch gleich ... oben steht SQLite!?
Code:
qu.sql.text := 'insert into TableName( Name ) values( ''Müller'' );'+
               'select LastRowId() from system.iota;';
qu.open;
lastid := qu.fields[0].asstring;
qu.close;
Joachim Dürr
Joachim Dürr Softwareengineering
http://www.jd-engineering.de
  Mit Zitat antworten Zitat
UliTs

Registriert seit: 20. Mai 2020
Ort: 52074 Aachen
50 Beiträge
 
Delphi 10.4 Sydney
 
#8

AW: LastRowID wie auslesen?

  Alt 29. Nov 2020, 22:01
(es handelt sich um den Advantage DataBase Server)
Mönsch, sag das doch gleich ...
Hallo Joachim,
Ja, aber Deine Lösung entspricht fast zu 100% der meinigen von Beitrag 20. Ich habe aber Firedac im Einsatz. Dabei benutze ich TDBNavigator in Verbindung mit TFDQuery und TDataSource zum Navigieren. Und wenn der User dabei auf speichern klickt, kann ich erst wieder beim afterPost-Ereignis eingreifen. Oder gibt es noch eine Lösung, wie ich z.B. die "Speicher-Query" anpassen kann?

Viele Grüße

Uli
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 09:14 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz