validation error

:D Uso o Delphi 5 e componentes IBX atualizados. Quero transportar os dados de uma tabela paradox para uma Firebird 1.5. Estou utilizando os seguintes componentes:

TIBDatabase
TIBTransaction
TIBDataSet (QTitulos)
TQuery (para a tabela paradox TEnt_Chi))

Uso o seguinte código:
QTitulos.append;
QTitulosNOME_NOTA.value:=TEnt_ChiNOME.value;
QTitulosNOME_CAPA.value:=TEnt_ChiNOME.value;
QTitulosCOD_BARRA.value:=TEnt_ChiCODIGO_BARRA.value;
QTitulos.post;
:? Ela me retorna o seguinte erro:

[color=red:2d2188f2d6][/color:2d2188f2d6]validation error for column COD_TITULO, value ´***null***´
[color=darkred:2d2188f2d6][/color:2d2188f2d6] usei a receita do afarias para a conexão. O campo COD_TITULO é autoincremento. Para ele usei Required=false e utilizei a propriedade GeneratorField com ApplyEvent em ´OnPost´.

A tabela Titulos construi com o ibExpert
SET SQL DIALECT 3;
SET NAMES ISO8859_1;
CREATE TABLE TITULOS (
COD_TITULO INTEGER NOT NULL,
NOME_NOTA VARCHAR(80) NOT NULL,
NOME_CAPA VARCHAR(80) NOT NULL,
COD_BARRA VARCHAR(13)
);

ALTER TABLE TITULOS ADD CONSTRAINT PK_TITULOS PRIMARY KEY (COD_TITULO);

No evento afterpost uso
QTitulos.ApplyUpdates;

O que estou fazendo de errado? :oops: