execute block
as
declare vs_DB_KEY char(8) character set OCTETS;
begin

   Select
      first 1
      C.RDB$DB_KEY
   from CIDADE C
   where
      C.DESCCIDADE = 'FLORES DA CUNHA' and
      C.UF = 'RS'
   into
      :vs_DB_KEY ;
      

   update CIDADE C set
      C.DESCCIDADE = C.DESCCIDADE || '*'
   where
      C.rdb$db_key = :vs_DB_KEY ;


end