AJOUTER ENREGISTREMENT

4D - Documentation   Français   English   German   Español   4D v11 SQL, Commandes par thèmes   4D v11 SQL, Liste alphabétique des commandes   4D v11 SQL, Constantes par thèmes   Retour   Précédent   Suivant

version 5


AJOUTER ENREGISTREMENT ({table}{; }{*})

ParamètreTypeDescription
tableTableTable dans laquelle ajouter des données ou
Table par défaut si ce paramètre est omis
*Cacher les barres de défilement

Description

La commande AJOUTER ENREGISTREMENT permet à l'utilisateur de créer un nouvel enregistrement dans table ou dans la table par défaut si ce paramètre est omis.

AJOUTER ENREGISTREMENT crée un nouvel enregistrement pour table, en fait l'enregistrement courant pour le process courant et l'affiche dans le formulaire entrée courant. En mode Application, une fois que l'utilisateur a validé le nouvel enregistrement, la sélection courante est réduite à ce seul enregistrement.

L'écran suivant présente un formulaire typiquement utilisé pour la saisie de données :

Le formulaire est affiché dans la fenêtre se trouvant au premier plan du process. Elle comporte des barres de défilement et une case de contrôle de taille. Si vous passez le paramètre optionnel astérisque (*), ces éléments n'apparaîtront pas.

AJOUTER ENREGISTREMENT affiche le formulaire jusqu'à ce que l'utilisateur valide ou annule l'enregistrement. Si l'utilisateur ajoute plusieurs enregistrements, la commande doit être appelée pour chaque nouvel enregistrement.

L'enregistrement est sauvegardé si l'utilisateur clique sur un bouton du type Valider ou appuie sur la touche Entrée, ou encore si la commande VALIDER est exécutée.

L'enregistrement n'est pas sauvegardé si l'utilisateur clique sur un bouton du type Annuler ou appuie sur la touche d'annulation (Echap sous Windows, Esc sous Mac OS), ou encore si la commande NE PAS VALIDER est exécutée.

Après un appel à AJOUTER ENREGISTREMENT, la variable système OK prend la valeur 1 si l'enregistrement est validé et 0 s'il est annulé.

Note : Même lorsqu'il est annulé, l'enregistrement reste en mémoire et peut être sauvegardé avec la commande STOCKER ENREGISTREMENT si celle-ci est exécutée avant que le pointeur d'enregistrement courant ne soit modifié.

Exemples

(1) L'exemple suivant est une boucle souvent utilisée pour créer des enregistrements dans une base :

   FORMULAIRE ENTREE ([Clients]; "SaisieClients") ` Désigner le formulaire entrée de la table [Clients]
   Repeter ` Boucle jusqu'à ce que l'utilisateur annule 
      AJOUTER ENREGISTREMENT ([Clients];*) ` Ajouter un enregistrement dans la table [Clients] 
   Jusque (OK = 0) ` Jusqu'à ce que l'utilisateur annule

(2) L'exemple suivant permet de rechercher un client dans la base. Le déroulement de la méthode dépend du résultat de la recherche. Si aucun client n'a été trouvé, l'utilisateur est autorisé à créer un nouveau client à l'aide de la commande AJOUTER ENREGISTREMENT. Si au moins un client a été trouvé, le premier enregistrement est affiché pour modification, à l'aide de la commande MODIFIER ENREGISTREMENT :

   LECTURE ECRITURE ([Clients])
   FORMULAIRE ENTREE ([Clients]; "Entrée1") `  Désigner le formulaire entrée 
   vlClientNo:=Num(Demander ("Saisissez un numéro de client :")  ` On récupère le numéro du client
   Si (OK =1) 
      CHERCHER ([Clients]; [Clients]ClientNo = vlClientNo) ` Recherche du client 
      Si (Enregistrements trouves([Clients]) = 0) ` Si aucun client n'a été trouvé… 
         AJOUTER ENREGISTREMENT([Clients]) `Ajout d'un nouveau client 
      Sinon 
         Si(Non(Enregistrement verrouille([Clients])))
            MODIFIER ENREGISTREMENT([Clients]) `Modifier l'enregistrement 
            LIBERER ENREGISTREMENT([Clients])
         Sinon
            ALERTE("Cet enregistrement est en train d'être modifié.")
         Fin de si
      Fin de si
   Fin de si

Variables et ensembles système

La variable système OK prend la valeur 1 si l'enregistrement est validé et 0 s'il est annulé.

Référence

CREER ENREGISTREMENT, MODIFIER ENREGISTREMENT, NE PAS VALIDER, STOCKER ENREGISTREMENT, VALIDER.


4D - Documentation   Français   English   German   Español   4D v11 SQL, Commandes par thèmes   4D v11 SQL, Liste alphabétique des commandes   4D v11 SQL, Constantes par thèmes   Retour   Précédent   Suivant