Como verificar qual o próximo código numérico para produtos ou pessoas?

select max(produto::numeric+1)
from produtos
where produto ~ '^[0-9]+$';

select max(pessoa::numeric+1)
from pessoas
where pessoa ~ '^[0-9]+$';