4D Doc Center : Lire numero derniere table

4D v14.3

Lire numero derniere table


Lire numero derniere table -> Résultat

Paramètre	Type	Description
Résultat	Entier long	Numéro de table le plus élevé dans la base

Description

Lire numero derniere table retourne le numéro de table le plus élevé parmi les tables de la base.
Les tables sont numérotées dans l’ordre dans lequel elles ont été créées. Si aucune table n’a été supprimée dans la base, cette commande retourne donc le nombre de tables présentes dans la base. Dans le cadre de boucles itératives sur les numéros de tables de la base, vous devez utiliser la commande Est un numero de table valide afin de vérifier que la table n’a pas été supprimée.

Exemple

L’exemple suivant initialise les éléments du tableau tabTables. Ce tableau peut être utilisé comme liste déroulante (ou onglets, zone de défilement, etc.) pour afficher dans un formulaire la liste des tables de la base :

 TABLEAU ALPHA(31;tabTables;Lire numero derniere table)

 Si(Lire numero derniere table>0) `si la base contient bien des tables

    Boucle($vlTables;Taille tableau(tabTables);1;-1)

       Si(Est un numero de table valide($vlTables))

          tabTables{$vlTables}:=Nom de la table($vlTables)

       Sinon

          SUPPRIMER DANS TABLEAU(tabTables;$vlTables)

       Fin de si

    Fin de boucle

 Fin de si