[firebase-br] Erro no comando ALTER PROCEDURE

[FireBird FireBird]

Pessoal, tenho uma ferramenta case, quando roda o script no local faz a
procedure o comando e executado sem problemas.
agora se copiar e colar o codigo no editor sql ou tentar executar por um
programa via SQL acontece um erro.
// Erro
Invalid token.
Dynamic SQL Error.
SQL error code = -104.
Token unknown - line 1, char 415.
?.

alguem sabe porque?


ALTER PROCEDURE SP_ATEND_CID (
    DTA_INI DATE,
    DTA_FIM DATE,
    DETALHE VARCHAR (1))
RETURNS (
    TOTAL INTEGER,
    CID VARCHAR (4),
    NOME_CID VARCHAR (60))
AS
BEGIN
    FOR SELECT
      COUNT(FICHA_ATEND.MED_CID_PROD) AS FIELD_1,
      CID10.COD_CID10
    FROM
      FICHA_ATEND
      INNER JOIN CID10 ON (FICHA_ATEND.MED_CID_PROD = CID10.COD_CID10)
      WHERE FICHA_ATEND.dta_atendimento  Between :DTA_INI AND :DTA_FIM
    GROUP BY
      CID10.COD_CID10
    INTO:TOTAL, :CID
    DO BEGIN

          if (DETALHE='S') then
          begin

                    --pega nome do CID
                    For select cid10.descricao
                    from cid10
                    where cid10.cod_cid10=:CID
                    Into:NOME_CID
                    Do
                    Begin

                    End
          end
  /* Procedure body */
  SUSPEND;
  END
END