FIREBIRD PT

SET GENERATOR <NOME_DO_GENERATOR> TO <VALOR>

Não existe nenhum comando DROP GENERATOR… no InterBase/Firebird. A única possibilidade é eliminar a definição do generator da tabela de sistema:

   DELETE FROM RDB$GENERATORS
WHERE RDB$GENERATOR_NAME=’MYGEN’;

Mas este método tem algumas DESVANTAGENS:

#InterBase não verifica as dependências, o que significa que permite eliminar o Generator mesmo este estando a ser utilizado por um Trigger ou Stored Procedure.

Felizmente, basta voltar a criar o generator em falta (e definir o valor inicial para remediar o problema).
#Cada Generator consiste de duas partes:
- registo na tabela RDB$GENERATORS
- a variavel/contador em si, que é armazenado numa página especial da Base de Dados

o Campo RDB$GENERATOR_ID na Tabela RDB$GENERATORS é de factoo indice para o array de generatorsna pagina de generators.

Quando eliminamos um generator da tabela de sistema, o espaço que lhe é atribuido na página de generators(e o generator_ID) continuam não usados.

O que significa que o recem criado generator terá sempre um novo valor para rdb$generator_id em vez de reutilizar o existente.

Resumindo, eliminar o Generator vale a pena apenas se pretendermos fazer o Backup/restore da base de dado, ou se pretendermos acabar com o generator e não voltar a criar um novo.

No caso precisar de um Generator com um nome diferente , basta renomear um antigo, não utilizado:

   UPDATE RDB$GENERATORS
SET RDB$GENERATOR_NAME=’NEW_GEN’
WHERE RDB$GENERATOR_NAME=’OLD_GEN’;

Of course InterBase has command CREATE GENERATOR, but because it is DDL command, you can’t use it in stored procedure. But thanks to system of active tables, you can create generator by inserting it’s name directly into system table:

INSERT INTO RDB$GENERATORS (RDB$GENERATOR_NAME)
VALUES (UPPER('MYGEN'));

The new generator is available immediately, even before commit (but if you rollback, the generator-name/generator-id will be lost). Do not forget that most IB versions have bug that prevents you from creating and using too many generators.

Porque o comando SET GENERATOR … TO …; não é suportado dentro de Stored Procedures, a unica maneira é ler o valor actual na chamanda GEN_ID e usá-lo para ajustar o valor por outro.(mas cuidadoem ambientes multiulitizador porque estas duas chamadas GEN_ID não é garantido que serão executadas numa unica atomica operação!)

CREATE PROCEDURE SetGen (val INTEGER) AS
BEGIN
val = GEN_ID (MyGen, val – GEN_ID (MyGen,0) );
END

Many people use 1-row table (rdb$database) to retrieve generator’s value in SP

SELECT GEN_ID(g,1) FROM rdb$database INTO  ;

While using rdb$database table can be useful if client program needs to read generator (because you can’t “execute” standalone GEN_ID() expression from client), it is absolutely unnecessary in stored procedure. Expressions can be assigned to SP variables/parameters directly by assignment statement. E.g. procedure to retrieve next value from generator can look like:

CREATE PROCEDURE ReadGen RETURNS (ret INTEGER) AS
BEGIN
ret = GEN_ID(MyGen, 1);
END;