Pour afficher le contenu de cette section, vous devez sélectionner une ligne d'appel de Structure de Données dans l'arbre de la partie gauche de l'onglet ou cliquer sur le bouton Ajouter Structure de Données. Cette section vous permet d'indiquer le code généré et l'emplacement COBOL ainsi que certaines caractéristiques physiques. Vous devez aussi sélectionner les Segments qui devront être pris en compte. A partir de cette section, vous pouvez aussi accéder aux onglets de l'éditeur de Structure de Données.
Valeur | Signification |
---|---|
Pour un programme batch | |
AA à ZZ et 0A à 0Z | Les lignes indiquées dans cet onglet seront
générées au début de la WORKING STORAGE Section. Par
rapport aux Structures de Données appelées dans l'onglet Lignes
-CD, ces lignes seront générées :
|
00 à 09, 1A à 19... 9A à 99 | Les lignes indiquées dans cet onglet seront générées dans la WORKING STORAGE Section, après toutes les Structures de Données ayant un emplacement COBOL inférieur au contenu de cette zone |
Pour un programme transactionnel | |
AA à 0Z | Les données seront générées en WORKING STORAGE Section. |
00 à 99 | Les données seront générées en LINKAGE Section. |
AA et 00 | Ces valeurs sont utilisées par le système pour des données générées automatiquement. |
99 | Avec un Numéro de ligne = 999, cette valeur est utilisée par le système pour l'instruction PROCEDURE DIVISION. Vous pouvez l'utiliser afin de créer une ligne de numéro de séquence 99999, qui remplacera la ligne PROCEDURE DIVISION générée automatiquement. |
$n | Dans une Macro paramétrée, vous pouvez paramétrer le contenu de cette zone. |
Le premier caractère doit être alphabétique mais le second peut être numérique ou alphabétique.
Il est conseillé, lorsqu'une Structure de Données ou un Etat n'est utilisé qu'une fois dans un programme, de prendre comme code généré le nom de l'instance (choisi lors de la création de l'instance). Cependant si la même instance est appelée plusieurs fois dans un programme, vous pouvez différencier ces appels.
Vous pouvez paramétrer le code de l'instance dans une Macro avec la valeur $n.
Valeur | Signification |
---|---|
Enregistrements redéfinis | Pas de clause VALUE générée |
1: Enregistrements sans valeurs initiales | Enregistrements à la suite (partie commune suivie
des différentes parties spécifiques), sans valeur initiale ni répétition
d'enregistrements. Si la description de la Structure de Données apparaît en FILE SECTION COBOL, la zone Nombre de niveaux du Segment doit avoir la valeur 2: niveaux COBOL 01 pour SD et 02 pour Segments. |
2: Enregistrements avec valeurs initiales | Enregistrements à la suite avec prise en compte
des valeurs initiales spécifiées sur les lignes d'appel des Rubriques
dans les Segments (onglet Lignes -CE), ou à défaut
initialisation à blanc ou zéro selon le format. Les valeurs initiales seront aussi générées pour les zones répétées, si le Langage généré de la Bibliothèque est D: COBOL II, 85, LE. |
3: Enregistrements avec occurs (avec niveau 2) | Enregistrements à la suite avec prise en compte
du nombre de répétitions indiqué dans la zone Nombre de
postes de l'onglet Définition du
Segment, sans valeurs initiales. Aucune clause VALUE ne sera générée. Si la description de la Structure de Données apparaît en FILE SECTION COBOL, la zone Nombre de niveaux du Segment doit avoir la valeur 2: niveaux COBOL 01 pour SD et 02 pour Segments. Ce type de description ne peut être employé pour une Structure de Données ayant un nombre de répétitions sur la partie commune (indiquez dans ce cas une Organisation W: Description de fichier en working et une Utilisation T: Table stockée en mémoire). |
4: Enregistrements avec occurs (avec niveau 3) | Enregistrements à la suite avec prise en compte
du nombre de répétitions indiqué dans la zone Nombre de
postes de l'onglet Définition du
Segment. La zone Nombre de niveaux du Segment doit avoir la valeur 3: niveau COBOL pour SD et Segments dépendant du type de description. Remarque spécifique au module Dialogue : L'indice n'est pas généré si le type de description est 4: Enregistrements avec occurs (avec niveau 3) et le Nombre de niveaux du Segment est 3: niveau COBOL pour SD et Segments dépendant du type de description, Le niveau 02 permet d'accéder à la table constituée par la répétition d'un même enregistrement (ddssT). Le niveau 01 regroupe l'ensemble des informations de la Structure de Données (partie commune et parties spécifiques répétées ou non). Ce type de description ne peut être employé pour une Structure de Données ayant un nombre de répétitions sur la partie commune (indiquez dans ce cas une Organisation W: Description de fichier en working et une Utilisation T: Table stockée en mémoire). |
Valeur | Commentaire |
---|---|
1: niveau COBOL 01 pour SD et Segments | Si la description de la S.D. apparaît en FILE
SECTION COBOL, les Segments doivent obligatoirement être
redéfinis. Si la Structure de Données est sans partie commune avec une description de type non redéfinie, le niveau de S.D. n'apparaît que lorsque le Type de description est positionné à Enregistrements redéfinis. |
2: niveaux COBOL 01 pour SD et 02 pour Segments | Si le Type de description est positionné à Enregistrements redéfinis, la S.D. et les Segments seront décrits au niveau 02 (Utilisez de préférence une organisation L: Working avec placement et définissez les nombres de niveaux supérieurs dans les zones de Working). |
3: niveau COBOL pour SD et Segments dépendant du type de description | Niveau 02 pour S.D. et niveau 03 pour Segments
lorsque le Type de description est positionné
à 1: Enregistrements sans valeurs initiales, 2:
Enregistrements avec valeurs initiales ou 3:
Enregistrements avec occurs (avec niveau 2). Niveau 01 pour S.D. et 03 pour Segments si le Type de description est positionné à 4: Enregistrements avec occurs (avec niveau 3). Niveau 03 pour S.D. et Segments si le Type de description est Enregistrements redéfinis. |
4: niveau COBOL 02 pour Rubriques, absence de niveau SD et Segments | Réservé aux S.D. avec une organisation L:
Working avec placement et une Utilisation D:
Fichier en sortie. Niveau 02 pour Rubriques groupe ou Rubriques élémentaires n'appartenant pas à un groupe. Les Rubriques élémentaires appartenant à une Rubrique groupe apparaissent mais les niveaux S.D et Segments disparaissent. Le niveau 01 doit être défini dans l'onglet Lignes -W. |
5: niveau COBOL 01 pour Rubriques, absence de niveau SD et Segments | Réservé aux S.D. avec une organisation L:
Working avec placement ou W: Description de
fichier en working et une Utilisation D:
Fichier en sortie. Niveau 01 pour les Rubriques groupe ou Rubriques élémentaires n'appartenant pas à un groupe. Les Rubriques élémentaires appartenant à un groupe apparaissent mais les niveaux S.D. et Segments disparaissent. |
Vous pouvez indiquer si la Structure de Données doit être générée dans la Working Storage Section, ou sous la forme de description d'une Table Pactables.
Vous pouvez aussi utiliser cette zone pour indiquer des descriptions base de données lorsque le module Description Bases de Données n'est pas utilisé. Les valeurs sont prises en compte par les Programmes de l'application.
Valeur | Commentaire |
---|---|
S: Séquentiel | Ceci est la seule valeur autorisée pour un Etat, un Fichier Séquentiel ou de Tri. |
V: VSAM, UFAS | Ceci est l'une des deux valeurs possibles (avec I:
Indexé) pour une Structure de Données de type Séquentiel
Indexé. Cette valeur fait générer la clause FILE STATUS et la zone correspondante, à condition que celle-ci soit déclarée dans la zone Zone complémentaire de la section Définition d'une ligne de -CD de l'onglet 'Lignes -CD' (la fenêtre qui s'ouvre quand vous appuyez sur le bouton Plus d'infos...). |
I: Indexé | Ceci est l'une des deux valeurs possibles (avec V:
VSAM, UFAS) pour une Structure de Données de type Séquentiel
Indexé. Pour un fichier ISP de code LE, seront
générées en WORKING 3 zones :
|
G: Description de table | Cette valeur provoque la génération de la zone de communication avec le module Pactables. |
L: Working avec placement | Les descriptions de fichiers sont générées dans la WORKING STORAGE SECTION, à l'emplacement que vous indiquez dans la zone Emplacement COBOL |
W: Description de fichier en Working | Les descriptions de fichiers sont générées dans
la WORKING STORAGE SECTION, avant la constante DEBUT-WSS. Une Structure de Données ainsi décrite sera utilisée comme zone de travail ou traitée à travers une fonction d'un système de gestion généralisé (Bases de Données par exemple). |
Y: Pacbench C/S | Appel de la Clause COPY qui correspond à la zone de communication entre le client et le serveur (Composants Applicatifs Pacbench C/S uniquement). |
X: Commentaire | Structure de Données mentionnée à titre de commentaire, ne donne lieu à aucune génération. |
2: Segments DB2 ou VAX/SQL | Génération-Description d'un Segment DB2 ou VAX/SQL. Seuls les accès physiques ne sont pas générés. La structure des indicateurs variables correspondant aux colonnes de la table DB2 ou VAX/SQL est toujours générée. |
Q: DB2 ou ALLBASE/SQL | (IBM) Description de Bases de Données SQL/DS,
DB2/2 ou DB2/6000. (HP 3000) Description de Bases de Données ALLBASE/SQL (MICROFOCUS) Description de Bases de Données DB2/2 ou DB2/6000. |
D: DL/1, IDS I et II | Réservé à la Description des Segments ou records de différentes Bases de Données, DL/1, IDS II, (suivant la variante du Programme), dans la génération de DBD, SYSGEN, schémas ou Programmes d'application (suivant la nature du Programme). |
B: IDMS | |
A: ADABAS | |
T: Fichiers 'TOTAL' | |
O: ORACLE (< V6) | |
C: INTEREL RDBC ou RFM | |
R: RDMS | |
4: DB2/400 | |
M: DATACOM DB | |
N: NONSTOP SQL | |
P: ORACLE V6 et V7 | |
9: INFORMIX, SYBASE, INGRES/SQL, ou SQL SERVER | |
Z: Structures de Données pour SOCRATE/CLIO | |
F: FORMAL pour SOCRATE/CLIO |
Cette zone est utilisée avec le module Pactables pour indiquer le sous-schéma qui va être décrit. Le sous-schéma est numérique, de 0 à 9 (0 correspond au sous-schéma 10)