[firebase-br] Erro no comando ALTER PROCEDURE

[samuel ferreira]

ola


nao tem q ter o

set term ^;   no inicio e   set term ;^   no fim?


samuel



2009/2/7 FireBird FireBird <firebird100 em gmail.com>

> 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
> ______________________________________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
> Para saber como gerenciar/excluir seu cadastro na lista, use:
> http://www.firebase.com.br/fb/artigo.php?id=1107
> Para consultar mensagens antigas: http://firebase.com.br/pesquisa
>