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

« Anterior Versão 4 Atual »

Adiciona novos membros para variáveis do tipo Record dinamicamente ou seja, em tempo de execução.

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 membro.

X

 

cNomeCampo

caractere

Indica o nome do novo membro a ser adicionado.

X

 

cTipoCampo

caractere

Indica o tipo do novo membro a ser adicionado.

X

 

Observações

  • Também é possível definir um Record vazio e incluir novos membros em tempo de execução.

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

Veja também

  • Sem rótulos