[firebase-br] Dúvidas em SP !!!

[Marcelo Torres]

O correto seria:

ALTER PROCEDURE PROGRAMA_SP (
    NOME_PRG CHAR(8) CHARACTER SET WIN1252)
AS

DECLARE VARIABLE QTD_PROGRAMAS INTEGER;
BEGIN
    SELECT COUNT(P.CD_PROGRAMA) FROM PROGRAMA P
    WHERE P.CD_PROGRAMA = :NOME_PRG
    INTO QTD_PROGRAMAS;

    IF (QTD_PROGRAMAS = 0) THEN
        EXCEPTION NAO_EXISTE;

    SUSPEND;
END

Você esqueceu de colocar a declaração "INTO"....
Só isso !

[]s,
Marcelo Torres
(http://www.yahoogrupos.com.br/groups/br-delphi/)


"Glênio Côrtes Himmen"
<glenio.himmen em bol.com.br> wrote in message
news:008801c51430$cfa4ffd0$0b000e0a em glenio...
Galera,

Estou com problemas na procedure abaixo, o FB 1.5.2 está reclamando um erro
no ; do select...

---------- STATEMENT ----------

ALTER PROCEDURE PROGRAMA_SP (
    NOME_PRG CHAR(8) CHARACTER SET WIN1252)
AS
DECLARE VARIABLE QTD_PROGRAMAS INTEGER;
begin
  /* Procedure Text */
  select count (p.cd_programa) as qtd_programas from programa p where
(p.cd_programa = :nome_prg);
  if (qtd_programas = 0) then
     begin
       exception nao_existe;
     end
  suspend;
end



---------- ERROR MESSAGE ----------

Invalid token.
Dynamic SQL Error.
SQL error code = -104.
Token unknown - line 7, char 98.
;.

Prefeitura Municipal de Aparecida de Goiânia
Rua João Batista de Toledo, 16, Setor Central
Aparecida de Goiânia-GO - CEP - 74.980-901, Fone: (62) 545-5818
Glênio Côrtes Himmen - glenio.himmen em bol.com.br

Nada façais por partidarismo ou vanglória,
mas por humildade, considerando cada um
os outros superiores a si mesmo.

Fl. 2:3



______________________________________________
FireBase-BR (www.firebase.com.br) - Hospedado em www.bavs.com.br
Para editar sua configuração na lista, use o endereço
http://mail.firebase.com.br/mailman/listinfo/lista_firebase.com.br