Nuevamente solicitando ayuda con esto de los IBX y FB 2.0 D7.
tengo este codigo:
Código Delphi
[-]
procedure TdmDatos.ActualizaTotales(strID, strPeso: string);
begin
with dstTotales do
begin
if Locate('Bascula',strID,[loCaseInsensitive]) then
begin
showmessage('SI existe'); ciclo
accCuenta := dstTotalesACCOPERACION.Value;
gblCuenta := dstTotalesGBLOPERACION.Value ;
Edit;
end
else
showmessage('NO existe'); begin
Append;
accCuenta := 0;
gblCuenta := 0;
dstTotalesBASCULA.Value := StrToInt(strID);
end;
Inc(accCuenta);
Inc(gblCuenta);
dstTotalesACCOPERACION.Value := accCuenta;
dstTotalesGBLOPERACION.Value := gblCuenta;
dstTotales.Post;
end;
end;
y espero obtener esto
Cita:
//Espero obtener algo asi (DESPUES DE VARIAS OPERACIONES):
ID |ACCOPERACION |GBLOPERACION
1 | 20 | 20
2 | 20 | 20
3 | 20 | 20
4 | 20 | 20
//Sin embargo obtengo esto
ID |ACCOPERACION |GBLOPERACION
1 | 1 | 1
2 | 1 | 1
3 | 1 | 1
4 | 1 | 1
1 | 1 | 1
2 | 1 | 1
3 | 1 | 1
4 | 1 | 1
1 | 1 | 1
2 | 1 | 1
3 | 1 | 1
4 | 1 | 1
1 | 1 | 1
2 | 1 | 1
3 | 1 | 1
4 | 1 | 1
|
¿Cual es mi error? ¿el dataset no es apropiado para esto? ya probe con un IBQuery y me devuelve los mismos resultados. Se agradece su ayuda y sugerencias.