Einzelnen Beitrag anzeigen

Hansa

Registriert seit: 9. Jun 2002
Ort: Saarland
7.554 Beiträge
 
Delphi 8 Professional
 
#7

Re: Generatorwert setzen

  Alt 2. Dez 2004, 12:13
Der Tip mit Gen (..,0); ist gut. Werde ich mir merken. Das Problem ist nur : ich habe keinen alten Generator, sondern nur die alten IDs. Die höchste ID ermittele ich aus den alten Daten einfach so :

Delphi-Quellcode:
if ID > maxID then
  maxID := ID;
Somit habe ich am Ende die höchste alte ID in maxID.

Nur das hier geht so nicht :

Delphi-Quellcode:
DS.Close;
DS.SelectSQL.Text := 'SET GENERATOR GEN_TABLE8_ID TO '+IntToStr (MaxID+1);
DS.Open;
DataBase.Commit;
Ich wollte einfach ein Dataset dazu verwenden, den Befehl abzusetzen. Jetzt kommt keine Fehlermeldung. Im SQL-Monitor siegt es so aus :

Zitat von SQL-Monitor:
[Application: konv]
WgDS: [Execute] SET GENERATOR GEN_TABLE8_ID TO 135

Execute tick count 0

[Application: konv]
ReadTransaction: [Commit (Hard commit)](1495)
Der einzige Haken an der Sache ist nur : es geht nicht, Generator bleibt bei 0 stehen.

P.S. : Ich sehe gerade die Zahl hinter dem Commit. Was besagt die ? Im Moment habe ich auch manchmal 1513.
Gruß
Hansa
  Mit Zitat antworten Zitat