version 5
Numero enregistrement {(table)} Numérique
Paramètre | Type | Description | |
table | Table | Table de laquelle vous souhaitez obtenir le numéro | |
de l'enregistrement courant ou Table par défaut | |||
si ce paramètre est omis | |||
Résultat | Numérique | Numéro d'enregistrement courant |
Description
Numero enregistrement retourne le numéro de l'enregistrement courant de table. S'il n'y a pas d'enregistrement courant, par exemple si le pointeur d'enregistrement se trouve avant ou après la sélection courante, Numero enregistrement retourne -1. S'il s'agit d'un nouvel enregistrement qui n'a pas encore été sauvegardé, Numero enregistrement retourne -3.
Les numéros d'enregistrements peuvent varier. Par exemple, les numéros des enregistrements supprimés sont réutilisés. Les numéros d'enregistrements changent aussi si vous compactez votre base ou si vous faites une réparation par analyse des marqueurs d'enregistrements à l'aide de 4D Tools. Pendant une transaction, un enregistrement nouvellement créé a un numéro d'enregistrement temporaire. Après la validation de la transaction, l'enregistrement recevra un numéro d'enregistrement standard.
4D Server : Cette commande retourne un résultat différent dans le contexte de l'événement formulaire Sur validation suivant qu'elle est exécutée sur 4e Dimension ou 4D Client. En version monoposte, la commande retourne un numéro d'enregistrement (l'enregistrement est considéré comme déjà créé). En version client/serveur, la commande retourne -3 car dans ce cas, l'enregistrement est également déjà créé sur le serveur mais l'information n'a pas encore été envoyée au client.
Exemple
L'exemple suivant sauvegarde le numéro d'enregistrement courant puis cherche dans la table si un autre enregistrement a la même valeur :
$NumEnreg := Numero enregistrement ([Personnes]) ` Obtenir le numéro d'enregistrement ` Est-ce que quelqu'un d'autre a le même nom ? CHERCHER ([Personnes]; [Personnes]Nom = [Personnes]Nom) ` Afficher une alerte avec le nombre de personnes qui ont le même nom ALERTE ("Il existe " + Chaine (Enregistrements trouves ([Personnes]) + " personnes du même nom.") ALLER A ENREGISTREMENT ([Personnes]; $NumEnreg) ` Retourner à l'enregistrement original
Référence
A propos des numéros d'enregistrements, ALLER A ENREGISTREMENT, Nouvel enregistrement, Numero dans selection, Numerotation automatique.