Re: Fw: [firebase-br] Off Topic - Stored Procedure - correção
marcos_mentz em sinos.net
marcos_mentz em sinos.net
Qui Nov 17 20:36:56 -03 2005
Você pode usar este select até em IBQuery (ou outro componente).
select gen_id(codigo, 0) as Valor from RDB$database, somente não esqueça se
quiser o valor incrementado use 1 no lugar de 0.
Marcos
----- Original Message -----
From: "Salatiel Venâncio" <salatielvenancio em yahoo.com.br>
To: "FireBase" <lista em firebase.com.br>
Sent: Thursday, November 17, 2005 6:32 AM
Subject: Re: Fw: [firebase-br] Off Topic - Stored Procedure - correção
> 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/
>
>
> ______________________________________________
> 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
Mais detalhes sobre a lista de discussão lista