Problema com Interbase(Stored Procedure)!!!

Ao tentar criar uma Stored Procedure dá o seguinte erro:

Dynamic SQL Error
SQL error code = -104
Token unknown - line 5, char 35
)
Statement: create procedure Gera_ID_QUAR
returns (Novo_ID_Quarto integer)
as
begin
Novo_ID_Quarto = GEN_ID(GEN_COD_QUAR);
end

o codigo q escrevo é esse:
set term ^;
set generator GEN_COD_QUAR to 0^
create procedure Gera_ID_QUAR
returns (Novo_ID_Quarto integer)
as
begin
Novo_ID_Quarto = GEN_ID(GEN_COD_QUAR);
end^
set term ; ^


Não sei oq ta contecendo!