End selection
End selection {( tabela )} -> Resultado
Parâmetro | Tipo | Descrição | |
---|---|---|---|
tabela | Table | → | Tabela na qual provar se o ponteiro do registro está além do último registro selecionado, ou Tabela por padrão, se omitida |
Resultado | Boolean | ← | Sim (TRUE) ou Não (FALSE) |
Descrição
End selection retorna TRUE quando o ponteiro do registro atual está além do último registro da seleção atual de tabela. End selection se utiliza geralmente para testar se a chamada ao comando NEXT RECORD ha movido ou não o ponteiro do registro atual detrás do último registro da seleção. Se a seleção atual está vazia, End selection retorna TRUE.
Para mover o ponteiro do registro atual dentro da seleção, utilize FIRST RECORD, LAST RECORD ou GOTO SELECTED RECORD. PREVIOUS RECORD não mova o ponteiro à seleção.
End selection retorna também TRUE quando o último rodapé de um relatório se imprime com PRINT SELECTION ou desde o menu Imprimir. Pode utilizar o seguinte código para testar o último rodapé e imprimir um rodapé especial para a última página:
// Método de um formulário de saída utilizado para imprimir um relatório $vpFormTabela:=Current form table
 Case of
  // ...
 :(Form event code=On Printing Footer)
  // Um rodapé será impresso
 If(End selection($vpFormTabela->))
  // O código para o último rodapé vai aqui
 Else
  // O código para o rodapé vai aqui
End if
End case
Exemplo
Este método de formulário é utilizado durante a impressão de um relatório. Ele define a variável vPie a imprimir na área de rodapé da última página:
// [Finanças];"Resumo" Método de formulário
Case of
// ...
:(Form event code=On Printing Footer)
If(End selection([Finanças]))
vPie:="©2001 Acme Corp." // Definir o rodapé da última página
Else
vPie:="" // Apagar o rodapé para todas as outras páginas
End if
End case
Ver também
Before selection
Form event code
LAST RECORD
NEXT RECORD
PRINT SELECTION