[firebase-br] O que está errado nessa Procedure
Renan Rogowski Pozzo
renanrpozzo em gmail.com
Sex Ago 2 20:58:13 -03 2013
Declara as variáveis "Aux" e "Str" como varchar(255).
Abraço,
Renan Rogowski Pozzo
2013/8/2 Luciano franca <luapfirebird em yahoo.com.br>
> create or alter procedure Proc_RemoveChar(
> Texto varchar(255))
> returns (
> Resultado varchar(255))
> as
> declare variable I Integer;
> declare variable Aux Char(255);
> declare variable Str Char(255);
> begin
>
> Resultado = '';
> Str = '';
> I = 1;
>
> While ( i <= char_length(:Texto) ) do begin
> Aux = Trim (substring(:Texto from i for 1));
> if (Aux in ('0', '1', '2', '3', '4', '5', '6', '7', '8', '9')) then
> Str = :Str || :Aux;
>
> i = i + 1;
> End
>
> Resultado = :Str;
> suspend;
>
> 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
>
Mais detalhes sobre a lista de discussão lista