Editar e Insertar con un Dataset

[[coso]]

Otra cosa...¿el locate debe hacerse al campo bascula? ¿strPeso no lo usas? y...¿los strid que envias a la funcion son los correctos?

[[FGarcia]]

gracias nuevamente por el interes.

boreg: el nombre del campo es bascula, en la "tabla" que puse de ejemplo lo cambie por ID (un errorcillo), he realizado hasta 60 operaciones pero las cuentas no pasan de 1.
La tabla la vacio antes de cada prueba que he realizado por lo que empiezo desde 0 los valores de los campos ACCOperacion y GBLOperacion.

coso: probe tus modificaciones pero sigue haciendo lo mismo.

El campo bascula es un campo de tipo integer que solo va a poseer 4 valores (1,2,3,4) de ahi el ID.
Cada operacion realizada por esa bascula se va a contar y se colocara en dos campos ACCOperacion y GBLOperacion.
el campo strPeso es similar solo que el acumulara un float, actualmente no lo uso pues quiero primero definir lo del contador.

100% certificado que los datos que llegan son correctos.


p.d. Esto ya lo hice una vez con access, ahora que lo quiero colocar en firebird estoy mas perdido que un oso polar en el sahara.

[[coso]]

si bascula es de tipo integer no tendrias que hacer...
locate('bascula',strtoint(strid),[])? creo que si no lo que estas haciendo es comparar el valor numerico de la cadena '1'.

[boreg]

No se como funcionan los IBX pero, quizás no te está actualizando el valor de los campos con el POST prueba con un APPLYUPDATES y si usas algún componente de transaccion o estás abriendo una transaccion desde el componente de conexión (no se como se manejen las transacciones con IBX) haz, por lo menos, un commitretain.

Saludos

[[FGarcia]]

Pues no.

El CommitRetaining lo ejecuto despues del post en el evento afterpost del dataset.

Segun F1 :

function Locate(const KeyFields: string; const KeyValues: Variant; Options: TLocateOptions): Boolean;

por lo tanto no es necesario hacer el StrToInt(strID)

sniff, sniff, sniff ¡¡quiero a mi máma!!

[[coso]]

pero...pero...si pones el strId tal cual...te esta comparando el valor numerico de la cadena ...pruebalo, a ver q pasa...

('1' es 31,'12' es 63...etc)

[[FGarcia]]

pues no, ¡es exactamente el mismo resultado!

Te comento que he realizado el paso a paso y los resultados son congruentes con lo que espero (insercion y edicion), sin embargo al revisar la bd desde IBExpert estos no son reflejados, solo se realiza la insercion de los primeros 4 registros, la edicion posterior no. No he encontrado alguna referencia a algún proceso especial para el edit.

Nuevamente gracias por tu interes!

[[FGarcia]]

GRRRRRRRRRRRRRRR!!
¡¡¡ESTUPIDO, ESTUPIDO, ESTUPIDO!!!

Me fui un rato a leer este hilo y carajo se me quito el cortocircuito cerebral que traia (¿realmente se quito?). En el Dataset editor estaba declarada esta sentencia:

Código SQL [-]
update TOTALES
set
  BASCULA = :BASCULA
  ACCOPERACION = :ACCOPERACION,
  ACCTOTAL = :ACCTOTAL,
  GBLOPERACION = :GBLOPERACION,
  GBLTOTAL = :GBLTOTAL
where
  ID = :OLD_ID

y Modificaque a esto

Código SQL [-]
update TOTALES
set
  ACCOPERACION = :ACCOPERACION,
  ACCTOTAL = :ACCTOTAL,
  GBLOPERACION = :GBLOPERACION,
  GBLTOTAL = :GBLTOTAL
where
   BASCULA = :BASCULA

El campo ID es un consecutivo autogenerado por fb en realidad no me sirve para nada (lo mantengo para no tener que reestructurar la tabla por si las dudas mas adelante), Todo funcionando OK.

Gracias por la ayuda a todos los que se interesaron.