Inclui um elemento nulo na posição definida e 'empurra' os demais para frente descartando o último elemento.
AIns( < aDest >, < nPos > )
Nome | Tipo | Descrição | Obrigatório | Referência |
---|---|---|---|---|
aDest | vetor | Indica o array que será manipulado. | X |
|
nPos | numérico | Indica a posição, a partir da primeira, na qual será inserido um elemento nulo. | X |
|
Nome | Tipo | Descrição |
---|---|---|
aRet | vetor | Retorna uma cópia do array indicado por aDest após a operação. |
#DEFINE CRLF Chr(13)+Chr(10) User Function ains1() Local aExemplo := { 1, 2, { 11, 22, 33 }, 4, 5 } Local cMensagem := "" //+----------------------------------------------------------------------------+ //|Exemplifica o uso da função AIns | //+----------------------------------------------------------------------------+ AIns( aExemplo[3], 2 ) AIns( aExemplo, 2 ) AIns( aExemplo, 3 ) cMensagem += "aExemplo[1] = " + cValToChar( aExemplo[1] ) + CRLF cMensagem += "aExemplo[2] = " + cValToChar( aExemplo[2] ) + CRLF cMensagem += "aExemplo[3] = " + cValToChar( aExemplo[3] ) + CRLF cMensagem += "aExemplo[4] = " + cValToChar( aExemplo[4] ) + CRLF cMensagem += "aExemplo[5] = " + cValToChar( aExemplo[5] ) varinfo( "aExemplo", aExemplo ) //+----------------------------------------------------------------------------+ //|Apresenta uma mensagem com os resultados obtidos | //+----------------------------------------------------------------------------+ Return MsgInfo( cMensagem, "Exemplo do AIns" )
Microsiga Protheus 8.11, Protheus 10