REPLACE

[Cristian PJ]

Existe alguma maneira de substituir vários caracteres de uma vez só.
Estou utilizando o REPLACE para a substituição de caracteres, mas me
parece que só é possível uma por vez. Por exemplo: á por a, ã por a, ó
por o, ç por c e assim por diante. Grato.

[Jônatas]

Olá Cristian.

 

É somente um por vez mesmo.

 

Abraços

 

Jônatas Gardin

[Cristian PJ]

Recorro a vcs novamente: Como faço para substituir vários caracteres com o REPLACE, já que ele permite um por vez?

Jônatas Gardin escreveu:

[Rener]

desconheço algum outro comando pra isso...

vários replaces não podem ser?

 

Em 21/02/06, Cristian PJ <crist...@gmail.com> escreveu:

http://groups.google.com.br/group/Progress_4GL

rene...@gmail.com

[Gerson Jr.]

ve se isto funciona:

MESSAGE replaceAny("abcdeabcdeabcdeabcde","e,a","-,?")
    VIEW-AS ALERT-BOX INFO BUTTONS

/* neste caso a funcão substitui todos os e por - e a por ?

 desta forma você pode alterar quantos quiser mas tem que mandar uma lista separada por virgola... */

function replaceAny return character
    (cTexto as character,
    cSubstituirTexto as character,
    cSubstituirPor   as character):

    define variable iContador as integer no-undo.

    repeat iContador = 1 to num-entries(cSubstituirTexto):
        cTexto = replace(cTexto,entry(iContador,cSubstituirTexto),entry(iContador,cSubstituirPor)).
    end.

    return cTexto.

end function.

 

Em 21/02/06, Rener <rene...@gmail.com> escreveu:

[Cristian PJ]

O problema é que não sei aplicar vários replace sem substituir o anterior... Estou vendo uns exemplos, mas achei extremamente deselegante a alternativa encontrada.

Rener escreveu:

[Cristian PJ]

Foi bom vc ter enviado este exemplo... Qro aproveitar e perguntar para que, exatamente, serve este NO-UNDO? Já li a explicação em português e em inglês, mas não entendi ainda para que pode ser usado.

Gerson Jr. escreveu:

[Gerson Jr.]

você pode fazer diversos tratamentos dentro de uma transação, no caso do tratamento de um erro por exemplo você pode usar UNDO ex:

 

do  transaction on error undo, leave:

    /* código que altera o valor da variavel*/

end.

neste caso, quando ocorrer um erro dentro deste "do" tudo que foi feito dentro dele será desfeito e volta a ter o valor que tinha antes de entrar neste bloco, a menos que as variaveis/temp-tables/etc.. tenham sido definidas com no-undo., neste caso elas mantém o último valor mesmo quando ocorre o erro.