Histórico da Página
| Composition Setup |
|---|
import.css=/download/attachments/3279126062824/newLayouttecnologia.css |
|
| Pagetitle |
|---|
...
|
...
...
...
|
Preenche um array com um único valor de qualquer tipo de dados (inclusive array´s, blocos de código ou nulo) na faixa especificada.
Sintaxe
| Bloco de código | ||
|---|---|---|
| ||
AFill( <aDestino> aDest >, <ValorExp> xValue >, [nInicio nStart ], [nCont nCount ] )--> Nil
|
Parâmetros
...
Nome | Tipo | Descrição | Obrigatório | Referência |
|---|
...
aDest |
...
vetor | Indica o array que será preenchido. | X |
|
...
xValue |
...
any | Indica o valor que será alocado em cada elemento do array. O conteúdo desse parâmetro, pode ser uma expressão de qualquer tipo de dado válido. | X |
|
...
nStart |
...
numérico | Indica a posição do primeiro elemento que será preenchido. |
...
|
|
...
nCount |
...
numérico | Indica a quantidade de elementos que serão preenchidos começando com o elemento do parâmetro. |
|
|
Retorno
Nome | Tipo | Descrição |
|---|---|---|
aRet | vetor | Retorna uma cópia do array indicado por aDest após a operação. |
...
Observações
- Caso nStart não seja especificado, é considerado o valor 1.
- Caso nCount não seja especificado, os elementos são preenchidos a partir da posição do elemento inicial até o final do array.
Exemplos
| Bloco de código | ||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||||||
#DEFINE CRLF Chr(13)+Chr(10)User FunctionExemplo afill1() Local aExemplo := {} Local cMensagem := "" //+----------------------------------------------------------------------------+ //|Exemplifica o uso da função AFill | //+----------------------------------------------------------------------------+ ASize( aExemplo, 5 ) AFill( aExemplo, "X" ) AFill( aExemplo, "Y", 2, 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]) //+----------------------------------------------------------------------------+ //|Apresenta uma mensagem com os resultados obtidos | //+----------------------------------------------------------------------------+ Return MsgInfo( cMensagem, "Exemplo do AFill" )Exemplo da função AFill |
Resultado do Exemplo
Abrangência
Microsiga Protheus 8.11, Protheus 10
Veja
...
também
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas