Re: Fw: [firebase-br] Off Topic - Stored Procedure - correção

[Salatiel Venâncio]

Será que não eh uma propriedade do componente TIBStoreProc?



--- marcos_mentz em sinos.net escreveu:

> 
>  use dessa  forma (correção):
> 
> CREATE PROCEDURE GERAR_CODIGO
> RETURNS (VALOR INTEGER)
> AS
> begin
>  /* Procedure Text */
> 
>  select gen_id(codigo, 0)  into :VALOR from RDB$database
>  end
> 
>  OBS:
>  select gen_id(codigo, 0) as Codigo from RDB$database
>  desta forma retorna o código corrente
> 
>  select gen_id(codigo, 1) as Codigo from RDB$database
>  desta forma retorna o próximo código
> 
>  Marcos
> M & L Informática Ltda
> 
> > ----- Original Message ----- 
> > From: "Salatiel Venâncio" <salatielvenancio em yahoo.com.br>
> > To: "FireBase" <lista em firebase.com.br>
> > Sent: Thursday, November 17, 2005 5:10 AM
> > Subject: Re: [firebase-br] Off Topic - Stored Procedure
> >
> >
> >>A procedure eh esta. Copiei toda a procedure. Eh uma procedure
> simples.
> >> Pega o Codigo de um Generator. No IB Expert funciona
> perfeitamente.
> >>
> >> SET TERM ^ ;
> >>
> >> CREATE PROCEDURE GERAR_CODIGO
> >> RETURNS (
> >>    VALOR VARCHAR(10))
> >> AS
> >> begin
> >>  /* Procedure Text */
> >>  VALOR = gen_id(CODIGO, 0);
> >>  suspend;
> >> end
> >> ^
> >>
> >> SET TERM ; ^
> >>
> >> GRANT EXECUTE ON PROCEDURE GERAR_CODIGO TO SYSDBA;
> >>
> >> --- Márcio Konrath <marcio em altero.com.br> escreveu:
> >>
> >>> Venâncio manda a procedure junto no email ;;;talvez o problemas
> seja
> >>> lá;;;;
> >>>
> >>> Márcio Konrath
> >>> CPD - Altero Design
> >>>
> >>> ----- Original Message ----- 
> >>> From: "Salatiel Venâncio" <salatielvenancio em yahoo.com.br>
> >>> To: "Lista FireBird" <lista em firebase.com.br>
> >>> Sent: Thursday, November 17, 2005 9:06 AM
> >>> Subject: [firebase-br] Off Topic - Stored Procedure
> >>>
> >>>
> >>> > Tudo bem Pessoal. Estou com um problema.
> >>> >
> >>> > Criei atraves do IB Expert uma procedure simples para retornar
> um
> >>> valor
> >>> > de uma tabela. Ao chamar esta procedure através do programa,
> ela
> >>> não
> >>> > retorna nada. Mas quando executo no IB Expert, funciona
> >>> normalmente.
> >>> >
> >>> > Uso o Delphi 5, IBO 4.3.A e para executar a procedure o
> componente
> >>> > TIBOStoreProc.
> >>> >
> >>> > Fiz um teste, para ver como se comportava, da seguinte maneira:
> >>> >
> >>> >  with D_Dados, sp_Temp do
> >>> >  begin
> >>> >    StoredProcName := 'GERAR_CODIGO';
> >>> >    Prepare;
> >>> >    ExecProc;
> >>> >    ShowMessage(Params[0].Value);  // --> Param de Retorno
> >>> >  end;
> >>> >
> >>> > O Resultado Retornou nulo. Será que está faltando alguma
> >>> configuracao
> >>> > no componente?
> >>> >
> >>> > Aguardo Contato.
> >>> >
> >>> > Att.
> >>> >
> >>> > Salatiel Venâncio
> >>> > "JESUS, Minha Certeza!"
> >>> > Campina Grande - PB
> >>> >
> >>> >
> >>> >
> >>> >
> >>> >
> >>> >
> >>> >
> >>> >
> >>> > _______________________________________________________
> >>> > Yahoo! Acesso Grátis: Internet rápida e grátis.
> >>> > Instale o discador agora!
> >>> > http://br.acesso.yahoo.com/
> >>> >
> >>> >
> >>> > ______________________________________________
> >>> > 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
> >>> > Para consultar mensagens antigas:
> http://firebase.com.br/pesquisa
> >>> >
> >>> > !DSPAM:437c723b309535664512685!
> >>> >
> >>> >
> >>>
> >>>
> >>> ______________________________________________
> >>> 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
> >>> Para consultar mensagens antigas: http://firebase.com.br/pesquisa
> >>>
> >>
> >>
> >> Att.
> >>
> >> Salatiel Venâncio
> >> "JESUS, Minha Certeza!"
> >> Campina Grande - PB
> >>
> >>
> >>
> >>
> >>
> >>
> >>
> >>
> >> _______________________________________________________
> >> Yahoo! Acesso Grátis: Internet rápida e grátis.
> >> Instale o discador agora!
> >> http://br.acesso.yahoo.com/
> >>
> >>
> >> ______________________________________________
> >> 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
> >> Para consultar mensagens antigas: http://firebase.com.br/pesquisa
> > 
> 
> 
> ______________________________________________
> 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
> Para consultar mensagens antigas: http://firebase.com.br/pesquisa
> 


Att.

Salatiel Venâncio
"JESUS, Minha Certeza!"
Campina Grande - PB


	



	
		
_______________________________________________________ 
Yahoo! Acesso Grátis: Internet rápida e grátis. 
Instale o discador agora!
http://br.acesso.yahoo.com/