Update Con Firebird

[Enrique Ccz]

Hola buenos días soy nuevo en esto el problema que tengo es el siguiente al momento de ejecutar mi update en teoría tendría que hacer el cambio en el registro en el que uno esta posicionado y actualmente lo realiza en todos los registros al igual al ejecutar la sentencia desde un boton es necesario cerrar y volver abrir el programa para ver reflejados los cambios me gustaria que me ayudaran a solucionar esto.

Saludos.

Código Delphi [-]
DATAMODULE6.FDQuery3.Close;
DATAMODULE6.FDQUERY3.SQL.Text:= 'UPDATE PAGA_M01 SET AUTORIZA = :AUTORIZA WHERE DOCTO =:DOCTO';
DATAMODULE6.FDQuery3.ParamByName('Autoriza').AsString:=EDIT1.TEXT;
DATAMODULE6.FDQuery3.ExecSQL;