Componente para actualizar datos de un query...

[Neftali [Germán.Estévez]]

Empezado por tgsistemas

Ahora viene el tema de la actualización en la bbdd

Hay alguna forma de saber los registros que se han modificado para así sólo actualizar éstos o se ha de hacer update de todos los registros iniciales ?? Es decir, si la qry devolvió 10 registros y se han modificado (en TClientDataSet) sólo 2... se ha de hacer update de los 10 o se puede hacer sólo de los 2??

Existe algo del tipo for update o inserted y/o deleted como en sql ??

No hace falta hacerlo todo.
Podrías hacerlo manualmente, marcando tú los registros que se han modificado. Por ejemplo, si utilizas un campo de interno de Modificado y cada vez que guardas un registro lo activas a True, al final basta recorrer y sólo generar las SQL (upates) para aquellos que se han modificado.

De todas formas, TClientDataset ya posee propiedades para controlar esto.
Revisa en la ayuda la propiedad ChangeCount, Delta, ChangeLog,...

[tgsistemas]

Neftali,

perdona pero he leido las propiedades que comentas y algunos hilos del foro sobre TClientDataSet y he estado haciendo algunas pruebas, todas con resultado nefasto

En un button he puesto el siguiente código :

if (cdsPARTESDATOS.ChangeCount > 0) then
cdsPARTESDATOS.ApplyUpdates(-1);

según he leído el propio ClientDataSet hace la actualización en la tabla que corresponda, cosa que me sorprende bastante !!!

El resultado que obtengo es un error no es posible encontrar el registro, no se especificó ninguna clave así que en el provider he puesto la propiedad updatemode=upWhereKeyOnly pero no tengo claro dónde especificar los campos que forman la clave para actualizar la tabla detalle que es la única que se actualizará.

Gracias por la paciencia....

[Neftali [Germán.Estévez]]

Empezado por tgsistemas

...según he leído el propio ClientDataSet hace la actualización en la tabla que corresponda, cosa que me sorprende bastante !!!

Hola.
Que no te resulte extraño, así es como funciona el TClientDataset (es que en muy bueno).

Si has accedido a una tabla, él sólo, es capaz cuando tú se lo digas (ApplyUpdates) de volcar todos los cambios (Updates/Insert/Delete) a la tabla de Base de Datos.
El problema es que en tu caso, los datos no provienen de una tabla, sino de una consulta con JOIN's, de ahí que no se puedan realizar las actualizaciones de forma auomática y seguramente debas acabar haciéndolas de forma manual.

Mi idea, es que puedas aprovechar (si es posible) la información que guarda TClientDataset para saber qué registros se han modificado y así saber cueles debes actualizar (esto es una idea, ya que nunca he probado a acceder a esa información).

Si no es posible, puedes utilizar el método "manual" (campo Modificado) que he comentado antes.

Un saludo.

[tgsistemas]

Neftali,

y si hiciera la consulta original de este modo ??

select PL.CDGOPARTE, PL.CDGOLIN, PL.TPLGIA, PL.H1_E, PL.H1_S, PL.H2_E, PL.H2_S, PL.HT,
PL.PRODUC, PL.CNTCTOS, PL.VENTAS,
P.CDGO, P.NMROORDEN, P.CDGOTOP, P.FECHA, T.NMBRECMPLTO, P.ACTIVO

from tblcbcra p, tbldetalle pl, trbjdres t

WHERE (
(pl.cdgoparte = p.cdgo) AND
(t.cdgo = p.cdgotop) AND
(P.NMROORDEN = XXXXXXX AND P.FECHA = '14/10/2009')
)
order by T.NMBRECMPLTO

de este modo no hay ningún join por el medio y podría definir la clave principal de la tabla tbldetalle para hacer el update automáticamente ??

[Neftali [Germán.Estévez]]

Creo que no va a funcionar Toni. N es una Join, pero es un producto cartesiano.
El problema no está en la JOIN es si, sino en mezclar datos de diferentes tablas en un DataSet.

[tgsistemas]

He buscado información al respecto, he visto varios casos de qry de más de una tabla
Por lo que he entendido, el update resultante se gestiona en función de algunas propiedades de los campos en el DataSet original mediante banderas que se parametrizan en ProviderFlags.
Los campos que se actualizarán con la propiedad pfInUpdate, los campos implicados en el where con la propiedad pfInWhere y los de clave principal con pfInKey.

Siguiendo esas premisas he parametrizados todos los campos y me gustaría saber si conoces algún método para que pueda ver la sentencia sql del update resultante.

En la qry original he identificado todos los campos con su nombre correcto de tabla, sin utilizar alias para intentar evitar problemas de identificación de éstos.

El error que produce ahora al realizar el ApplyUpdates es El nombre de la columna CDGOPARTE no es válido y El nombre de la columna CDGOLIN no es válido, ambos campos son la clave principal de la tabla tbldetalle que és la que se debe actualizar.

Es posible que el problema venga por tratarse de tablas Maestro/Detalle ??

Muchas gracias por la ayuda

[Neftali [Germán.Estévez]]

Empezado por tgsistemas

...y me gustaría saber si conoces algún método para que pueda ver la sentencia sql del update resultante.

Lo siento Toni.
Nunca he llegado a este punto y creo que no debes intentar actualizar con el ApplyUpdates.

Por internet he encontrado esto, que viene a ser más o menos lo que tiene más lógica:

ApplyUpdates cannot handle updates to a join. You need to create a
BeforeUpdateRecord event handler for the DSP and create and execute the
UPDATE statements for each table.