seleccionar y modificar fila por fila enMYSQL

[[Caral]]

Hola
Perdon pero no entiendo muy bien.
Sigues diciendo que quieres modificar TODOS los campos que cumplan un CONDICION, pero sin poner la condicion??.
Pues si no te explicas un poco mejor no lo entiendo.
Saludos

[schaka]

ok , disculpa si te he confundido, la condicion a la que me referia es independiente l de la consulta,por ejemplo, un reajuste de costos de acuerdo a una fecha,aqui la condicion es la fecha y no esta relacionado con la consulta.
el reajuste de costos es para todo lo que tenga en mi tabla de compras , por eso necesito seleccionar y procesar cada una de mis filas de la tabla para asignar un nuevo costo, y lo hago mediante

Código Delphi [-]
Zcompras.SQL.Add('SELECT Cantidad, CostoF, Subtotal, CostoAc FROM compras ');
  Zcompras.open;

En esa consulta no tengo condicion ,se supone debe seleccionarme los campos para cada fila, pero solo lo hace de la primera ..

Tengo estas asignaciones

Código Delphi [-]
 cantidad:=  Zcompras.Fields[0].AsInteger;
  Precio:= Zcompras.Fields[1].AsFloat;
  sub:= Zcompras.Fields[2].AsFloat;
  anterior:= Zcompras.Fields[3].AsFloat;

Zcompras.Fields[0] contiene el primer campo "Cantidad" que seleccione de la consulta,
pero solo de la primera fila.. tenia pensado que Zcompras.Fields[4] contendria el campo "Cantidad " de la segunda fila ,pero no es asi, no contiene nada y me marca error.

No se de que manera puedo recorrer mi tabla para poder modificar los campos que deseo, Muchisimas gracias , y una disculpa por no ser tan claro en el hilo anterior

[[Caral]]

Hola
Hagamos una prueba, solo para ver si puedes recorrer la tabla.
Coloca un dbnavigator en el form y lo enlazas a un datasource que este ligado al query Zcompras.
Veamos si el navigator muestra los campos.
Me cuentas.
Saludos

[*Caro*]

Hola schaka, para recorrer el resultado que te ha dado tu consulta debes hacerlo asi:

Código Delphi [-]
 Zcompras.sql.Clear;
 Zcompras.Close;
 Zcompras.SQL.Add('SELECT Cantidad, CostoF, Subtotal, CostoAc FROM compras ');
 Zcompras.open;

 Zcompras.First;//Te posicionas en el primer registro
 While Not(Zcompras.Eof) do //Recorres mientras no termine de leer todos los registros de la consulta
  begin
   cantidad:=  Zcompras.Fields[0].AsInteger;
   Precio:= Zcompras.Fields[1].AsFloat;
   sub:= Zcompras.Fields[2].AsFloat;
   anterior:= Zcompras.Fields[3].AsFloat;
   
   //Haces las operaciones que tienes que hacer

   Zcompras.Next;//Pasas al siguiente registro
  end;

Saluditos

[schaka]

Hola que tal, gracias por tu respuesta, la he probado, pero ahora tengo un error, al tratar de ejecutarlo de esa manera, el error es el siguiente:

Cannot perform this operation on a closet dataset.

ya revise mi datasource y mi zquery , y estan correctas, les mostrare mi metodo completo , espero me puedan ayudar, gracias.

Código Delphi [-]
Zcompras.sql.Clear;
  Zcompras.Close;
  Zcompras.SQL.Add('SELECT Cantidad, CostoF, Subtotal, CostoAc,Clave FROM compras ');
  Zcompras.open;

   if Zcompras.RecordCount<>0 then begin
   Zcompras.First;

  if( Edit3.Text<> '') then
  begin
 While Not(Zcompras.Eof) do 
  begin

  cantidad:=  Zcompras.Fields[0].AsInteger;
  precio:= Zcompras.Fields[1].AsFloat;
  sub:= Zcompras.Fields[2].AsFloat;
  anterior:= Zcompras.Fields[3].AsFloat;
  clave:=Zcompras.Fields[4].asString;
  distribuir:=strtofloat(Edit3.Text);
 porcentaje:=(Precio/Updatesub)*100;
 miparte:=(distribuir*porcentaje)/100;
 CostoNuevo:=miparte/cantidad;
 costoac:=trunc(anterior+CostoNuevo);

 Zcompras.sql.Clear;
 Zcompras.Close;
 Zcompras.SQL.Add(' update compras set CostoAc = :costoac WHERE Clave = "'+clave+'"');
 Zcompras.ParamByName('costoac').AsFloat:=costoac;
 Zcompras.ExecSQL;

 Zcompras.Next;
  end;
end;
   end;

[Hell_Raiser]

Estas usando el mismo componente para hacer el update, agrega otro componente para hacer el update por que estas perdiedo todos los registros de tu anterior consulta y cuando le das next el componente esta closed y no tiene ningun registro. Yo prefiero usar el fieldByName("").value asi siempre sabes lo que estas haciendo y evites confusiones.

[schaka]

Perdon pero a que te refires con componente, a mi query Zcompras?