[Alejandrina]

Hola a todos,
Tengo el siguiente problema y es que necesito actualizar los datos en una tbl pero el procedimiento que tengo solo lo hace con el primer registro, que error tengo?

DmProcedimientos.QTerminarSolicitudes.params[0].assmallint := strtoint(DBENumeroSolicitud.text);;
      DmProcedimientos.QTerminarSolicitudes.Close;
      DmProcedimientos.QTerminarSolicitudes.open;
      while not DmProcedimientos.QTerminarSolicitudes.eof do
        begin
          DmSip.TblSolicituDiarios.edit;
          Dmsip.TblSolicituDiarios['HORATERMINACION']:=horaFinSolicitud;
          Dmsip.TblSolicituDiarios['ESTADO']:=estado;
          Dmsip.TblSolicituDiarios['DESCRIPACT']:=descripAct;
          DmSip.TblSolicituDiarios.post;
          DmProcedimientos.QTerminarSolicitudes.next;
        end;

Gracias por la ayuda que me puedan brindar