CREER SOUS ENREGISTREMENT

version 11 (Modifiée)

CREER SOUS ENREGISTREMENT (sousTable)

Note de compatibilité : Les sous-tables ne sont plus prises en charge à compter de la version 11 de 4D. Un mécanisme de compatibilité assure le fonctionnement de cette commande dans les bases de données converties, toutefois il est fortement conseillé de remplacer les sous-tables par des tables liées standard.

CREER SOUS ENREGISTREMENT crée un nouveau sous-enregistrement dans sousTable et en fait le sous-enregistrement courant. Ce nouveau sous-enregistrement n'est sauvegardé que lorsque l'enregistrement parent est lui-même sauvegardé. L'enregistrement parent peut être sauvegardé par une commande telle que STOCKER ENREGISTREMENT ou lorsque l'utilisateur le valide. S'il n'y a pas d'enregistrement courant, CREER SOUS ENREGISTREMENT ne fait rien. Pour ajouter un nouveau sous-enregistrement dans un formulaire de saisie de sous-enregistrements, utilisez AJOUTER SOUS ENREGISTREMENT.

L'exemple suivant est la méthode objet d'un bouton. Lorsqu'elle est exécutée (lorsque l'utilisateur clique sur le bouton), elle crée de nouveaux sous-enregistrements pour des enfants. La boucle Repeter permet à l'utilisateur d'ajouter plusieurs enfants, jusqu'à ce qu'il clique sur Annuler. Le formulaire fait apparaître les enfants dans un sous-formulaire, mais ne permet pas d'y saisir directement des données car l'option "Saisissable" a été désactivée :

   Repeter
         ` Répéter jusqu'à ce que l'utilisateur clique sur Annuler
      vEnfant := Demander("Prénom (annuler si terminé) :") 
      Si (OK = 1) 
            ` Création d'un nouveau sous-enregistrement pour un enfant 
         CREER SOUS ENREGISTREMENT([Personnes]Enfants)
            ` Assignation du prénom de l'enfant au sous-champ
         [Personnes]Enfants'Prénom := vEnfant   
      Fin de si
   Jusque (OK = 0)

AJOUTER SOUS ENREGISTREMENT, MODIFIER SOUS ENREGISTREMENT, STOCKER ENREGISTREMENT, SUPPRIMER SOUS ENREGISTREMENT.