Indizes einer Datenbank neu aufbereiten

[IBExpert]

geht übrigens bei fb >=15 direkt als prozedur

SQL-Code:

CREATE PROCEDURE REINDEX
AS
declare variable SQL VARCHAR(200);
BEGIN
  FOR
    select rdb$index_name from rdb$indices
    INTO :SQL
  DO
  BEGIN
    SQL='SET STATISTICS INDEX '||SQL||';';
    execute statement :sql;
  END
END

[edit=Matze]SQL-Tags gesetzt. Mfg, Matze[/edit]