Ver Mensaje Individual
  #1  
Antiguo 15-04-2004
agova agova is offline
Miembro
 
Registrado: may 2003
Posts: 69
Reputación: 22
agova Va por buen camino
Angry campos calculados, hacen los que se les antoja¡¡¡

hola a todos
nesecito ayuda con los campos calculados, este es mi codigo:

procedure TFormInven.CInvenDiaCalcFields(DataSet: TDataSet);
begin
Inv:=Inv+CInvenDia.FieldByName('Venta').AsInteger+CInvenDia.FieldByName('Salidas').AsInteger+
CInvenDia.FieldByName('Entradas').AsInteger;
CInvenDia.FieldByName('Inventario').AsInteger:=Inv;
end;

donde la variable Inv es global de tipo longint, la primera vez lo calcula bien, el problema es cuando se llega al final o al inicio del dbgrid que es donde vuelve a calcular de nuevo la columna calculada Inventario y como inv ya no tiene el valor real calcula en base a otro numero, y esto no es todo la misma consulta la mando a un qreport y todoavia peor ya que aquí ni siquiera imprime los valores que estoy viendo en pantalla manda otros completamente distintos.

alguien podria decirme como hacerle para que no este recalculando los campos calculados cada que se le antoje, es decir, lo haga solo una vez, si no es posible como saber cuando se inicia el calculo para volver a iniciar el valor de inv.

NB. cabe mencionar que el valor de la variable inv es inicializado con el valor que me regresa otra consulta.

gracias por su atencon y se agradece cualquier sugerencia.
Responder Con Cita