Consulta SQL+DELPHI 7

[Gbyte]

Hola Felipe! y gracias por responder.
Quiero aplicar un porcentaje a una columna llamada precio de la tabla mercaderia(para subir y bajar los precios). la mercaderia se muestra en el DBGrid y tengo un TEdit para ingresar un porcentaje. Estoy trabjando con IBDataset y no con tablas. He podido hacer que se aplique al primer registro pero quiero aplicar a todos los registros (cambiarlo en la bd y que se muestre en el dbgrid). Te muestro el codigo, que podría modificarle:

mercaderia.IBDSmercaderia.Close;
mercaderia.IBDSmercaderia.SelectSQL.Clear;
mercaderia.IBDSmercaderia.SelectSQL.Text:='select * from mercaderia order by mercaderia.cod_merc asc';
mercaderia.IBDSmercaderia.Open;
num:=mercaderia.IBDSmercaderia.Fields[4].Value;
num1:=strtofloat(cambio.Text);
porcent:=(num*num1)/100;
num:=num+porcent;
mercaderia.IBDSmercaderia2.Close;
mercaderia.IBDSmercaderia2.SelectSQL.Clear;
mercaderia.IBDSmercaderia2.SelectSQL.Text:='update mercaderia set precio_venta=:vara';
mercaderia.IBDSmercaderia2.ParamByName('vara').AsFloat:=num;
mercaderia.IBDSmercaderia2.Open;