End selection
End selection {( laTable )} -> Résultat
| Paramètre | Type | Description | |
|---|---|---|---|
| laTable | Table | 🡒 | Table pour laquelle tester si le pointeur d'enregistrement courant est au-delà du dernier enregistrement de la sélection courante ou Table par défaut si ce paramètre est omis |
| Résultat | Booléen | 🡐 | Oui (Vrai), Non (Faux) |
Description
La fonction End selection retourne Vrai lorsque le pointeur de l'enregistrement courant se trouve après le dernier enregistrement de la sélection courante de laTable. End selection est généralement utilisée pour tester si l'appel à la commande NEXT RECORD place ou non le pointeur d'enregistrement courant derrière le dernier enregistrement de la sélection. Si la sélection courante est vide, End selection retourne Vrai.
Pour replacer le pointeur d'enregistrement courant dans la sélection, utilisez les commandes FIRST RECORD, LAST RECORD ou GOTO SELECTED RECORD. PREVIOUS RECORD ne replace pas le pointeur dans la sélection.
End selection retourne également Vrai lors de l'impression du dernier pied de page d'un état, déclenchée par la commande PRINT SELECTION ou le menu Imprimer. Vous pouvez utiliser l'instruction suivante pour intercepter le dernier pied de page et insérer une mention particulière :
// Méthode d'un formulaire sortie utilisé pour imprimer un état
$vpFormTable:=Current form table
Case of
// ...
:(Form event code=On Printing Footer)
// Un pied
If(End selection($vpFormTable->))
// Le code pour le dernier pied de page doit être placé ici
Else
// Le code pour le pied de page doit être placé ici
End if
End case
Exemple
La méthode formulaire de l'exemple suivant est utilisée lors de l'impression d'un état. Elle crée la variable VPied, à imprimer dans le pied de page de la dernière page :
// Méthode formulaire [Finances];"Tableau"
Case of
// ...
:(Form event code=On Printing Footer)
If(End selection([Finances]))
VPied:="©1997 SARL Dupont" // Définir le pied de page de la dernière page
Else
VPied:="" // Effacer le pied de page pour toutes les autres pages
End if
End case
Voir aussi
Before selection
Form event code
LAST RECORD
NEXT RECORD
PRINT SELECTION