Firebird SQL μετατροπή των πρωτεύων κλειδιών σε BIGINT

 

returns (constraint_name char(31),field_name char(31),table_name char(31))

declare cur cursor for

    rc.rdb$constraint_name  as constraint_name,

    rc.rdb$relation_name as table_name

    rdb$indices ix

    left join rdb$relation_constraints rc on rc.rdb$index_name = ix.rdb$index_name

    rc.rdb$constraint_type = 'PRIMARY KEY'

  open cur;

    fetch cur into constraint_name, field_name, table_name;

    EXECUTE statement 'ALTER TABLE "' || :table_name ||'" DROP CONSTRAINT "'||:constraint_name||'";';

    EXECUTE statement 'ALTER TABLE "' || :table_name ||'" ADD CONSTRAINT "'||:constraint_name||'" PRIMARY KEY ("'||:field_name||'");';

    if (row_count = 0) then leave;