QUAL O ERRO???

Firebird

22/01/2004

BOA TARDE...

QUAL O ERRO QUE APRESENTA ESSA PROCEDURE? PRECISO QUE ELA TENHA A OPCAO DE BUSCAR PELO CODIGO OU PELA DESCRICAO DA FITA.

[b:09023ecdc5]CREATE PROCEDURE BUSCAFITAS (CODIGO Integer, OPCAO Char(1), DESCRICAO VarChar(40)) returns (DESCRICAO_FITA VarChar(40), COD_FITA Integer) AS
DECLARE VARIABLE OPCAO CHAR(1);
BEGIN
IF (OPCAO = ´0´) THEN //BUSCA POR CODIGO
BEGIN
select F.*, G.Descricao as Genero
from Fitas F, Genero G
where F.Cod_Genero = G.Codigo and
F.CODIGO = :CODIGO INTO :COD_FITA
END
ELSE
BEGIN //BUSCA POR DESCRICAO
select F.*, G.Descricao as Genero
from Fitas F, Genero G
where F.Cod_Genero = G.Codigo and
F.DESCRICAO LIKE (:DESCRICAO) INTO :DESCRICAO_FITA
END;
SUSPEND;
END[/b:09023ecdc5]

OBRIGADO


Edhunter

Edhunter

Curtidas 0

Respostas

Afarias

Afarias

22/01/2004


CREATE PROCEDURE BUSCAFITAS (CODIGO Integer, OPCAO Char(1), DESCRICAO VarChar(40)) returns (DESCRICAO_FITA VarChar(40), COD_FITA Integer) AS 
DECLARE VARIABLE OPCAO CHAR(1); 
BEGIN 

IF (OPCAO = ´0´) THEN //BUSCA POR CODIGO 
BEGIN 

  for Codigo, Descricao from Fitas
  where CODIGO = :CODIGO
  INTO :COD_FITA, :DESCRICAO_FITA do
    suspend;

END 
ELSE 
BEGIN //BUSCA POR DESCRICAO 

  for select codigo, Descricao from Fitas
  where DESCRICAO STARTING WITH :DESCRICAO
  INTO :COD_FITA, :DESCRICAO_FITA do
    suspend;

END; 
END^



no lugar do STARTING WITH vc pode usar CONTAINING


T+


GOSTEI 0
POSTAR