Tempo de leitura: 2 minutos
A função aAdd em ADVPL adiciona um novo elemento no final de um array, aumentando o seu tamanho. O conteúdo do novo elemento será o resultado fornecido pela expressão. Ela é uma das funções de manipulação de array em ADVPL.
*Caso a expressão não seja especificada, será atribuído o valor NIL ao novo elemento.
Sintaxe:
aAdd( < aDest >, < xExpr > )
Parâmetros:
Retorno:
A função aAdd simplifica alguma situações, por exemplo, nós poderíamos ter a seguinte situação, um array multidimensional conforme o exemplo:
aCarros := { {1,”Onix”},{2,”Palio”}, {3,”Uno”},{4,”Jeep Compass”}}
Com a função aAdd poderíamos simplicar a situação fazendo isso:
aCarros := { } //Aqui definimos o array aCarros
aAdd(aCarros,{1,”Onix”})
aAdd(aCarros,{2,”Palio”})
aAdd(aCarros,{3,”Uno”})
aAdd(aCarros,{4,”Jeep Compass”})
#include 'protheus.ch'
/*{Protheus.doc} User Function faAdd
(Essa função tem por finalidade mostrar a função de manipulação de array aAdd em ADVPL/TL++)
@type Function
@author Adilio Costa
@since 02/05/2020
@version 1.0
@?Inscreva-se no Blog ProtheusAdvpl:
https://www.protheusadvpl.com.br
@?Inscreva-se no Canal ProtheusAdvpl:
https://www.youtube.com/protheusadvpl
@?Siga-nos no Instagram:
https://www.instagram.com/protheusadvpl
@?Conheça os Cursos e Formações do ProtheusAdvpl:
https://cursos-e-formacoes-protheusadvpl.gr-site.com/
@Participe de nossas comunidades no WhatsApp:
-Comunidade Protheus Backoffice:https://chat.whatsapp.com/KMUIAjwZ6EZ6eAHsLkPTyb
-Comunidade Protheus-RH:https://chat.whatsapp.com/L5dUyAna6xU4ylG5DUgfOW
-Comunidade Protheus-Programação:https://chat.whatsapp.com/LsD6z0apdqKHlOz67bcaEn
-Comunidade Protheus-Framework:https://chat.whatsapp.com/BzUFpjaSnTC3vtsfa77jmG
*/
//Manipulações de Array - aAdd
User Function faAdd()
Local nI
Local cMsg := ""
Local aCarros := {}
//Aqui adicionamos elementos ao array aCarros
aAdd(aCarros,{1,"Onix"})
aAdd(aCarros,{2,"Palio"})
aAdd(aCarros,{3,"Uno"})
aAdd(aCarros,{4,"Jeep Compass"})
For nI:=1 To Len(aCarros)
cMsg += "Carro "+cValToChar(nI)+":"+aCarros[nI][2]
If(nI < Len(aCarros))
cMsg += ","
EndIf
Next nI
MsgAlert(cMsg)
Return
É isso aí, finalizamos aqui o post sobre a função aAdd em ADVPL, caso tenha ficado alguma dúvida deixe seu comentário ou nos envie um email para adiliocosta@protheusadvpl.com.br. Até um próximo post. Grande abraço e fica com Deus.
Link(s) de referência:
