Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
portuguese
Composition Setup
import.css=/download/attachments/3279126062824/newLayouttecnologia.css

Pagetitle

...

ValType

...

...

...

ValType

Retorna um caractere que identifica o tipo de dado da variável informada através do parâmetro.

Sintaxe

Bloco de código
collapsefalse
ValType( <
xVariavel> ) --> cRet 
 xParam > )

Parâmetros

Nome

Tipo

Descrição

Obrigatório

Referência

...

xParam

...

qualquer

Indica o dado ou a variável que se deseja identificar.

X

 

Retorno

Nome

...

Tipo

...

Descrição

cRet

...

caractere

Retorna um caractere que identifica o tipo de dado informado.

Observações

  • Tipos de dados válidos:

Tipo de

...

dado 

ValType

...

Array

A

Bloco de código

B

Caractere

C

Data

D

Lógico

L

Numérico

N

Decimal de ponto fixo

F

Objeto

O

Não definido

...

U

Exemplos

 

 
Bloco de código
languagecpp
themeEclipse
linenumberstrue
collapsefalse
#DEFINE CRLF Chr(13)+Chr(10)


User Function Exemplo()


  Local aArray := {}


  Local bBloco := {|| .T.}


  Local cCaractere := "Caractere", cMensagem := ""


  Local dData := Date()


  Local lLogico := .T.


  Local nNumerico := 1024.2048


  Local oObjeto := MSDialog():Create()


  Local uUndefined := Nil


  //+----------------------------------------------------------------------------+


  //|Exemplifica o uso da função ValType |


  //+----------------------------------------------------------------------------+
 

 cMensagem += "[" + ValType(aArray) + "] Array" + CRLF
  

cMensagem += "[" + ValType(bBloco) + "] Bloco de código" + CRLF
 

 cMensagem += "[" + ValType(cCaractere) + "] Caractere" + CRLF
 

 cMensagem += "[" + ValType(dData) + "] Data" + CRLF
 

 cMensagem += "[" + ValType(lLogico) + "] Lógico" + CRLF
  

cMensagem += "[" + ValType(nNumerico) + "] Numérico" + CRLF
  

cMensagem += "[" + ValType(oObjeto) + "] Objeto" + CRLF
  

cMensagem += "[" + ValType(uUndefined) + "] Undefined"


  //+----------------------------------------------------------------------------+


  //|Apresenta uma mensagem com os resultados obtidos |


  //+----------------------------------------------------------------------------+


Return MsgInfo(cMensagem, "Exemplo do ValType")

Preview

...

Image Modified

...

Microsiga Protheus 8.11 , Protheus 10

...

Veja também

...