|
|
|
|
|
|
|
|
|
|
|
version 11 (Modifiée)
Lire numero derniere table 
Numérique
| Paramètre | Type | Description | ||||
| Cette commande ne requiert pas de paramètre | ||||||
| Résultat | Numérique |  | 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
Référence
Est un numero de table valide, Lire numero dernier champ, Nom de la table.
|
|
|
|
|
|
|
|
|
|
|