Tempo de leitura: 2 minutos
A função ValType retorna um caractere que identifica o tipo de dado da variável informada através do parâmetro. Ela é uma das funções de Verificação de Tipos de Variáveis em ADVPL.
Sintaxe:
ValType(xVariavel)
Parâmetro(s):
Retorno:
Exemplo de ValType em ADVPL:
#include 'protheus.ch'
/*{Protheus.doc} User Function PValType
(Essa função tem por finalidade mostrar a função de Verificação de Variáveis ValType em ADVPL)
@type Function
@author Adilio Costa
@since 05/12/2023
@version 1.0
@site https://www.protheusadvpl.com.br
@canal https://www.youtube.com/protheusadvpl
@instagram https://www.instagram.com/protheusadvpl
@Portal ProtheusAdvpl:https://hotm.art/portal_protheusadvpl
@Post:ValType
*/
User Function PValType()
Local cMsg := ""
Local cExp1
Local bBloco := {|| .T. }
Local oObjeto := MSDialog():Create()
Static cExp2
Private cExp3,cExp4,cExp5
Public cExp6,cExp7,cExp8
cExp1 := 1000
cExp2 := bBloco
cExp3 := .T.
cExp4 := Date()
cExp5 := {2,6,7}
cExp6 := nil
cExp7 := "Portal ProtheusAdvpl"
cExp8 := oObjeto
cMsg := "O tipo de dado de cExp1 é:"+ValType(cExp1)+Chr(13)+Chr(10)
cMsg += "O tipo de dado de cExp2 é:"+ValType(cExp2)+Chr(13)+Chr(10)
cMsg += "O tipo de dado de cExp3 é:"+ValType(cExp3)+Chr(13)+Chr(10)
cMsg += "O tipo de dado de cExp4 é:"+ValType(cExp4)+Chr(13)+Chr(10)
cMsg += "O tipo de dado de cExp5 é:"+ValType(cExp5)+Chr(13)+Chr(10)
cMsg += "O tipo de dado de cExp6 é:"+ValType(cExp6)+Chr(13)+Chr(10)
cMsg += "O tipo de dado de cExp7 é:"+ValType(cExp7)+Chr(13)+Chr(10)
cMsg += "O tipo de dado de cExp8 é:"+ValType(cExp8)+Chr(13)+Chr(10)
cMsg += "O tipo de dado com chamada de função é:"+ValType(U_PSoma())+Chr(13)+Chr(10)
MsgInfo(cMsg,"Função ValType")
Return
User Function PSoma()
Local nNum1 := 10
Local nNum2 := 20
Local nSoma := nNum1+nNum2
Return nSoma
Nós podemos chamar uma função de dentro de ValType e ela retorna o tipo de dado que essa função retorna, como exemplo nós passamos uma chamada da função PSoma() de dentro de ValType:ValType(U_PSoma()) e como a função PSoma retornou um conteúdo numérico ValType retornou “N“:
É isso aí, finalizamos aqui mais um post do Blog ProtheusAdvpl. Caso tenha ficado alguma dúvida deixe seu comentário ou nos envie um e-mail para adiliocosta@protheusadvpl.com.br, até um próximo post, grande abraço e fica com Deus.
Link(s) de referência(s):
Link permanente
What i do not realize is actually how you’re not actually a lot more smartly-appreciated than you may be right now. You are very intelligent. You already know thus significantly in relation to this subject, made me in my view believe it from a lot of numerous angles. Its like women and men don’t seem to be interested except it’s one thing to accomplish with Girl gaga! Your individual stuffs excellent. At all times take care of it up!