Histórico da Página
| Composition Setup |
|---|
import.css=/download/attachments/3279126062824/newLayouttecnologia.css |
|
| Pagetitle | ||||
|---|---|---|---|---|
|
...
Função: NToL
Converte um valor numérico em lógico. Esta função é obsoleta, e pode ser removida em futuras versões de binário. Vide maiores detalhes nas observações deste documento.
NToL ( < nValor> ) --> lRet
...
| Inclusão de trecho | ||||||
|---|---|---|---|---|---|---|
|
Converte um valor numérico em lógico.
Sintaxe
| Bloco de código | ||
|---|---|---|
| ||
NToL( < nValue > )
|
Parâmetros
Nome | Tipo | Descrição | Obrigatório | Referência |
|---|
...
nValue |
...
numérico | Indica o valor numérico que será convertido para lógico. | X |
|
Retorno
...
Nome | Tipo | Descrição |
|---|---|---|
nRet | numérico | Retorna o valor lógico correspondente ao valor numérico passado por parâmetro. |
Observações
...
- A partir da build 7.00.111010 esta função é considerada obsoleta. Ao invés de chamá-la, utilize o operador de comparação numérica
...
- AdvPL, vide abaixo:
...
Ao invés de:
...
...
- if NToL( nI )
Utilize:
...
...
- if ( nI != 0 )
Exemplos
| Bloco de código | ||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||||
#DEFINE CRLF Chr(13)+Chr(10)UseruserFunction functionExemplo ntol1() Local cMensagem := "" //+----------------------------------------------------------------------------+ //|Exemplifica o uso da função NToL | //+----------------------------------------------------------------------------+ cMensagem += "NToL(-100) = " + cValToChar(NToL(-100)) + CRLF cMensagem += "NToL( -10) = " + cValToChar(NToL( -10)) + CRLF cMensagem += "NToL( -1) = " + cValToChar(NToL( -1)) + CRLF cMensagem += "NToL( 0) = " + cValToChar(NToL( 0)) + CRLF cMensagem += "NToL( 1) = " + cValToChar(NToL( 1)) + CRLF cMensagem += "NToL( 10) = " + cValToChar(NToL( 10)) + CRLF cMensagem += "NToL( 100) = " + cValToChar(NToL( 100)) + CRLF //+----------------------------------------------------------------------------+ //|Apresenta uma mensagem com os resultados obtidos | //+----------------------------------------------------------------------------+ Return MsgInfo( cMensagem, "Exemplo do NToL" )Exemplo da função NToL |
Resultado do Exemplo
Abrangência
Microsiga Protheus 8.11, Protheus 10, TOTVS Application Server 10, ByYou Application Server
Veja
...
também
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas