4D Doc Center : Fin de selection

4D v14.3

Fin de selection


Fin de 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 Fin de selection retourne Vrai lorsque le pointeur de l'enregistrement courant se trouve après le dernier enregistrement de la sélection courante de laTable. Fin de selection est généralement utilisée pour tester si l'appel à la commande ENREGISTREMENT SUIVANT place ou non le pointeur d'enregistrement courant derrière le dernier enregistrement de la sélection. Si la sélection courante est vide, Fin de selection retourne Vrai.

Pour replacer le pointeur d'enregistrement courant dans la sélection, utilisez les commandes ALLER A DERNIER ENREGISTREMENT, DEBUT SELECTION ou ALLER DANS SELECTION. ENREGISTREMENT PRECEDENT ne replace pas le pointeur dans la sélection.

Fin de selection retourne également Vrai lors de l'impression du dernier pied de page d'un état, déclenchée par la commande IMPRIMER 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:=Table du formulaire courant

 Au cas ou

  ` ...

    :(Evenement formulaire=Sur impression pied de page)

  ` Un pied

       Si(Fin de selection($vpFormTable->))

  ` Le code pour le dernier pied de page doit être placé ici

       Sinon

  ` Le code pour le pied de page doit être placé ici

       Fin de si

 Fin de cas

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"

 Au cas ou

  ` ...

    :(Evenement formulaire=Sur impression pied de page)

       Si(Fin de selection([Finances]))

          VPied:="©1997 SARL Dupont" ` Définir le pied de page de la dernière page

       Sinon

          VPied:="" ` Effacer le pied de page pour toutes les autres pages

       Fin de si

 Fin de cas