Pour afficher le détail de la section Définition d'une Rubrique non définie, cliquez sur une ligne contenant une Rubrique non définie dans les lignes -CE du Segment ou de la Table. Vous devez saisir un certain nombre d'informations pour définir une Rubrique au niveau du Segment/Table : son nom, son libellé, son format interne, usage, répétitions, et indicateur de tri. Vous pouvez également redéfinir une Rubrique de même niveau COBOL en cochant la case Redéfinition. D'autres caractéristiques associées à la Rubrique définie dans le Segment peuvent être complétées en cliquant sur Plus d'infos. Cliquez sur Lignes -G pour spécifier les -GC, -GE ou -GG de cette Rubrique.
Certains noms de Rubriques ont un emploi réservé dans les Structures de Données, les Etats ou les Ecrans. Leur définition est donc interdite :
Nom | Réservé pour |
---|---|
FILLER | Alignement des champs |
ENPR GRPR ERUT |
Contrôle d'erreur sur les fichiers mouvements
(options du module Langage Batch) : Contrôle d'erreurs des Rubriques Contrôle d'erreurs des Segments Contrôle d'erreurs définies par l'utilisateur |
Vous devez assurer la compatibilité entre le format interne et le format d'entrée.
Valeur | Signification |
---|---|
D | Date sans siècle (JJMMAA ou MMJJAA) |
I | Date sans siècle (AAMMJJ) |
E | Date sans siècle (JJ/MM/AA ou MM/JJ/AA) |
S | Date avec siècle (SSAAMMJJ) |
C | Date avec siècle (JJMMSSAA ou MMJJSSAA) |
M | Date avec siècle (JJ/MM/SSAA ou MM/JJ/SSAA) |
G | Format grégorien (SSAA-MM-JJ) |
T | Format TIME (HH:MM:SS) |
TS | Format TIMESTAMP |
Pour l'utilisation des formats avec les différents types de blocs bases de données, se reporter aux tableaux récapitulatifs du chapitre Colonnes : Rubriques dans le Manuel DBD relationnelles SQL, disponible à l'URL suivante :
http://www-1.ibm.com/support/docview.wss?rs=37&context=SSEP67&uid=swg27005478
La clause USAGE d'une variable COBOL numérique permet d'indiquer la présentation interne de sa valeur. Il existe plusieurs USAGEs en fonction des variantes COBOL adaptées au matériel.
Valeur | Signification |
---|---|
B | COMPUTATIONAL-1 ICL 1900 BINARY-1 UNISYS 1100 |
C | COMPUTATIONAL type IBM ou équivalent; BINARY type IBM et variante COBOL II. |
D | DISPLAY (option par défaut,
sauf pour les Rubriques de type Unicode), tout matériel. Obligatoire pour les Rubriques représentant des dates. |
F | COMPUTATIONAL-1 IBM ou équivalent. COMPUTATIONAL-9 BULL GCOS7. COMPUTATIONAL-11 GCOS8. DBD Relationnelles : virgule flottante simple précision. |
G | COMPUTATIONAL SYNCHRONIZED RIGHT ICL
2900 COMPUTATIONAL-5 MICRO FOCUS. |
H | COMPUTATIONAL UNISYS 2200. BINARY UNISYS 2200 (COBOL 85) |
I | DISPLAY-1 UNISYS 2200 |
J | COMPUTATIONAL-6 GCOS8. REAL UNISYS-A. |
N | COMPUTATIONAL-4 cadré sur un
demi-octet. En cas de longueur impaire, le complément n'est pas
généré; vous devez donc l'ajouter. NATIONAL (option par défaut) pour les Rubriques de type 'Unicode' (type 'U'). |
O | COMPUTATIONAL-4 UNISYS 2200 |
P | COMPUTATIONAL-1GCOS8. |
Q | COMPUTATIONAL GCOS8. |
R | COMPUTATIONAL SYNCHRONIZED RIGHT, IBM ou équivalent. Cet usage est recommandé, de préférence à l'usage C, lorsque les données binaires sont cadrées sur des adresses paires, car les instructions COBOL les concernant sont plus performantes. |
T | COMPUTATIONAL-3 PACKED SYNC. GCOS8. |
U | COMPUTATIONAL-1 UNISYS 2200. |
W | COMPUTATIONAL-2 UNISYS 2200. COMPUTATIONAL-12 GCOS8. DBD Relationnelles : virgule flottante double précision. |
X | DISPLAY SIGN IS TRAILING SEPARATE CHARACTER. ou NATIONAL SIGN IS TRAILING SEPARATE CHARACTER pour les Rubriques de type 'Unicode' (type 'U'). |
Y | DB-KEY GCOS8. POINTER IBM and MICRO FOCUS |
Z | Option réservée au batch : permet de faire générer une clause BLANK WHEN ZERO, cette option n'étant utilisable qu'avec un format d'édition. |
0 | COMPUTATIONAL-7 GCOS8 |
1 | DISPLAY SIGN LEADING SEPARATE -
UNISYS 2200, GCOS8, IBM, TANDEM, GCOS7. or NATIONAL SIGN IS LEADING SEPARATE CHARACTER pour les Rubriques de type 'Unicode' (type 'U'). |
2 | DISPLAY-2 GCOS8 = DISPLAY, la comparaison de zones de ce type se fait suivant la ″commercial collating sequence″ et non suivant la séquence standard. |
3 | COMPUTATIONAL-3 IBM ou équivalent. COMPUTATIONAL GCOS7 PACKED-DECIMAL UNISYS 2200 (COBOL 85) |
5 | COMPUTATIONAL-1 GCOS7 GCOS8 |
6 | COMPUTATIONAL-2 GCOS7 GCOS8 |
7 | COMPUTATIONAL-5 ICL 2900. |
8 | COMPUTATIONAL BULL 66 GCOS8. |
9 | COMPUTATIONAL-3 GCOS7 and GCOS8. |
Pour les Rubriques non définies, une fois le format interne défini, sélectionnez une valeur pour l'usage (la valeur par défaut est 'D' pour l'affichage).
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 |
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. |
Valeurs | Commentaires |
---|---|
0 to 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. |
Cliquez sur lel bouton Plus d'infos pour spécifier les types de contrôle sur les Rubriques appelées dans le Segment (contrôle de présence et de classe).
Cliquez sur Lignes -G pour définir des lignes -GC d'une Rubrique appelée dans le Segment.