Error Foreyng key en Master-Detail

[[egostar]]

Una pregunta, en el archivo MASTER ¿ya tienes datos?

Por lo poco que he visto si no exiten datos en MASTER te puede enviar un error porque no encuentra la referencia al momento de grabar datos en LINEAS.

Salud OS.

[morta71]

MASTER viene a ser por ejemplo la tabla FACTURAS, con sus respectivas líneas.

Con Paradox, puedo generar en el mismo formulario tanto la cabecera de MASTER (o Facturas si preferis), e ir añadiendo registros en LINEAS, todo ello con CachedUpdated activado. Al hacer un Post con Paradox funciona sin ninguna queja ... pero con Firebird no es lo mismo.

Os adjunto los fuentes, está realizado en Delphi 5 profesional.

Gracias

[[Héctor Randolph]]

Hola morta71!

Si estás utilizando una transacción con Interbase, supongo que no será necesario por lo pronto usar actualizaciones en Caché.

Olvidando un poco ese detalle, ¿quién te garantiza que dentro de la transacción actual, se guardan primero los cambios en la tabla maestro y después los cambios en la tabla detalle?.

Por ejemplo, si la tabla maestro estuviera dentro de su propia transacción y la tabla detalle en otra, tu podrías determinar el orden en el cuál se aplican los cambios usando primero Commit en el maestro y después en el detalle. Es probable que de la manera que lo haces actualmente primero se intentar guardar los registros del detalle y no encuentra el registro del maestro simplemente porqué aún no han sido guardados.

Saludos

[morta71]

Hola Héctor, lo que me comentas tiene sentido, pero yo lo que quiero es que se grabe todo en una misma transacción. Es decir, que si falla al grabar en LINEAS no se actualice MASTER.

Sinembargo, lo que me comentas puedo probrarlo. Sería algo así como realizar una transacción dentro de otra, es decir Transaccion1 que englobaría a MASTER y LINEAS, y Tansaccion2 que se refiere sólo a la tabla MASTER.

De ésta manera realizo primero un Commit en Transaccion2 y después el Commit en Transaccion1. Si en Transaccion1 hay algun fallo, supongo que en el Rollback deshace también Transaccion1???????

Lo probaré a ver que sucede.

Gracias

[[gluglu]]

Yo no veo el sentido de utilizar dos transacciones diferentes. Como bien dice morta71, si no se graban LINEAS, para qué actualizar MASTER.

A mi me funciona sin problema, al menos en INTERBASE. Lo que si hay asegurarse en cualquier caso es que hagas un POST de MASTER antes de insertar una nueva línea en LINEAS.

Lo que comentas acerca de desasignar el DataSource antes del Post, yo no lo hago nunca, y no tengo problemas.

[[gluglu]]

He revisado tu código que adjuntas.

En :

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  DataModule2.Master.Append;
end;

lo que estás haciendo es un Append, y junto con el Generador que tienes puesto estás incremento ese generador en 1. Pero no estás realizando el POST correspondiente, que es la razón principal del error que te está dando.

Al pulsar el Button3 y ejecutar :

Código Delphi [-]
procedure TDataModule2.MasterAfterPost(DataSet: TDataSet);
begin
  Lineas.Post;

  IBDatabase.ApplyUpdates([Master, Lineas]);
  IBTransaction.CommitRetaining;

  Lineas.DataSource := dsMaster;
end;

me dá error en la primera línea ya que Lineas no está en Modo Edit y por lo tanto no se puede realizar un Post de Líneas.

O eso es al menos lo que me parece a mi.

La cuestión es que te has liado mucho en tu código cuando es más fácil de lo que te imaginas.

Haciendo algunos cambios en tu código como eliminar todo el código de MasterAfterPost a mi me funciona, aunque mi manera de programar será difente a la tuya.

Todo el error del Foreign Key viene porque te tienes que ASEGURAR que antes de que ejecutes el Post de la tabla LINEAS, tiene que estar hecho el POST de MASTER.

Espero haberte ayudado un poco.

[morta71]

Gracias por vuestras respuestas, pero en cada prueba obtengo el mismo error .

Si hago lo que me indicas, gluglu, no da error porque no hago el Post en Lineas, pero en cuanto intento actualizar Lineas ... zas el error.

Si te funciona, te importa, por favor, enviarme el ejemplo corregido (mi e-mail es [email protected])

Gracias