4D v13.4
End selection
- 4D Language Reference
-
- Selection
-
- ALL RECORDS
- APPLY TO SELECTION
- Before selection
- DELETE SELECTION
- DISPLAY SELECTION
- Displayed line number
- End selection
- FIRST RECORD
- GET HIGHLIGHTED RECORDS
- GOTO SELECTED RECORD
- HIGHLIGHT RECORDS
- LAST RECORD
- MODIFY SELECTION
- NEXT RECORD
- ONE RECORD SELECT
- PREVIOUS RECORD
- Records in selection
- REDUCE SELECTION
- SCAN INDEX
- Selected record number
- TRUNCATE TABLE
End selection
| End selection {( aTable )} -> Function result | ||||||||
| Parameter | Type | Description | ||||||
| aTable | Table |
|
Table for which to test if record pointer is beyond the last selected record, or Default table, if omitted | |||||
| Function result | Boolean |
|
Yes (TRUE) or No (FALSE) | |||||
End selection returns TRUE when the current record pointer is beyond the last record of the current selection of aTable. End selection is commonly used to check whether or not NEXT RECORD has moved the current record pointer past the last record. If the current selection is empty, End selection returns TRUE.
To move the current record pointer back into the selection, use FIRST RECORD, LAST RECORD or GOTO SELECTED RECORD. PREVIOUS RECORD does not move the pointer back into the selection.
End selection also returns TRUE in the last footer when a report is being printed with PRINT SELECTION or from the Print menu. You can use the following code to test for the last footer and print a special footer for the last page:
` Method of a form being used as output form for a summary report
$vpFormTable:=Current form table
Case of
` ...
:(Form event=On Printing Footer)
` A footer is about to be printed
If(End selection($vpFormTable->))
` Code for the last footer goes here
Else
` Code for a footer goes here
End if
End caseThis form method is used during the printing of a report. It sets the variable vFooter to print in the Footer area on the last page:
` [Finances];"Summary" Form Method
Case of
` ...
:(Form event=On Printing Footer)
If(End selection([Finances]))
vFooter:="©2001 Acme Corp." ` Set the footer for the last page
Else
vFooter:="" ` Clear the footer for all other pages
End if
End case
Product: 4D
Theme: Selection
Number:
36
Created: < 4D v6
Before selection
Form event
LAST RECORD
NEXT RECORD
PRINT SELECTION
