Histórico da Página

Troca da função log0800_replace() pela função nativa da linguagem TotvsTec 4GL replace().

DEFINE l_texto CHAR(200)
 
LET l_texto = "exemplo substituição texto"
 
CALL conout("TEXTO ANTES DO REPLACE: "||l_texto CLIPPED)
 
LET l_texto = log0800_replace(l_texto,"texto","TEXTO EM CAIXA ALTA")

CALL conout("TEXTO DEPOIS DO REPLACE: "||l_texto CLIPPED)

DEFINE l_texto CHAR(200)

LET l_texto = "exemplo substituição texto"

CALL conout("TEXTO ANTES DO REPLACE: "||l_texto CLIPPED)

CALL replace(l_texto,"texto","TEXTO EM CAIXA ALTA")

CALL conout("TEXTO DEPOIS DO REPLACE: "||l_texto CLIPPED)

Observações

A função 4GL replace(), faz o ajuste no conteúdo da variável passada no 1º parâmetro, pois é um parâmetro do tipo "Referência" e o retorno desta função será a quantidade de ocorrências encontradas e ajustadas no conteúdo do 1º parâmetro.

Os parâmetros da função 4GL replace() são:

1 - variável com o texto a ter seu conteúdo ajustado

2 - texto a ser substituído no conteúdo da variável 

3 - novo texto a ser incluído no conteúdo da variável em substituição ao texto do parâmetro 2.

4 - (Opcional) Posição inicial de pesquisa no conteúdo da variável do parâmetro 1. Quando não informado, irá assumir que a substituição deverá ocorrer a partir da posição 1.

5 - (Opcional) Posição final de pesquisa no conteúdo da variável do parâmetro 1. Quando não informado, irá assumir que a substituição deverá ocorrer até o final do texto.

Os parâmetros opcionais, não devem ser passados como NULL, ou seja, apenas não devem ser informados.

Exemplo: replace(l_texto,'antes','depois')