[roman]

Empezado por jafera

Gracias Román.

El problema que tengo es como paso todo lo que hace el procedure que puse en el primer post en una consulta update, aquí es donde estoy encallado.

Saludos

Josep

Creo que no nos estamos entendiendo. En tu rutina, después de cálculos que haces, terminas asignando el valor final al campo de tu base:

Código Delphi [-]
F_ModulDades.RebutCODI_BARRES.Value:=Codi_B;

O sea que, imagino, Rebut es un dataset conectado a tu tabla. Bueno, lo que yo digo es que uses un query, digamos QueryRebut con una consulta como la que te puse y hagas:

Código Delphi [-]
while not QueryRebut.Eof do
begin
  {
    Aquí los cálculos
  }
  QueryRebut['CODI_BARRES'].Value:=Codi_B;
  QueryRebut.Next;
end;

// Saludos