Árvore de páginas

Você está vendo a versão antiga da página. Ver a versão atual.

Comparar com o atual Ver Histórico da Página

Versão 1 Próxima »

Função: RTrim

Remove os espaços em branco à direita de uma string.

RTrim ( [ cString] ) --> cRet

NomeTipoDescriçãoObrigatórioReferência
cStringCaracterIndica a string que será copiada sem os espaços em branco à direita.
    cRet(caracter)
  • Retorna uma cópia da string sem os espaços em branco à direita. Caso a string seja nula ("") ou totalmente composta por espaços em branco, a função retornará uma string nula ("").

  • LTrim() está relacionada as funções RTrim(), que remove os espaços em branco à direita, e a AllTrim, que remove os espaços em branco à esquerda e à direita.
  • O inverso de AllTrim(), LTrim() e RTrim() são as funções PADC(), PADR() e PADL() que centralizam, alinham à direita ou à esquerda as strings, através da inserção de caracteres de preenchimento.

Exemplos de utilização

  • Eliminar espaços em branco à direita ao se concatenar strings.
  • Para concatenar, por exemplo, o primeiro e o último campo do nome para formar uma string de nome. Exemplo: Campos de banco de dados que são armazenados em formato de tamanho fixo.


#define CRLF Chr(13) + Chr(10)//+----------------------------------------------------------------------------+//|Exemplo de uso da função LTrim, RTrim e AllTrim                             |//+----------------------------------------------------------------------------+User Function Exemplo()Local cTexto := "    texto com espaços excedentes no início e fim    "Local cLTrim := LTrim(cTexto)Local cRTrim := RTrim(cTexto)Local cAllTrim := AllTrim(cTexto)Local cMensagem := ""	cMensagem := "Texto origem: [" + cTexto + "]"	cMensagem += CRLF + "LTrim: " + CRLF + "[" + cLTrim + "]"	cMensagem += CRLF + "RTrim: " + CRLF + "[" + cRTrim + "]"	cMensagem += CRLF + "AllTrim: " + CRLF + "[" + cAllTrim + "]"Return MsgInfo(cMensagem, "Exemplo")


Microsiga Protheus 8.11 , Protheus 10

  • Sem rótulos