Nesse vídeo demonstraremos em como inserir elementos em uma determinada posição de um Array através da função aIns.
Inscreva-se no Canal
Abaixo o código fonte desenvolvido para o exemplo em vídeo acima:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 | //Bibliotecas#Include "TOTVS.ch"/*/{Protheus.doc} User Function zExe029Exemplo de função para inserir um elemento no array@type Function@author Atilio@since 26/11/2022@see https://tdn.totvs.com/display/tec/AIns@obs Função aIns Parâmetros + Array que terá o elemento inserido + Posição numérica de inserção do elemento **** Apoie nosso projeto, se inscreva em https://www.youtube.com/TerminalDeInformacao ****/*/User Function zExe029() Local aArea := FWGetArea() Local aNomes := {} //Adicionando os nomes aAdd(aNomes, "Daniel") aAdd(aNomes, "João") aAdd(aNomes, "Maria") //Redimensiona o Array, Aumentando uma posição, vai ficar como: ["Daniel", "João", "Maria", Nil] aSize(aNomes, Len(aNomes) + 1) //Insere o elemento na posição 2, vai ficar como: ["Daniel", Nil, "João", "Maria"] aIns(aNomes, 2) //Agora altera a posição 2 aNomes[2] := "José" //Exibe agora o que está na posição 2 FWAlertInfo("Posição 2 é " + aNomes[2], "Exemplo de aIns") FWRestArea(aArea)Return |
Bom pessoal, por hoje é só.
Abraços e até a próxima.
