*&---------------------------------------------------------------------*
* Eai galerinhaaa, voltando para trazer um post importante para aqueles* que estão precisando fazer aquela substituição precisa de final de copa.
* o replace veio com o abap 7.40+ para nos ajudar a acelerar na alteração
* de caracteres com facilidade e praticidade.
REPORT Z_TROCANDO_OS_PÉS.
* Antes de trazer o comando e o uso deixa eu explicar algumas coisinhas
* a função replace é utilizada da seguinte forma e com os parametros de forma
* opcional:
*
*DATA(resultado) = replace (
* val = texto
* sub = 'A'
* with = 'E'
* occ = 0
* case = true
* ).
* Então descrevendo cada parametro:
*
* VAL -> Obrigatório! Será o texto/variavel original a ser substituido.
* SUB -> Obrigatório! Será o valor a ser trocado exemplo letra ou numero.
* WITH -> Obrigatório! Será o valor de substituição.
* OCC -> Opcional! Será a ocorrencia que deve ser trocada e caso seja 0 será
* executado todas as vezes que aparecer o valor a ser trocado.
* CASE -> Opcional! determina se é case sensitive para não trocar letras em
* caso de maiúscula e minúscula.
* Beleza agora que ficou mais claro, vamos para a pratica!!
* Supondo que estamos com um problema, eu tenho um problema no meu programa
* que exige que eu substitua sempre a letra F por G por uma limitação, como
* fazer isso da melhor forma sem ter o replace antigão.
* Classico criando variaveis de texto.
DATA(texto) = |Fato|.
BREAK-POINT. "Esse break é para entedendermos o valor do texto
DATA(animal) = replace( val = texto
sub = 'F'
with = 'G' ).
BREAK-POINT."Esse é para vermos o valor da variável animal e ver o que houve