SET TERM ^ ;  

CREATE OR ALTER PROCEDURE tmp_dsql  
as  
declare variable rin varchar(255);  
begin  
  for select 'SET STATISTICS INDEX ' || r.rdb$index_name || ';'  
      from rdb$indices r  
      into :rin  
  do execute statement rin;  
end  
^  

SET TERM ; ^  

commit work;  

execute procedure tmp_dsql;  

commit work;  

drop procedure tmp_dsql;  

commit work;