Atorado al crear un store procedure

[pmtzg]

hola compañeros
estoy usando delphi 7 y FB 21.
tambien utilizo IBExpert y estoy haciendo pruebas para crear mi primer
Store Procedure
pero me marca un error
este es mi store procedure

Código Delphi [-]
 
create procedure SdoAb1 (numfac VARCHAR(7)) as
declare variable TotFac integer;
begin
   Select sum(cuen07.importe) as abono
   from
   cuen07 Inner join conc07 on
   cuen07.tipo_mov=conc07.num_cpto
   Where    conc07.tipo='A' and conc07.con_refer <> 'N'
   and cuen07.no_factura =:numfac;  <--   ERROR 
   into :totfac;
   if (Totfac is Null) then
        TotFac =0;
end

cuando lo compilo me marca un error donde lo señalo y me posiciona el cursor entre :numfac y ;

y me dice :
Invalid token.
Dynamic SQL Error.
SQL error code = -104.
Token unknown - line 9, column 34.
;.

me prodian orientar,, mil gracias