Appel d'un Segment

Dans le tableau ou la section Appel d'un Segment, vous devez indiquer les caractéristiques de l'appel du Segment. Il n'est pas possible d'appeler un Segment depuis une Table. Pour les fichiers et bases de données représentés par des Segments, vous devez indiquer l'indicateur de tri et les répétitions. Vous pouvez aussi accéder à l'éditeur du Segment pour d'éventuelles mises à jour.

Remarque : Un appel de Segment est considéré comme un appel de Rubrique élémentaire.
Répétitions
Vous pouvez indiquer un nombre de répétitions au niveau d'une Rubrique élémentaire, d'un groupe ou d'un filler. Les restrictions COBOL portant sur la clause OCCURS s'appliquent.
Indicateur de tri
Cette zone vous permet d'identifier une Rubrique appartenant à un indicatif (ou argument) de tri ou pouvant être utilisée comme clé d'accès à un fichier, une base de données ou à une Table Pactables.
Remarque : Il est vivement recommandé de dédier un Segment à un seul type d'utilisation. Toute Rubrique susceptible d'appartenir à un indicatif de tri doit être repérée par un caractère (chiffre ou lettre). Un même caractère ne peut être utilisé qu'une seule fois dans la description du Segment. Il est recommandé d'utiliser des suites (1, 2, 3 par exemple). L'ordre réel de tri du fichier sera indiqué au niveau du Programme, en listant les caractères repères dans l'ordre souhaité sur l'appel des Structures de données (-CD).

S'il s'agit d'un groupe, son format doit être indiqué explicitement au niveau du référentiel ou du Segment. Les indicatifs sont interdits pour une Rubrique qui redéfinit une autre Rubrique.

Tableau 1. Valeurs possibles de l'indicatif de tri pour Pactables
Valeurs Commentaires
U Clé d'accès de la Table. Cette valeur doit être indiquée sur la Rubrique groupe si la clé est sous-définie.
S Rubrique définissant l'appartenance à un sous-système
Tableau 2. Valeurs possibles de l'indicatif de tri pour les bases de données DL/1
Valeurs Commentaires
U Clé unique pour bases de données DL/1.
M Clé multiple pour bases de données DL/1.
1 à 9 Index secondaire. Toute autre valeur désigne un champ de recherche.
Tableau 3. Valeurs possibles de l'indicatif de tri pour AS400 et les bases relationnelles
Valeurs Commentaires
0 à 9 Clé fichier physique AS400. Bases de données relationnelles.
V Colonne de format variable.
Blanc Colonne de format fixe.
W Pour DB2 SQL, SQL/DS et ORACLE, génération d'une VARCHAR, quelle que soit sa longueur.
L Pour DB2 SQL, SQL/DS et ORACLE, génération d'une LONG VARCHAR.
Remarque : les indicatifs sont interdits pour une Rubrique qui redéfinit une autre Rubrique.
Redefines
La redéfinition est possible pour un Segment ou une Vue Logique. Elle regénère la clause COBOL REDEFINES. La Rubrique qui porte cette option redéfinit la Rubrique de même niveau COBOL qui la précède dans la composition du Segment. Si une Rubrique qui redéfinit une autre Rubrique fait partie d'un groupe, elle est considérée comme une Rubrique élémentaire. Elle doit être prise en compte dans le calcul du nombre de Rubriques contenues dans un groupe (excepté pour les Segments de la base DL/1).
Remarque : Lorsque les Rubriques sont redéfinies, leurs longueurs respectives ne sont pas prises en charge. Pour le calcul de la longueur d'adresse, la longueur de Rubrique redéfinie est utilisée. Les Rubriques redéfinies sont ignorées lors de la génération avec le module de Description de Base de Données. Si la case Redéfini est cochée, aucune valeur initiale ne peut être saisie.

Pour redéfinir une Rubrique, cochez l'option Redéfinition. Une ligne Ensemble de redéfinitions est créée dans la liste des lignes d'appels ; elle contient la Rubrique redéfinie et la Rubrique de même niveau qui la précède. Vous devez ensuite indiquer le nombre de Répétitions dans la section Ensemble de redéfinitions.

Lignes -G

Cliquez sur le bouton Lignes -G pour consulter ou modifier les lignes -GC du Segment appelé.

Un clic sur l'un des boutons de la section Appel d'un Segment permet de basculer vers l'éditeur du Segment appelé.

Vos commentaires