Maestro/Detalle - Forma correcta de dar Alta un registro
 

Saludos Amigos. Necesito definir de una buena vez la forma correcta de trabajar ante una tabla maestro/detalle y la correspondiente alta de un registro.

Estoy haciendo una aplicación para un comedor, que da de alta una venta, y en ella el detalle de lo consumido en la misma. Por lo que las tablas serían.

-Ventas
ID_VENTA(Autonumérico)
FECHA
MOZO
TOTAL

-DetalleVenta
ID_DETALLE(Autonumérico)
PRODUCTO
PRECIO
ID_VENTA

Relaciono las tablas con la clave foránea y luego en mi programa, como es la forma correcta de hacerlo para evitar el error de clave foránea al dar de alta un registro detalle sin aún tener el registro maestro?

Hé leído que muchos hacen:

Código Delphi [-]
tblMaestro.Insert;
tblMaestro.Commit;
tblMaestro.Open;
tblMaestro.Last;

luego...para alta de detalles

Código Delphi [-]
tblDetalle.Insert;
tblDetalleID_VENTA.value := tblMaestroID_VENTA.value;
tblDetallePRODUCTO.value := x;
tblDetallePRECIO.value := y;
tblDetalle.Post;

y edito el registro maestro, calculando el total sumando los precios de los detalles

Código Delphi [-]
tblMaestro.Edit;
tblMaestroFECHA.value := Date;
tblMaestroMOZO.value := 'Pepe';
tblMaestroTOTAL.value := (Suma de los precios de los detalles);
tblMaestro.Post;
tblMaestro.Commit;

De esta forma se respeta la integridad de la base de datos y se logra el cometido. SIN EMBARGO, me resulta algo incómodo, o mejor dicho, siento que no es esta la manera correcta de trabajar. A esto hay que sumarle, que si mientas se estan cargando los detalles, el usuario cancela la venta, hay que eliminar el registro de la tabla maestra, commiteado anteriormente.

Trabajo en Delphi XE3 con tablas IBX, y mi BD es Firebird 2.5.

Espero haber sido claro, necesito de una buena vez aclararme esto.

Mil gracias a los que se tomaron el trabajo de leer todo. Espero me puedan ayudar. Saludos!

Hola pape19.

Con los componentes IBX, otra opción es usar CachedUpdates, revisa estos enlaces:

• Problemas inserción de registros en IBDataset maestro-detalle y Foreign Key
• Obtener un nuevo ID antes de cargar sus respectivos datos

Saludos :)

Ecfisa, muchas gracias por responder.

Estos hilos los había visto, antes de subir mi pregunta, junto con otros tantos. Y aún así no lograba dar con una forma de hacerlo que me resulte eficiente.

Lo del cacheupdates en true, no termino de entender como trabaja internamente, estaba buscando una forma alternativa, de manera de no tener que hacer 2 commit de un mismo IBTransaction para el alta(Commit en maestro, con solo el ID, y commit posterior para grabar los detalles; para luego editar el registro maestro).

Si no existe otra opción, tendré que inclinarme por la forma comentada, que no me convence sobre todo porque con un rollback en el proceso de carga, no elimino el registro maestro commiteado primeramente. Lo que quería lograr es grabar registro maestro y detalles con un solo commit, evitando el problema de clave foránea.

Al asunto se me suma otro problema sobre la marcha.

Como dije, doy alta en tabla maestro, hago un commit y se me genera el registro en bd con el id autonumerico. El mismo que posteriormente le asigno a cada alta en detalle.

El problema que me surge ahora es el siguiente...

Doy de alta un detalle, hago un post, y al dar de alta el segundo, me da error de clave primaria. Yo suponía, que al ser un Id autonumérico el de la tabla detalle, podía dar de alta los registros que quería, y luego con el commit, se generaban automaticamente los diferentes Id de los detalles, superando el problema de violación de clave primaria.

Como evito esto? La solución que se me ocurre es hacer un commit por cada detalle cargado, pero esto no creo que sea lo mejor. Necesito ayudaaaa! :eek:

Hola

Puedes asignar el mismo objeto de transaccion tanto al encabezado como a los detalles. A mi me funciona asi.

Saludos

Caminante...yo tambien tengo el mismo objeto transaction asociado a ambas tablas. Pero no puedo resolver un alta en maestro y los respectivos detalles con un solo commit sin sufrir errores. Podrias darme un ejemplo para ver como lo haces funcionar?

Bueno asi de memoria nomas :D

Para el problema de las claves primarias basta con utilizar la propiedad generatorfield del ibdataset.
Antes de ingresar algun registro en el detalle (creo q en el evento afterinsert) hago:

Código Delphi [-]
ibencabezado.CheckBrowseMode;
ibencabezado.edit

Asi se asigna el valor del generador a la clave primaria

y en el evento beforepost de la tabla detalle hago:

Código Delphi [-]
if ibdetalle.fieldbyname('referencia').isnull then
ibdetalle.fieldbyname('referencia').asinteger:=ibencabezado.fieldbyname('claveprimaria').asinteger;

y al guardar solo hago

Código Delphi [-]
ibencabezado.CheckBrowseMode;
ibdetalle.CheckBrowseMode;
ibtransaccion1.CommitRetaining;

Bueno creo q mas o menos asi. Tu disculparas si es q hay algo q no es. Es q no tengo delphi a mano en este momento.

Saludos

Gracias Caminante...pero los componentes que utiliza mi programa son IBTable.

Por el momento no encuentro solución. Lo que haré será quitar el campo ID_DETALLE como autonumérico, de manera de poder manejar yo el ID, y no esperar al commit de cada carga de un detalle, para que el registro reciba el ID autonumérico correspondiente.

Y sobre lo primero, más que commitear un reg maestro solo con el ID y luego de cargar el detalle, editarlo y re-guardarlo, no encuentro.