TOTVSTEC

Árvore de páginas

  • Criado por Usuário desconhecido (santos.vitor) em 17 set, 2018

Cancela a referência entre duas variáveis.

Sintaxe

VarUnref( < cVarRefencia > )

Parâmetros

Nome

Tipo

Descrição

Obrigatório

Referência

cVarRefencia

caractere

Nome da variável que é referência.

X

 

Retorno

Nome

Tipo

Descrição

lRet

lógico

Retorna, verdadeiro (.T.), se a referência foi cancelada com sucesso; caso contrário, falso (.F.).

Observações

  • A partir da build 7.00.090818P, esta função passou a retornar um valor lógico.

Exemplos

user function exemplo()
  local xRef := ''
  local xVar := 'A'
  if !( varRef( 'xRef', 'xVar' ) )
    return msgStop( "Não foi possível referenciar a variável!" )
  endIf
  xRef := 'B'
  msgInfo( "xRef = " + xRef + chr( 10 ) + "xVar = " + xVar, "xRef := 'B'" )
  xVar := 'C'
  msgInfo( "xRef = " + xRef + chr( 10 ) + "xVar = " + xVar, "xVar := 'C'" )
  if !( varUnref( 'xRef' ) )
    return msgStop( "Não foi possível cancelar a referência!" )
  endIf
  xRef := 'B'
  msgInfo( "xRef = " + xRef + chr( 10 ) + "xVar = " + xVar, "xRef := 'B'" )
  xVar := 'C'
  msgInfo( "xRef = " + xRef + chr( 10 ) + "xVar = " + xVar, "xVar := 'C'" )
return

Abrangência

Microsiga Protheus 8.11 , Protheus 10



  • Sem rótulos