TiraAcentos
Retira os caracteres especiais, retornando o texto em maíusculo.
Sintaxe: TiraAcentos (Alfa xTexto, Alfa End xRetorno)
Parâmetros:
Nome | Tipo | Descrição |
xTexto | Alfa | Texto original. |
xRetorno | Alfa | Retorno da função. |
Exemplo:
/* Exibirá mensagem na tela com o texto original e texto convertido */
Definir alfa vTexto;
Definir alfa xRetorno;
Definir alfa xQuebra;
RetornaAscII(10, xQuebra);
vTexto = "Teste da Função TiraAcentos" + xQuebra +
"Texto de exemplo para teste da função" + xQuebra +
"Serão retirados os acentos e o texto será convertido para maiúsculo" + xQuebra
+
"Esta regra apresentará uma mensagem na tela com o texto original e depois outra
com o texto convertido";
TiraAcentos (vTexto, xRetorno);
vTexto = vTexto + "[&Ok]";
xRetorno = xRetorno + "[&Ok]";
Mensagem(Retorna, vTexto);
Mensagem(Retorna, xRetorno);
Utilização: Editor de regras e gerador de relatórios.