Update en Tablas Relacionadas

[[gluglu]]

Hola Amigos,

Tengo dos DBGrid's correctamente relacionados mediante un código común. Todo funciona correctamente hasta que modifico algún dato en el segundo DBGrid.

Me dá el error de "Update Failed".

Utilizo dos componentes IBDatabase, IBTransaction, IBQuery, IBUpdateSQL y también dos DataSource's.

Tengo claro que el error debe de estar en el comando SQL del segundo IBUpdateSQL pero no sé qué poner exactamente:

Código Delphi [-]
update "TABLA2"
set
"TABLA2"."CLAVE" = :"CLAVE",
"TABLA2"."CAMPO1" = :"CAMPO1",
"TABLA2"."CAMPO2" = :"CAMPO2"
where
"TABLA2"."CLAVE" = :"OLD_CLAVE"

El campo por el cual relaciono las dos Tablas (1 y 2) es CLAVE.

Debo de añadir que la Tabla2 está creada de la siguiente manera con InterBase

CREATE TABLE "TABLA2" 
(
  "CLAVE" "NV6",
  "CAMPO1" "CV40",
  "CAMPO2" "CV40"
);
ALTER TABLE "TABLA2" ADD FOREIGN KEY ("TABLA1") REFERENCES "TABLA1" ("CLAVE") ON UPDATE CASCADE ON DELETE CASCADE;

Al parecer si creo la base de datos sin la clave externa, no da problemas al hacer el Update en el segundo DBGrid.

Muchas Gracias por vuestra ayuda.

Un saludo a todos !