pegar valor de um generator...

Delphi

08/04/2005

Tenho um tabela no firebird ´Clientes´ onde a mesma tem um campo de chave primária ´Codigo´. Criei um Generator e uma Trigger para usar o campo ´Codigo´ como auto-incremento no evento Before Insert.

Na aplicação dou o comando tipo: tabela.insert

gostaria de saber como obter o valor do generator após esse comando e o disparar da trigger.

Eis o generator e a trigger, estou os componentes da paleta IBX Delphi 7.

CREATE GENERATOR ´GEN_CLIENTE´;

CREATE TRIGGER ´TRIG_CLIENTES_1´ FOR ´CLIENTES´
ACTIVE BEFORE INSERT POSITION 0
as
/* code here */
BEGIN
IF (NEW.Codigo IS NULL) THEN
NEW.Codigo = GEN_ID(GEN_CLIENTE, 1);
END


Thiagopedro

Thiagopedro

Curtidas 0

Respostas

Sremulador

Sremulador

08/04/2005

valor do proximo gerador
select gen_id(nome_generator, 1) from rdb$database

do gerador atual
select gen_id(nome_generator, 0) from rdb$database


GOSTEI 0
POSTAR