Hola amigos, tengo esta SP que es para cambiar la clave de un indice (no PK), la ejecuto desde el IBExpert y no chilla pero luego de darle commit me sale un error:
Código SQL
[-]
CREATE PROCEDURE FIX_PATCH_2
as
declare variable lsql varchar(500);
declare variable ltable_name varchar(25);
declare variable lindex_name varchar(25);
begin
for
select TABLE_NAME from TV_CALL_TABLES
where DIRECTION_TYPE = 'O'
into :ltable_name
do
begin
SELECT RDB$INDEX_NAME
FROM RDB$INDICES
WHERE (RDB$RELATION_NAME = :ltable_name)
AND (RDB$INDEX_ID > 1)
INTO :lindex_name;
execute statement 'DROP INDEX ' || :lindex_name;
execute statement 'CREATE INDEX ' || :lindex_name || ' ON ' || :ltable_name || ' (QUEUE_CALL,TIMESTAMP_CALL,RETRIES_CALL,SORT_ORDER,REC_ID)';
end
end
Este es el error:
Cita:
Unsuccessful execution caused by a system error that precludes
successful execution of subsequent statements.
internal gds software consistency check (cannot find record back version (291)).
|
Alguna ayudita por favor.
Gracias