Interbase - exemplo de generator

// Seguem um exemplo de trigger usando generator:

CREATE GENERATOR GEN_PESSOAL;

SET TERM ^ ;

CREATE TRIGGER INS_PESSOAL FOR PESSOAL

ACTIVE BEFORE INSERT POSITION 0

as

begin

  NEW.CODIGO = gen_id(GEN_PESSOAL, 1);

end

^

COMMIT WORK ^

SET TERM ;^

COMMIT WORK;

SET AUTODDL OFF;

SET TERM ^ ;