[firebase-br] Stored Procedure

[Tricon - Paulo]

Está é a primeira Stored Procedure que estou criando e está dando erro 


ISC ERROR CODE:335544569

ISC ERROR MESSAGE:
Dynamic SQL Error
SQL error code = -104
Token unknown - line 10, char 16
:


O que estou errando?



set term ^;
create procedure teste (empresa smallint, filial smallint, data date) returns (clifor integer, nome varchar(40), faturado numeric(12,2), afaturar numeric(12,2)) as
declare variable historico smallint;
declare variable tipo varchar(1);
declare variable valor numeric(12,2);
begin
    for select clifor, nome from clifor where empresa=:empresa into :clifor, nome do
    begin
        for select H.historico, H.tipo, sum(M.valor) as "VALOR" from carmovto M, carhistorico H where M.empresa=:empresa and M.filial=:filial and M.cliente=:clifor and M.data<=:data and M.historico=H.historico and H.gerar='S' group by H.historico, H.tipo into :historico, :tipo, :valor do
        begin
            if :tipo='D' then
                faturado:=faturado + :valor;
            else
                faturado:=faturado - :valor;
            suspend;
        end
        suspend;
    end
end
^


Paulo Ricardo Schmitz
Tricon Consultoria em Informática Ltda.
Tel: (51)8439-1906    Skype: triconinformatica