Alguna forma de actualizar secuencias adentro de una funcion

Buenos días Lista,

Hay alguna forma de actualizar mis secuencias en la base de datos de forma
automática? Esto debido a que tuve una corrupción de datos lo cual afecto
que mis secuencias siguieran incrementándose de forma constante.

Intento crear una funcion que lo haga:

create or replace function update_sequences () returns boolean as $$
declare var1 int;
begin
var1=(select id from bdcriterio order by id desc limit 1);
alter sequence bdcriterio_seq restart with var1+1;
return true;
end;
$$ language plpgsql;

Tampoco me funciona de esta forma:

alter sequence bdcriterio_seq restart with (select id from bdcriterio order
by id desc limit 1);

No conozco otra manera de realizar esto ya que no soy muy bueno usando el
comando alter..

Gracias de antemano para las personas que me puedan brindar ayuda!!

Saludos