Rational Programming Patterns for System z

Appel d'une Rubrique

Pour ouvrir la section Appel d'une Rubrique, cliquez sur une Rubrique appelée dans les lignes -CE d'un Segment ou d'une Table. Vous pouvez saisir ou modifier les valeurs dans les zones Répétitions et Indicateur de tri. Vous pouvez également redéfinir une Rubrique de même niveau COBOL, et ajouter d'autres caractéristiques en cliquant sur les boutons Plus d'infos et Lignes -G.

Répétitions
Les restrictions COBOL portant sur la clause OCCURS s'appliquent ici. Vous pouvez indiquer un nombre de répétitions au niveau d'une Rubrique élémentaire, d'un groupe ou d'un filler. Le nombre de répétitions est limité à 99.
Indicateur de tri
Permet de repérer les Rubriques susceptibles d'appartenir à un indicatif (ou argument) de tri ou d'être utilisées 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,...). 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é.
Rappel : S'il s'agit d'un groupe, son format doit être indiqué explicitement au niveau du Référentiel ou du Segment.
Tableau 1. Clés d'accès
Valeurs Signification
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.
U Clé unique pour une base DL/1.
M Clé multiple pour une base DL/1.
1 to 9 Index secondaire. Les autres valeurs désignent un champ 'recherche' (base DL/1).
0 to 9 Clé fichier physique AS400.
V Colonne de format variable (bases de données relationnelles).
Blanc Colonne de format fixe (bases de données relationnelles).
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
Redéfinition
La redéfinition est possible pour un Segment. Cela 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 (Lignes -CE). 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 compte; cela reste à votre 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.
Pour redéfinir une Rubrique, cochez la case Redéfinition. Une ligne Redéfinitions est créée sur une ligne -CE du Segment. Elle contient la Rubrique redéfinie et la précédente au même niveau dans la structure d'appel. Vous devez donner une valeur à la zone Répétitions dans la section Ensemble de redéfinitions.

Autres informations

Plus d'infos

Cliquez sur Plus d'infos pour ouvrir un assistant qui vous permet d'indiquer les infos sur le contrôle de présence et de classe d'une Rubrique appelée dans le Segment.

Lignes -G

Cliquez sur Lignes -G pour définir des lignes -GC d'une Rubrique appelée dans le Segment.

Un clic sur les boutons en fin de section permet de basculer dans les onglets de l'éditeur de la Rubrique appelée dans le Segment.