Fórum Atualizar mais de um registro (Laço).. #319872

Olá a todos,
Estou com um problema aqui, e gostaria da ajuda dos colegas do forum.
Tenho a seguinte situação:

procedure TCadEmiteGuia.tblGuiaItems_EBeforePost(DataSet: TDataSet);
begin
tblGuiaItems_EGuiaNum.Value := tblGuia_EGuiaNum.Value;
tblGuiaItems_EAssCod.Value := qryGuiaItems_EAssCod.Value;
tblGuiaItems_EStatus.Value := ´E´;
*** Executa certo ****
.........

*** aqui está o problema ***

if not tblnotificacao.Eof then
begin
tblNotificacao.open;
tblnotificacao.First;
tblNotificacao.Edit;
tblNotificacaoStatus.Value := ´E´;
end;

O problema é que é executado somente num registro, quando existe mais de um, até mais de 3 registro com o mesmo ´Protocolo´. Como eu faço este laço para atualizar todos os registros do Banco de dados.
Uso Paradox.

Um abraço a todos
Naelson