iboconsole SQL error code = -104

estou aconpanhado as video aulas Automação Comercial em Delphi com OOP, BPLS e FIREBIRD (Avançado)
e no iboconsole quando estou fazendo um comando de procedure esta dando o seguinte erro

ISC ERROR CODE:335544569

ISC ERROR MESSAGE:
Dynamic SQL Error
SQL error code = -104

o comando que estou excutando e o seguinte

create procedure sp_get_gerador(pNome Varchar(50)) returns (pValor d_inteiro)
as
declare variable vStm Varchar(500);
begin
vStm = ''select next value for'' || pNome || ''from rdb$databases'';
execute statement vStm into :pValor;
suspend;
end;