FORM GET ENTRY ORDER
FORM GET ENTRY ORDER ( objectNames {; numPagina | * } )
| Parâmetro | Tipo | Descrição | |
|---|---|---|---|
| objectNames | Array texto | 🡘 | Nomes de objeto ordenados por ordem de entrada |
| numPagina | * | Inteiro longo, Operador | 🡒 | Número de página para o qual obter a ordem definida de entrada (página atual se omitida) |
Descrição
O comando FORM GET ENTRY ORDER devolve em nomObjetos os nomes ordenados dos objetos que definem a ordem de entrada do formulario.
- Se não passar o parâmetro *, FORM GET ENTRY ORDER devolve a ordem de entrada como foi declarado anteriormente com o comando FORM SET ENTRY ORDER. Pode omitir ou passar o parâmetro numPag:
- Se omitir o parâmetro numPag, o array nomObjetos devolve a ordem de entrada para a página atual,
- Se passar o parâmetro numPag, o array nomObjetos devolve a ordem de entrada para a página numPag.
Em ambos casos, se o comando FORM SET ENTRY ORDER não foi chamado previamente para o formulário atual, o array nomObjetos é devolvido vazio.
- Se passar o parâmetro *, FORM GET ENTRY ORDER devolve a ordem de entrada atual da página atual, ou seja, o array nomObjetos só contém nomes de objeto válidos ( (para mais informação sobre objetos válidos, consulte a descrição do comando FORM SET ENTRY ORDER). A ordem de entrada de formulário real pode ser:
- A ordem de entrada de formulario predeterminado, baseada na superposição de objetos,
- Ou a ordem de entrada do editor de formulários (ver Modificar a ordem de entrada dos dados), se tiver sido utilizado,
- Ou a ordem de entrada definido por uma chamada ao comando FORM SET ENTRY ORDER no processo atual, se tiver sido utilizado.
A ordem de entrada real sempre inclui objetos da página 0 e dos formulários herdados.
Nota: a ordem de entrada dentro de um subformulario não é devolvida quando se aplica este comando ao formulário pai.
Exemplo
Pode excluir certos objetos da ordem de entrada:
ARRAY TEXT($arrTabOrderObject;0)
var $vElem : Integer
FORM GET ENTRY ORDER($arrTabOrderObject;*) //obter a ordem de entrada atual
Repeat
$vElem:=Find in array($arrTabOrderObject;"vTax@")
If($vElem>0) //exclui objetos cujo nome começa por "vTax" da ordem de entrada de dados
DELETE FROM ARRAY($arrTabOrderObject;$vElem)
End if
Until($vElem<0)
FORM SET ENTRY ORDER($arrTabOrderObject) //aplica a nova ordem de entrada