Cabeçalho

Embaralha [AS]

Autor: Eurai Criado: 01/01/2016 Atualizado: 26/04/2025 Criptografia e Segurança

Postagem

Descrição

Embaralha [AS] - Embaralha uma string

Sintaxe

Embaralha( <cTexto>, <nTipo> )

Parâmetros

Par	Nome	Tipo	Descrição	Default	Obg	Ref
01	cTexto	Caracter	Indica o texto que será embaralhado		X
02	nTipo	Numérico	Indica o tipo que será utilizado para embaralhar o texto. Observação: O tipo deve ser sempre zero (0)		X

Retorno

Retorno	Tipo	Descrição
cRet	Caracter	Retorna string embaralhada

Exemplo

#INCLUDE "TOTVS.CH"

User Function Embaralha()

MsgInfo( Embaralha('UniversoADVPL',0), 'UniversoADVPL' )
//Embaralha(SE2->E2_USERLGI,1)  //Descriptografa
//Embaralha(cUserName + Save4in2(MsDate() - Ctod("01/01/96")),0)  //Descriptografa

Return( Nil )

Resultado
embaralha_-_resultado_01