Fórum Trigger ??? #206306

Olá!!!

No Interbase OpenSource tenho o seguinte scrip SQL:

/* Criação da tabela de Categorias */

CREATE TABLE ´CATEGORIA´
(
´CODCATEGORIA´INTEGER NOT NULL,
´CATEGORIA´VARCHAR(50) NOT NULL,
PRIMARY KEY (´CODCATEGORIA´)


/* Indice */

CREATE INDEX ´INDCATEG´ ON ´CATEGORIA´(´CATEGORIA´);


/* Generator */

CREATE GENERATOR ´CODCATEG_GEN´;


/* Triggers */

SET TERM ^ ;

CREATE TRIGGER ´AUTO_NUM_CATEG´ FOR ´CATEGORIA´ ACTIVE BEFORE INSERT POSITION 0 AS
BEGIN
NEW.CODCATEGORIA=GEN_ID(CODCATEG_GEN, 1);
END
^
COMMIT WORK ^
SET TERM ;^

No Delphi tenho:

procedure TfrmCateg.btnGravarClick(Sender: TObject);
begin
if DataModule.ClientDataSet.State in [dsInsert] then
begin
DataModule.ClientDataSet.ApplyUpdates(-1);
end;
end;

Qundo clico no botão para gravar o registro é exibida a seguinte mensagem:

Field ´CODCATEGORIA´ must have a value.


Se eu criei o generator e a trigger, pq aparece essa mensagem ??? Usei as mesmas inrtruções em outras tabelas do meu projeto e esse erro não acontece !!!

Provavelmente o erro está na minha cara e eu não estou vendo.

Onde está o erro ???


Agradeço a ajuda te todos