TOTVSTEC

Árvore de páginas

Você está vendo a versão antiga da página. Ver a versão atual.

Comparar com o atual Ver Histórico da Página

Versão 1 Próxima »

Adiciona novos campos para variáveis do tipo Record dinamicamente ou seja em Runtime.

Sintaxe

AddMember( < cNomeVar >, < cNomeCampo >, < cTipoCampo > )

Parâmetros

Nome

Tipo

Descrição

Obrigatório

Referência

cNomeVar

caractere

Indica o nome do Record onde será adicionado novo campo.

X

 

cNomeCampo

caractere

Indica o nome do novo campo a ser adicionado.

X

 

cTipoCampo

caractere

Indica o tipo do novo campo a ser adicionado.

X

 

Exemplos

FUNCTION Exemplo1()
  DEFINE varRec RECORD
                    campo1 CHAR(20)
                 END RECORD
                 
  DEFINE varArrRec RECORD
                 data ARRAY[3] OF RECORD
                          campo1 CHAR(20)
                      END RECORD
               END RECORD
  
  # Adiciona novo campo no record.
  AddMember(varRec,"campo2","CHAR(50)")
  
  # Adiciona novo campo Array de Record
  AddMember(varArrRec.data,"campo2","CHAR(50)")
END FUNCTION

FUNCTION Exemplo2()
  DEFINE varRec RECORD END RECORD
                 
  DEFINE varArrRec RECORD
                      data ARRAY[] OF RECORD END RECORD
                   END RECORD
  
  # Adiciona novo campo ao record que inicialmente está vazio.
  AddMember(varRec,"campo1","CHAR(50)")
  
  # Adiciona novo campo Array de Record que inicialmente está vazio.
  AddMember(varArrRec.data,"campo1","CHAR(50)")
  
  # Adiciono 3 itens ao array de record
  CALL ArrayAddItem(varArrRec.data,3)
  
  # Inicialização do Array
  INITIALIZE varArrRec.* TO NULL
END FUNCTION

Abrangência

Disponível a partir da Build 7.00.101202

#@advpl_seealso ArrayAddItem, ArrayDeleteItem

  • Sem rótulos