TOTVSTEC

Árvore de páginas

Converte um número inteiro em uma string formatada como um inteiro de 32 bits.

Sintaxe

L2Bin( < nInt > )

Parâmetros

Nome

Tipo

Descrição

Obrigatório

Referência

nInt

numérico

Indica o valor numérico inteiro que será convertido.

X

 

Retorno

Nome

Tipo

Descrição

cRet

caractere

Retorna uma string de quatro bytes que contém um inteiro binário de 32 bits.

Observações

  • Os dígitos decimais passados através do parâmetro são truncados e, portanto, não considerados na conversão.

Exemplos

Exemplo 1
#DEFINE CRLF Chr(13)+Chr(10)
User Function Exemplo()
Local cMensagem := ""
//+----------------------------------------------------------------------------+
//|Exemplifica o uso da função L2Bin                                           |
//+----------------------------------------------------------------------------+
  cMensagem += "[" + L2Bin(1094795585) + "] = L2Bin(1094795585)" + CRLF
  cMensagem += "[" + L2Bin(1111638594) + "] = L2Bin(1111638594)" + CRLF
  cMensagem += "[" + L2Bin(1128481603) + "] = L2Bin(1128481603)" + CRLF
  cMensagem += "[" + L2Bin(1145258561) + "] = L2Bin(1145258561)" + CRLF
//+----------------------------------------------------------------------------+
//|Apresenta uma mensagem com os resultados obtidos                            |
//+----------------------------------------------------------------------------+
return MsgInfo(cMensagem, "Exemplo do L2Bin")

Resultado do Exemplo

Abrangência

Microsiga Protheus 8.11, Protheus 10, TOTVS Application Server 10, ByYou Application Server

Veja também

  • Sem rótulos