Más o menos, debería ser así:
Código Delphi
[-]DATAMODULE6.FDQuery3.Close;
DATAMODULE6.FDQuery3.Sql.text := 'UPDATE PAGA_M01 SET AUTORIZA = ''SI'' WHERE DOCTO = DOCTO';
DATAMODULE6.FDQuery3.ParamByname('DOCTO').asstring := Lo que sea:
DATAMODULE6.FDQuery3.ExecSQL;