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

ELIGO.FAQ-112556

Pegar o próximo código numérico de produto disponível:

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

Pegar o próximo código numérico de pessoa disponível:

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