4D Doc Center : CREER SOUS ENREGISTREMENT

4D v14.3

CREER SOUS ENREGISTREMENT


CREER SOUS ENREGISTREMENT ( sousTable )

Paramètre	Type	Description
sousTable	Sous-table	Sous-table dans laquelle vous voulez créer un sous-enregistrement

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.

Description

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.

Exemple

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)