Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
portuguese
Composition Setup
import.css=/download/attachments/3279126062824/newLayouttecnologia.css

Pagetitle

...

AIns

...

...

...

AIns

Inclui um elemento nulo na posição definida e 'empurra' os demais para frente descartando o último elemento.

Sintaxe

Bloco de código
collapsefalse
AIns( <
aDestino>
 aDest >, <
nPosicao> ) --> Nil 
 nPos > )

Parâmetros

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

 

...

 

Retorno

Nome

Tipo

Descrição

aRet

vetor

Retorna uma cópia do array indicado por aDest após a operação.

...

Observações

  • Essa função não altera a quantidade de elementos do array. Após inserir um elemento nulo na posição definida, os demais sobem uma posição e o último é descartado.

...

  • Se precisar adicionar um elemento sem perder o último, utilize a função AAdd.

...

  • Essa função, permite acrescentar um

...

  • elemento no final do array e, em seguida, inserir na posição desejada.

Exemplos

Bloco de código
themeEclipse
languagecpp
titleExemplo 1
linenumberstrue
collapsefalse
#DEFINE CRLF Chr(13)+Chr(10)



User Function 
Exemplo
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" )
Exemplo da função AIns
Image Removed

Resultado do Exemplo

Image Added

Image Added

Abrangência

Microsiga Protheus 8.11, Protheus 10

Veja

...

também

...