Generatoren auf tabellenwert setzen

[Walter Landwehr]

Hallo, gibt es eine Möglichkeit alle Generatoren auf den Tabellenwert zu setzen. Hat jemand einen Lösungsvorschlag?

[mkinzler]

Was meinst Du mit Tabellenwert?

[Uwe Raabe]

So etwas wie DBCC CHECKIDENT <table> RESEED beim SQL Server?

[jobo]

vielleicht:
SET GENERATOR generator-name TO <new-value>

[Uwe Raabe]

oder

Code:

ALTER SEQUENCE <SequenceName> RESTART WITH <NewValue>;

[Delphi.Narium]

Für jede zu "verarbeitende" Tabelle / jeden Generator in einem Script eine Zeile dieser Art einbauen:

select 'SET GENERATOR GEN_Generatorname TO '||Max(Generatorspalte) + 1||'; commit;' as SQL from tabelle;

Das Ergebnis nehmen und ausführen.

Das kann man sicherlich auch in eine Prozedur packen und die dort erstellten SQLs dann per EXECUTE STATEMENT ausführen.

Sowas in der (ungetesteten) Art:

SQL-Code:

CREATE PROCEDURE PR_Generator_Update AS
declare v_SQL VarChar(4000);
begin
  select 'SET GENERATOR GEN_Generatorname_1 TO '||Max(Generatorspalte) + 1 from tabelle_1 into :v_SQL; 
  EXECUTE STATEMENT v_SQL;
  select 'SET GENERATOR GEN_Generatorname_2 TO '||Max(Generatorspalte) + 1 from tabelle_2 into :v_SQL;   
  EXECUTE STATEMENT v_SQL;
  ...
  commit;
end^

Aufrufen könnte man das dann mit

exceute procedure PR_Generator_Update;

Man muss dann halt die Prozedure pflegen und neue Tabellen hinzufügen bzw. alte entfernen.

[Walter Landwehr]

Danke für die schnellen antworten. Sorry der Tabellenwert ist die Generator ID.

[hoika]

Hallo,

Zitat:

Hallo, gibt es eine Möglichkeit alle Generatoren auf den Tabellenwert zu setzen. Hat jemand einen Lösungsvorschlag?

Ich habe es nicht verstanden.
Was konkret willst du machen.
Bitte mal ein kurzes Beispiel.

[Neumann]

Meine man kann den Generator nicht mit select from .. auf einen Wert setzen. Hat zumindest bei mir nicht funktioniert, vielleicht habe ich aber auch was falsch gemacht. Auch 'Set generator gen_xy to :p wollte er nicht machen.

Im Programm kann man aber folgendes machen:

Delphi-Quellcode:

  ibcsql.sql.add('set generator gen_xy to '+inttostr(neuwert);
  ibcsql.execute;

In der Art könnte man das auch als STP machen, lohnt den Aufwand aber nicht unbedingt. Es geht natürlich nur jeder Generator einzelnd, wüsste jetzt nicht wie man das anders lösen könnte.

[Blup]

Zitat von Neumann:

Meine man kann den Generator nicht mit select from .. auf einen Wert setzen.

Kann man schon, z.B. auf den Wert der aktuell größten ID einer Tabelle:

Code:

select  gen_id(g_xyz, (select max(id) from t_xyz) - gen_id(g_xyz, 0)) from rdb$database;