Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.


Composition Setup
import.css=/download/attachments/327912/newLayout.css

...

Função: ValType

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

ValType ( < Variavel> ) --> cRet

...

    cRet(caracter)
  • Retorna um caractere que identifica o tipo de dado informado.

Tipos de dados válidos:

Tipo de dadoValType()
ArrayA
Bloco de códigoB
CaractereC
DataD
LógicoL
NuméricoN
ObjetoO
Não definidoU

 

#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.2048Local 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")
Exemplo da função ValType
Image Removed
Microsiga Protheus 8.11 , Protheus 10

...

La función ValType() tiene la funcionalidad de retornar el tipo de dato de una determinada variable, cuya existencia es obligatoria, con la ventaja de ser una función de ejecución más rápida que la Type().
Se recomienda el uso del ValType() cuando el contenido de una variable no está correcta, como en el siguiente ejemplo, cuyo retorno del punto de entrada tiene que verificarse porque puede suceder que no retorne el contenido correcto:
Ejemplo:
// ValTypeExample.prw
#INCLUDE "TOTVS.CH"
Function ValTypeExample()
Local lExistFilPE := ExistBlock("DUMMYEP")
If lExistFilPE
cFilPE := ExecBlock("DUMMYEP", .F., .F., {})
If ValType(cFilPE) == "C"
ConOut("Uso cFilePE.")
Else
ConOut("Algo está equivocado.")
EndIf
EndIf
Return
User Function DUMMYEP()
Return 10
Salida:
Something goes wrong.