¡Hola Ángel!
Cuando tengas oportunidad, prueba el procedimiento almacenado de "afinación de índices" que te recomendé, bajo las mismas condiciones en que se encontraba tu base de datos.
Código Delphi
[-]
CREATE PROCEDURE SPACTUALIZARINDICES
AS
DECLARE VARIABLE NOMBRE VARCHAR(31);
Begin
For Select RDB$Index_Name From RDB$Indices Into :Nombre Do
Execute Statement 'Set Statistics Index ' || :Nombre;
End
Sospecho que eso hubiese ayudado en buena medida.
Saludos desde Zacatecas (camino a Chihuahua
).
Al.