[firebase-br] Update simples

[satoy.matsuoka em hstern.com.br]

Bom dia lista,

Estou com um problema muito simples, mas com dificuldades, por ser leigo 
no Firebird
Estou querendo colocar um valor em uma coluna nova que criei em uma tabela

Para isso fiz a seguinte rotina:
begin
wnum=1;
for select chave
      from tabela
      into :wchave
     do
     begin
          update tabela
          set novoCampo = :wnum
          where chave = :wchave;
          wnum=wnum+1;
      end
end

E ele está me dando deadlock, ou seja estou me travando !!!
Se alguém puder me dizer o que estou fazendo de errado ....
Agradeço

[]'s
Satoy