4D v16.3

End selection

Accueil

 
4D v16.3
End selection

End selection 


 

End selection {( laTable )} -> Résultat 
Paramètre Type   Description
laTable  Table in 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 in Oui (Vrai), Non (Faux)

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=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=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
LAST RECORD
NEXT RECORD
PRINT SELECTION

 
PROPRIÉTÉS 

Produit : 4D
Thème : Sélections
Numéro : 36

Commande(s) éligible(s) à l'exécution dans un process préemptif

 
HISTORIQUE 

Créé : < 4D v6

 
UTILISATION DE L'ARTICLE

4D - Langage ( 4D v16)
4D - Langage ( 4D v16.1)
4D - Langage ( 4D v16.2)
4D - Langage ( 4D v16.3)