Cabeçalho

RetAsc

Autor: Eurai Criado: 01/01/2016 Atualizado: 25/04/2025 Caracter

Postagem

Descrição

RetAsc - Utilizada para converter uma string numérica em uma informação composta por letras e Números.

Sintaxe

RetAsc( <cTexto>, <nTamanho>,<lVolta> )

Parâmetros

Par	Nome	Tipo	Descrição	Default	Obg	Ref
01	cTexto	Caracter	Texto a ser avaliado	X
02	nTamanho	Numérico	Tamanho máximo da string de retorno		X
03	lVolta	Boolean	Indica se será gerada uma string composta por letras e números a partir de uma string apenas numérica (.T.) ou se será gerada uma string numérica a partir de uma string composta por letras e números (.F.)		X

Retorno

Retorno	Tipo	Descrição
cRet	Caracter	String Replicada

Exemplo

#INCLUDE "TOTVS.CH"
 
User Function RetAsc()
Local cTexto	:= '200'
 
MsgInfo( 'Valor: ' + cTexto ;
	+  CRLF + 'Retorno: ' + RetAsc(cTexto,2,.T.) ;
	+  CRLF + 'Retorno: ' + RetAsc(cTexto,3,.T.) ;
	+  CRLF + 'Retorno: ' + RetAsc(cTexto,2,.F.) ;
	+  CRLF + 'Retorno: ' + RetAsc(cTexto,3,.F.) ;
	 , 'UniversoADVPL' )
 
Return( Nil )

Resultado
retasc_-_resultado_01