Função que adiciona um elemento a um Array.

Exemplo da Rotina:

aAdd(aArray, xElemento)

Exemplo 1- Adição de elemento em um vetor:

aAdd – Exemplo 1

//Bibliotecas
#Include "Protheus.ch"

/*/{Protheus.doc} zTeste
Função de Teste
@type function
@author Terminal de Informação
@since 13/11/2016
@version 1.0
	@example
	u_zTeste()
/*/

User Function zTeste()
	Local aArea  := GetArea()
	Local aArray := {}

	//Adicionando elementos no vetor
	aAdd(aArray, "Daniel")
	aAdd(aArray, "João")
	aAdd(aArray, "Gabriel")
	aAdd(aArray, "Fernando")

	//Mostra o elemento de numero 3
	Alert(aArray[3])

	RestArea(aArea)
Return

Exemplo 2- Adição de elemento em uma matriz:

aAdd – Exemplo 2

//Bibliotecas
#Include "Protheus.ch"

/*/{Protheus.doc} zTeste
Função de Teste
@type function
@author Terminal de Informação
@since 13/11/2016
@version 1.0
	@example
	u_zTeste()
/*/

User Function zTeste()
	Local aArea  := GetArea()
	Local aArray := {}

	//Adicionando elementos na matriz
	aAdd(aArray, {"Daniel",   23})
	aAdd(aArray, {"João",     28})
	aAdd(aArray, {"Gabriel",  21})
	aAdd(aArray, {"Fernando", 25})

	//Mostra o elemento de numero 3, e quantos anos tem
	Alert(aArray[3][1]+" tem "+cValToChar(aArray[3][2])+" anos.")

	RestArea(aArea)
Return

Exemplo em Vídeo:

Clique nesse link para ver um exemplo em Vídeo da nossa Maratona de Exemplos.

Observações:

– Caso tenha dúvidas ou problemas com os exemplos, entre em contato;
– Se tiver sugestões de rotinas, pode entrar em contato;

Referências:

– TDN
– Universo AdvPL