TOTVSTEC

Árvore de páginas

Versões comparadas

Versão antiga 3

changes.mady.by.user Adriana Panseri Santos

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Usuário desconhecido (santos.vitor)

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Composition Setup
import.css=/download/attachments/327912/newLayout.css
Portuguese
Pagetitle
VarSetGet
VarSetGet

Função: VarSetGet

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

Sintaxe

VarSetGet ( < Variavel> ) --> cRet

Permite associar um bloco de código a uma variável de programa do Advpl, onde o bloco de código será chamado quando a variável for acessada.

Sintaxe

Bloco de código
collapsefalse
VarSetGet( < cVariavel >, < bBloco >, [ lApenasUpdate ] )

Parâmetros

Parâmetros/Elementos

Nome

Tipo

Descrição

Obrigatório

Referência

Variavel

cVariavel

Qualquer

caractere

Indica o

dado ou a variável que se deseja identificar

nome da variável a ser associada com o bloco de código.

X

Retorno
    cRet(caracter)
  • Retorna um caractere que identifica o tipo de dado informado.
Observações

Tipos de dados válidos

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

 


bBloco

bloco de código

Indica o bloco de código que será executado quando a variável for acessada.

X


lApenasUpdate

lógico

Caso especificado .T., indica se apenas operação de atribuição deve disparar o bloco de código. Caso informado o valor .F. ( padrão ), o bloco de código será chamado tanto na leitura quanto na atribuição de conteúdo.



Retorno

Nome

Tipo

Descrição

lRet

lógico

Retorna .T. caso a variável especificada como primeiro parâmetro exista na lista de variáveis do programa em execução.

Observações

  • O bloco de código receberá como parâmetro o valor que esta sendo atribuído à variável e o retorno dele será atribuído à variável.

Exemplos

Bloco de código
languagecpp
themeEclipse
linenumberstrue
collapsefalse
User Function teste()
  local bBloco := {|x| ConOut("Passou pelo bloco"), x}
  local nVar := 0
  VarSetGet("nVar", bBloco, .T.)
  nVar := 2
  ClearVarSetGet("nVar")
Return
Exemplos 
User Function Exemplo()Local bBloco     := {||}Local cCaractere := "", cMensagem := ""//+----------------------------------------------------------------------------+//|Exemplifica o uso da função VarSetGet                                       |//+----------------------------------------------------------------------------+  bBloco := {| u | IIf(PCount()==0, cMensagem, cMensagem := u)}  VarSetGet("cCaractere", bBloco)  cCaractere := "Mensagem a ser apresentada"//+----------------------------------------------------------------------------+//|Apresenta uma mensagem com os resultados obtidos                            |//+----------------------------------------------------------------------------+Return MsgInfo(cMensagem, "Exemplo do VarSetGet")
Preview
Exemplo da função VarSetGet
Image Removed

Abrangência

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

Veja

Também

também

Verificação dos tipos de variáveis