Rational Developer for System z, Version 7.5

reuse

http://www-1.ibm.com/support/docview.wss?rs=37&context=SSEP67&uid=swg27005478

Creation wizard

Projet
Sélextionnez un projet dans la liste dêroulante ou saisissez le nom d'un projet dans laquelle l'instance sera sauvegardée.

Un projet représente la répartition physique de vos instances dans le plan de travail. Il regroupe des répertoires et des fichiers. Il sert á organiser les ressources qui pourront être ensuite être générées, partagées ou versionnèes.

Un projet Pacbase contient un sous-ensemble de fichiers qui correspondent aux modèles et/ou sources générés contituant une application Pacbase.

Il peut y avoir plusieurs projets par référentiel (un référentiel est l'équivalent d'une base de données)

Package
Sélextionnez un package dans la liste dêroulante ou saisissez le nom d'un nouveau package.

Un package est un regroupement logique d'informations.

Les ressources logiques contenues dans un package peuvent être réparties dans plusieurs projets.

Dans la Vue 'Navigateur' de la perspective 'Design', vous pourrez voir que les packages représentent les branches de vos projets. Chaque package contient ses propres instances.

Pour les ressources transférées depuis Pacbase, la convention de nommage d'un package est la suiante : {Nom du référentiel}.{Chemin de la Bibliothèque}.{Nom de la Bibliothèque}. Il est donc conseillé de respecter ces règles de nommage lors de la création d'un package. Pour refléter la hiérarchie des Bibliothèques, saisissez les noms de Bibliothèques (en commençant par la Bibliothèque la plus haute dans la hiérarchie) en les séparant par un point (ex: 'COM.CIF'). La Vue 'Navigateur' affichera ainsi une branche de premier niveau, COM, avec ses instances, et une branche de deuxième niveau, CIF, avec ses propres instances.

Définition des paramètres de génération
Les paramètres de génération sont définis dans les Bibliothèques. Ces paramètres sont liés à l'adaptation au système d'exploitation utilisé.

Pour sélectionner une Bibliothèque, cliquez sur le bouton Modifier....

Libellé
Saisissez le libellé identifiant l'instance. Il constituera un critère de recherche lors d'une recherche d'instance.
Ouvrir l'éditeur après la création
Cochez cette boîte pour que l'éditeur de l'instance en création s'ouvre automatiquement. L'éditeur s'ouvrira sur l'onglet 'Vue d'ensemble'. Depuis cet onglet, vous pourrez accéder aux autre onglets de l'instance afin d'en indiquer toutes les caractéristiques.
Format interne
Ce format, affiché aussi dans l'onglet Vue d'ensemble, est obligatoire, sauf si la Rubrique est une Propriété.
Ce format est utilisé lorsque la Rubrique est appelée dans un :
  • Fichier de l'application (fichier permanent, base de données, fichier temporaire),
  • Ecran en entrée de la zone, si aucun format conversationnel n'est indiqué (voir la zone Type de ligne dans l'onglet Lignes -D de l'éditeur de Rubrique).
Ce format est transféré automatiquement vers les Segments où se fait l'appel de Rubrique. Mais vous pouvez finalement choisir le format approprié dans l'onglet Lignes -CD des Programmes qui appellent ces Segments.

Vous devez assurer la compatibilité entre le format interne et le format d’entrée.

Vous devez saisir le format interne comme une picture Cobol, sans caractères d’édition.
Notes:
  • Dans la majorité des cas, le format de type numérique d’une Rubrique est entré tel quel. Toutefois, s’il excède 10 caractères, ivous devez supprimer le 9 après la virgule. (par exemple, le format S9(10)V9(3) qui occupe 11 caractères sera entré sous la forme S9(10)V(3) qui n’occupe que 10 caractères, mais il sera généré sous la forme S9(10)V9(3).
  • Pour les Rubriques de type ’Unicode’ (type U), vous devez indiquer N(n) ou un format numérique signé ou non.
La clause INTERNAL USAGE concerne ce format seul.
Note: Pour les Rubriques de type ’Unicode’, si le format interne est numérique signé, l’usage interne doit être X ou 1.
Vous pouvez indiquer les formats symboliques suivants pour les Rubriques de type date :
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
Note: Pour les formats incluant un séparateur (E, G, M, T), vous pouvez indiquer, à la suite du caractère représentant le format, un caractère représentant un séparateur différent de celui prévu par défaut dans le format. Par exemple, vous pouvez indiquer G/ dans cette zone pour générer un format grégorien SSAA/MM/JJ.au lieu du format grégorien standard SSAA-MM-JJ.

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

Vous pouvez indiquer les formats symboliques suivants pour les Rubriques de type date ::
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
Note: Pour les formats incluant un séparateur (E, G, M, T), vous pouvez indiquer, à la suite du caractère représentant le format, un caractère représentant un séparateur différent de celui prévu par défaut dans le format. Par exemple, vous pouvez indiquer G// dans cette zone pour générer un format grégorien SSAA/MM/JJ.au lieu du format grégorien standard SSAA-MM-JJ.

Overview

Trois sections ne sont pas des onglets et ne sont affichées que dans l'onglet Vue d'ensemble: Alertes et Actions, Information Générale et Définition des paramètres de génération.

Toutes les autres sections contiennent des liens permettant un débranchement vers les onglets correspondants de l'éditeur.

Si des informations sont affichées dans une section, vous pouvez:
  • cliquer dessus si ces informations apparaissent sous forme de liens. Vous basculerez alors automatiquement à l'endroit où l'information a été indiquée.
  • ou cliquer sur le bouton Plus d'infos... pour afficher l'onglet correspondant.

Si aucune information n'est affichée dans la section, cliquez sur la flèche située devant le nom de la section. Vous verrez alors s'afficher le bouton Plus d'infos..., qui vous permet d'accéder en un clic à l'onglet correspondant.

Alertes et Actions
Tout problème lié à l'instance courante (ex: instance appelant une instance qui a été supprimée...) est affiché dans cette section sous forme d'un lien. Si vous cliquez sur ce lien, vous basculez automatiquement sur la vue Problèmes, où la ligne correspondant à l'erreur est sélectionnée. L'erreur y est expliquée afin que vous puissiez la corriger.
Information générale : cette section affiche les deux zones suivantes :
Nom
Le nom de l'instance est affiché en consultation. Il est choisi lors de la création de l'instance et ne peut pas être modifié par la suite.
The Keywords section displays the keywords, if any, already assigned to the instance.

The Documentation section does not directly display the assigned documentation. You must access the Documentation tab to see it.

Définition des paramètres de génération
Les paramètres de génération sont définis dans les Bibliothèques. Ces paramètres sont liés à l'adaptation au système d'exploitation utilisé.

Pour change la Bibliothèque contenant ces paramètres, cliquez sur le bouton Modifier....

-W Lines tab

Emplacement COBOL
Dans cette zone, vous indiquez l'emplacement et la séquence selon lesquels les lignes décrites dans cet onglet seront générées. Le numéro de séquence (5 caractères) d'une ligne de description des données est formé par la concaténation du contenu de cette ligne (2 premiers caractères) et du Numéro de ligne (3 derniers caractères).
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 via l'onglet Lignes -CD, ces lignes seront générées :
  • Avant la description des Structures de Données d'organisation W: Description de fichier en Working et ayant un code généré supérieur ou égal au contenu de cette zone.
  • Avant la description des Structures de Données d'organisation L: Working avec placement, et ayant un positionnement COBOL supérieur ou égal au contenu de cette zone.
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 positionnement 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.
Numéro de ligne
Ce numéro, constitué de trois caractères, sera concaténé avec l'emplacement COBOL indiqué. Le numéro de ligne. peut prendre les valeurs suivantes :
  • 0 à 999: Il est recommandé de numéroter les lignes de 10 en 10 pour permettre d’en insérer de nouvelles par la suite.
  • $n0 à $n9: Dans une Macro, vous pouvez paramétrer les deux premiers caractères de cette zone.
Répétitions
Vous devez renseigner cette zone lorsque le nom-donnée (indiqué dans la zone Commentaire si vous affichez l'appel d'un commentaire, ou dans la zone Texte avant si vous affichez l'appel d'une Rubrique) est occursé, c'est à dire quand il est considéré comme une table. Vous devez alors indiquer ici le nombre maximum de répétitions, sur cinq caractères numériques maximum.
Une valeur dans cette zone déclenche la génération des trois indices suivants (DDSS = Segment).:
  • IDDSSM initialisé à la valeur saisie.
  • IDDSSL initialisé à zéro. Cet indice peut être utilisé pour le remplissage de la table. Il donne le nombre de postes effectivement chargés.
  • IDDSSR initialisé à zéro. Cet index peut être utilisé pour la recherche en table

Dans une Macro, la dimension de la table peut être paramétrée avec la valeur $n.

Code généré
Ce code établit la séquence de traitement de la Srructure de Données/l'Etat. dans le programme.

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.

Type de format
Vous sélectionnez ici le format des Rubriques appelées dans les Segments de la Structure de Données.
Vous devez sélectionner le format en fonction de l' utilisation de la Structure de Données indiquée dans l'onglet Lignes -CD. Cette zone ne concerne pas les Structures de Données dont l'utilisation est I : Impression directe et J : Impression indirecte.
Note: Les Rubriques constituant les Segments ne doivent pas dépasser 999 caractères.
Valeur Commentaire
E : Entrée Valeur par défaut pour les fichiers d’utilisation M: Mouvement à contrôler, N: Mouvement à ne pas contrôler, E: Mouvement avec détection d'erreurs
I: Interne Valeur par défaut pour les fichiers d’utilisation autre que M: Mouvement à contrôler, N: Mouvement à ne pas contrôler, E: Mouvement avec détection d'erreurs
S: Sortie  
Type de description
Sélectionnez ici le type de description de l'enregistrement qui va être utilisé dans le programme COBOL. Ceci permet d'obtenir plusieurs modes d'agencement des enregistrements d'une Structure de Données à partir des mêmes descriptions en Bibliothèque.
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 occursé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 letype de description est 4: Enregistrements avec occurs (avec niveau 3) et le Nombre de niveaux du Segment est3: 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).

Nombre de niveaux du segment
Utilisée conjointement avec la zone Type de description générée, cette zone définit le nombre niveau COBOL des descriptions des Structures de Données, Segments et Rubriques. Dans les descriptions ci-après on entend par 'niveau S.D.', le niveau COBOL de la zone DD00 (éventuellement 1-DD00, 2-DD00).
Valeur Signification
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 via 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.

Organisation
Sélectionnez une valeur dans la liste déroulante.

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.

Value Comment
S: Séquential Ceci est la seule valeur autorisée pour une Structure de Données Etat, 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 Statut du fichier 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 :
  • LE-FICHIER.
  • LE-DATA.
  • INVKEY.
La VALUE de LE-DATA sera le nom externe qui devra être le FILE CODE de la ligne $ DATA précédant, dans le flot des lignes contrôle d'exécution, les lignes ISP donnant les caractéristiques physiques du fichier.
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  
Sous-schéma
Un sous-schéma est un groupe de Rubriques présentes dans la composition du Segment.

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)

.

Data Element Definition

Nom
Ce nom est un code alphanumérique qui repère la Rubrique indépendamment de toute appartenance à une Structure de Données, à un Etat ou à un Ecran Il est donc inutile d’inclure un code Segment, Etat ou Ecran dans le code Rubrique : ce code sera automatiquement ajouté lors de la génération.

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

Usage
Cet "Usage" correspond à la clause COBOL USAGE.

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.

Vous choisissez l’usage d’une Rubrique en fonction de la :
  • Variante de génération associée à la Bibliothèque dans laquelle vous la définissez,
  • Représentation interne que vous désirez.
    Example: Si vous générez pour IBM, l’usage C génère la clause USAGE BINARY et F la clause USAGE COMP-1. Pour UNISYS 1100, l’usage H génère la clause USAGE COMP.
Vous pouvez utiliser cette Rubrique dans une Bibliothèque de niveau hiérarchique inférieur et dont la variante de génération est différente de celle de la Bibliothèque supérieure.
Example: Vous avez défini la Rubrique CORUB dans la Bibliothèque SUP avec C comme usage et vous l’utilisez dans une bibliothèque INF qui a une variante de génération pour UNISYS 1100.
Lorsque ce cas se produit, l’usage de la Rubrique sera automatiquement remplacé par un équivalent compatible avec la variante de génération. Ainsi, lorsque vous visualisez CORUB dans INF, l’usage qui s’affiche automatiquement est H. Cette valeur sera utilisée pour la génération.
Valeur Signification
D DISPLAY (option par défaut, sauf pour les Rubriques de type Unicode), tout matériel.

Obligatoire pour les Rubriques représentant des dates.

C COMPUTATIONAL type IBM ou équivalent;

BINARY type IBM et variante Cobol II.

F COMPUTATIONAL-1 IBM or equivalent.

COMPUTATIONAL-9 BULL GCOS7. COMPUTATIONAL-11 GCOS8.

DBD Relationnelles : virgule flottante simple précision.

G COMPUTATIONAL SYNCHRONIZED RIGHT ICL 2900

COMPUTATIONAL-5 MICROFOCUS.

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 équivalents. 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 MICROFOCUS
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 compararaison de zones de ce type se fait suivant la ″commercial collating sequence″ et non suivant la séquence standard.
3 COMPUTATIONAL-3IBM 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.

Segment call

Occurs
Enter an occurs number in this field to generate an OCCURS COBOL clause. The COBOL restrictions on the OCCURS clause also apply here. You can indicate an occurs number on an elementary or a group Data Element or a Filler. The occurs number is limited to 99. , it is pure numeric field.
Sort key
This field identifies all data elements that might be used as control break sort keys, or as access keys to a file, a database or a Pactables table.

Note: It is highly recommended to dedicate a Segment to only one type of use. Each data element that may belong to a sort key must be referenced by a unique alphabetic or numeric character. It is recommended to reference the indicators by a series (1, 2, 3 ...). The actual sort sequence will be chosen at the program level (on the Call of Data Structures (-CD) screen) by sequencing the characters in the appropriate order.
Don't forget that the format of key group data elements must have been entered in the Dictionary or at the segment level.
Value Comments
U References the access key for a VisualAge Pacbase table. This value must be indicated on the group data element if it is a group key.
S Indicates that the data element belongs to at least one sub-system.
Values Comments
U References a unique key for an DL/1 database.
M References a multiple key for an DL/1 database.
1 to 9 Secondary index All other values designate a search field.
Values Comments
0 to 9 AS400 physical file key. Relational databases
V Variable length column
Blank Fixed length column
W For DB2 SQL, SQL/DS and ORACLE, generation of a variable length column (VARCHAR).
L For DB2 SQL, SQL/DS and ORACLE, generation of a LONG VARCHAR.
Note: Sort keys are not allowed on data elements redefining other data elements.
Redefines
The Data Element containing this option redefines the Data Element of the same COBOL level which precedes it in the Segment description. If a Data Element which redefines another Data Element is contained in a group, it is considered to be an elementary Data Element. It must be taken into account in the calculation of the number of Data Elements contained in a group (except for DL1 database Segments).

-G Lines tab

-GC Lines

These lines are used for documentation purposes. Comments are available with all entities and allow you to write, edit text in relation to the selected instance. This tab allows you to write, modify, move or delete text lines using basic word processing functions.

Type
In the Type input field of the -GC lines section, put your cursor and enter the type of line:
Value Comments
* or blank Standard documentation line.
A Alias for the Segment name.
Description
In the Description input field of the -GC lines section, put your cursor and enter your comment.

On a blank-type line, you enter a free comment.

On an A-type line, enter the COBOL Segment name.

Note: A double click on a word selects the word, clicking in the left margin selects the entire line.

-GE Lines

In the -GE lines section, you specify error messages and online help for the current entity.
Type
Enter in this field, one of the following values:
Values Comments
T Call of a text section.
* Line which will not be generated. It is used to insert a comment or an override.
S Replacement of an automatic error message.

Automatic messages can be replaced by specific messages such as: ’THE ORDER NUMBER IS REQUIRED These messages are indicated on ’S’ type lines assigned to data element call lines (-CE lines tab) in the Segments.

F Data Element call
U Error message
C Comment
D Documentary messages.
Description
You can modify the error messages which are generated for the current entity and generate documentation messages of the same format.
Type Description
D

Column 1:

  • 0 : Message before Element Description.
  • A: Message after Element Description.
  • 2–5 Message after an error message of type 2 to 5.

Column 2: blank

Column 3:
  • blank = a documentary message
  • T = the call of a text

Column 4: blank

Column 5: Begin the documentary message or Enter the text and paragraph code being called. Two asterisks (**) for the paragraph code is a permitted value, it will call all the paragraphs of the text.

S

Column 1: ERROR TYPE (2, 3, 4 or 5)

Column 2: blank

Column 3: ERROR GRAVITY (E, C or W)

Column 4: blank

Column 5: enter the message beginning here.

Selection wizard

Select instances to add
The instances listed here belong to the current location. Select one and click OK to insert it.
If you right-click anywhere in the list, and select:
  • Sort, you can specify a new sort criterion: by name, package, project or generation parameters.
  • Display, you can specify a new display criterion: by package, project, label or generation parameters.
  • Filter, you can specify whether:
    • The selection list is to display all the instances of the location (equivalent to a database), by turning the filter off,
    • Or the selection list is to display only the instances located in the current package (library) and in the packages (libraries) above, by turning the filter on.
This new setting will then automatically be saved and associated with this wizard, until you change it again.
New...
Clicking this button enables you to create an instance. Once created, the instance will be displayed in the list. You will then be able to select it, like any other instances.

-CD line Def/File parameters

Nom externe
Ce nom est facultatif. La longueur maximum de saisie est de 6 caractères. Son contenu varie selon le type de Structure de Données et l'organisation.

Pour l'organisation Y: Pacbench C/S, cette zone doit contenir le code de la clause COPY COBOL qui représente la zone de communication du Composant Applicatif Pacbench C/S accédant à la Vue Logique.

For les orgnisations SQL, cette zone doit contenir le code du Bloc SQL.

Pour toutes les autres Structures de Données, le contenu de cette zone dépend de la variante indiquée dans l'onglet Définition du Programme.

Variante Contenu de la zone
1: IBM DOS/VSE Vous pouvez indiquer trois types d'information :
  • SYSnnn nom symbolique d’unité,
  • XXXnnn précise à la fois l’unité symbolique SYSnnn et le nom externe du fichier XXX,
  • XXXXXX nom externe, l’unité symbolique est générée avec SYSnnn, nnn étant incrémenté de 1 pour chaque fichier en partant de SYS010.
X: IBM MVS/ESA OS/390 La clause ASSIGN (pour les fichiers séquentiels, organisation ’S: séquentiel’) de nom externe SYSnnn est générée sous forme : SYSnnn-UT-....-S-SYSnnn.

Pour OS/390: DDNAME

4: BULL GCOS7 INTERNAL-FILE-NAME
5: BULL GCOS8 File-code (2 characters)
F: TANDEM Nom externe
I: DEC/VAX VMS Nom externe
Emplacement COBOL
Cette zone ne concerne que la description principale de la Structure de Données. (DDSS), et non les descriptions précédées d’un radical (1-DDSS ou 2-DDSS).

Elle permet d'obtenir une description de Structure de Données dans une zone particulière (zone de communication avec les Gestionnaires de Bases de Données, LINKAGE SECTION, que vous devez définir dans l'onglet Lignes -W ou en tête de la WORKING-STORAGE SECTION.

Cette zone est réservée aux Structures de Données en organisation L: Working avec placement, W: Description de fichier en Working ou D: DL1, IDS1 et II. Elle place la zone I/O dans la WORKING-STORAGE SECTION

Pour effectuer une description de Structure de Données en WORKING STORAGE, il est préférable d'utiliser l'onglet Lignes -W.

Valeur Signification
00 La description de la Structure de Données est insérée après toutes les lignes ’-W’ (valeur par défaut).
Caractères alphabétiques La description de la Structure de Données est insérée après toutes les lignes ’-W’ dont le numéro de ligne à 5 positions commence par cette valeur.

Les lignes ’-W’ et la description se trouvent, dans le programme généré, en tête de WORKING-STORAGE SECTION, avant les descriptions des Structures de Données. d’organisation W: Description de fichier en Working et dont le code généré est supérieur à cette valeur.

Note: Ne choisissez pas un emplacement COBOL identique au code généré d’une Structure de Données. d’organisation W: Description de fichier en Working.
Caractères alphanumériques La description de la Structure de Données est insérée après toutes les lignes ’-W’ dont le numéro de ligne à 5 positions commence par cette valeur.

Les lignes ’-W’ et la description se trouvent, dans le Programme généré, en fin de WORKING-STORAGE SECTION parmi les zones-utilisateur.

Note: Pour ORACLE, vous devez utiliser des valeurs numériques pour que la DECLARE SECTION soit générée correctement (avec les zones données et indicateurs).
Mode d'accès
Vous indiquez ici la façon dont la Structure de Données est accédée par le Programme.
Valeur Commentaire
S: Séquentiel Accès séquentiel
R: Direct / Aléatoire Fichiers en entrée avec accès aléatoire, la fonction LECTURE n'est pas générée automatiquement.
D: Dynamique Réservé aux fichiers VSAM.
Mode de blocage
Cette zone génère la clause RECORDING MODE IS, qui indique la nature des enregistrements logiques du fichier.
Valeur Commentaire
F: Fixe Lors de la génération, les longueurs des différents enregistrements seront alignées sur la longueur du plus grand.
V: Variable  
U: Non défini
S: Spanned Cette valeur est réservée aux variantes IBM MVS et DOS.
Mode entrée/sortie
Sélectionnez une valeur dans la liste déroulante.
Valeur Commentaire
I: Entrée Sélectionnable avec les utilisations suivantes : C: Consultation, T: Table stockée en mémoire, X: Table partiellement stockée en mémoire, M: Mouvement à contrôler, N: Mouvement à ne pas contrôler et P: Principal
O: Sortie Sélectionnable avec les utilisations suivantes : D: Fichier en sortie, S: Sélectionné, R: Résultat, E: Mouvement avec détection d'erreurs, I: Impression directe et J: Impression indirecte.
E: Sortie avec la clause OPEN EXTEND Sélectionnable avec les variantes suivantes : 4: BULL GCOS7, 5: BULL GCOS8, 0: IBM MVS/ESA OS/390, U: UNYSIS 2200 Series, F: TANDEM, I: DEC/VAX VMS, K: ICL 2900.
R: Entrée / Sortie Fichiers en accès direct seulement
T: Tri En entrée ou sortie suivant l'utilisation
Type d'unité
La codification de cette zone est importante dans les variantes de COBOL où les clause ASSIGN, les niveaux FD ou les ordres WRITE dépendent du type d’unité choisi.
Niveau de rupture
Pour les fichiers triés, en accès séquentiel, vous devez indiquer le nombre de Rubriques (élémentaires ou groupes) sur lesquelles un traitement de contrôle des ruptures sera effectué pour la Structure de Données.

L’argument (ou indicatif) d’une Structure de Données se compose, au niveau d’un Programme, de 9 Rubriques au maximum. Ces 9 Rubriques définissent 9 niveaux de rupture de séquence au maximum. Le niveau indiqué est le niveau mineur sur lequel on désire déceler ces ruptures. L'option par défaut est O. Ces Rubriques sont indiquées dans la zone Argument de tri.

Les ruptures sur les niveaux majeurs seront automatiquement décelées. Le tout sera disponible sous forme de deux jeux de variables :
  • dd-IBn : premier Segment sur la Structure de Données dd au niveau n (valeur 1 oui, 0 non),
  • dd-DEn : dernier Segment sur la Structure de Données dd au niveau n (valeur 1 oui, 0 non),
Lorsque la Structure de Données est synchronisée avec d'autres, les ruptures sont automatiquement calculées sur l'ensemble des Structures de Données et disponibles sous formes de deux jeux de variables indiquant le changement de l'indicatif de niveau n (ou rupture de niveau n):
  • RTPn pour la rupture entre l'itération précédente du Programme et celle en cours.
  • RTDn pour la rupture entre l'itération en cours du Programme et la prochaine.
Ces variables sont également disponibles lorsqu’il n’y a pas de Structure de Données synchronisées dans le Programme.Pour une Structure de Données d’utilisation D: Fichier en sortie, affecter un nombre de niveaux de rupture différent de zéro permet d’obtenir au niveau du Programme généré une zone de réserve en WORKING affectée du radical 1- qui sera utilisée pour les traitements sur le fichier. Cependant, il est préférable de faire cela au niveau de l'onglet Lignes -W.
Niveau de synchronization
Les Structures de Données en accès séquentiel en entrée lues simultanément doivent être synchronisées. Le niveau indiqué est le niveau mineur de l’argument sur lequel les Structures de Données sont rapprochées. La La valeur par défaut est 0 et le niveau peut aller jusqu'á 9.

Lorsque la synchronisation se limite à deux Structures de Données, les niveaux doivent être égaux (non contrôlé).

Lorsqu’il y a plus de deux Structures de Données, certaines peuvent être synchronisées à un niveau majeur par rapport aux autres.

.

Pour que la synchronisation soit automatique, les conditions suivantes doivent être réalisées :
  • Le niveau de rupture des Structures de Données doit être égal au niveau de synchronisation - 1, sauf pour une Structure de Données Mouvement pour laquelle le niveau de rupture doit être supérieur ou égal au niveau de synchronisation.
  • Les Rubriques composant l’argument de chaque Structure de Données doivent être classées en séquence croissante.
  • Les Rubriques composant l’argument de chaque Structures de Données doivent être de même longueur à niveau égal.
  • Ces Rubriques doivent avoir un format étendu (si elles sont numériques, elles doivent être entières et non signées).
Si ces conditions ne sont pas réalisées, il faut modifier la cinématique du Programme avec du code spécifique.
La synchronisation se traduit par deux jeux de variables donnant l’état des S.D. :
  • dd-CFn configuration de la Structure de Données dd au niveau n indique la participation de la Structure de Données en entrée au traitement pour ce niveau d’indicatif. (Valeur 1 : l’argument à ce niveau est égal au minimum en cours de traitement, valeur 0 sinon).
  • dd-OCn occurrence de la Structure de Données dd au niveau n, indique, pour les Structures de Données principales, que l’on est en cours de mise à jour d’un Segment ou d’une séquence Segments de la Structure de Données dd.
Utilisation
Cette zone permet de définir le rôle de la Structure de Données dans le Programme, et de commandert la génération des fonctions automatiques.
Valeur Commentaire
C: Consultation Structure de Données quelconque en entrée
D: Fichier en sortie Structure de Données quelconque en sortie
P: Principal Structure de Données en entrée susceptible d’être mise à jour (par une Structure de Données d’utilisation M: Mouvement à contrôler ouN: Mouvement à ne pas contrôler)
R: Résultat Structure de Données principale après mise à jour en accès séquentiel (si la Structure de Données contient des clauses OCCURS DEPENDING, le résultat doit être déclaré en utilisation D: Fichier en sortie).
S: Sélectionné Structure de Données en sortie extraite d’une autre Structure de Données.

A la différence d’une Structure de Données. D: Fichier en sortie, sa description en zone de sortie n’est pas détaillée. Lorsque la Structure de Données contient des Rubriques dont le nombre de répétitions dépend d’un compteur (OCCURS DEPENDING ON), son utilisation doit être D: Fichier en sortie.

T: Table stockée en mémoire, , ,

Structure de Données destinée à être stockée intégralement en mémoire.

La table de stockage est générée en fonction du nombre de répétitions indiqué sur la Définition du Segment. Il n’est pas possible de sélectionner plus de 50 Segments par Structure de Données

X: Table partiellement stockée en mémoire Structure de Données stockée partiellement en mémoire (seules les Rubriques autres que FILLER sont décrites).

Les Rubriques élémentaires autres que FILLER, sont limitées à 10 pour la partie commune (code Structure excepté) et à 29 pour chaque partie spécifique.

M: Mouvement à contrôler Structure de Données en entrée à contrôler pouvant mettre à jour d’autres Structures de Données (fonctions générées : 30 à 76).
Note: Il n’est pas possible de déclarer plus d’une Structure de Données d’utilisation M: Mouvement à contrôler ou N: Mouvement à ne pas contrôler par Programme.
N: Mouvement à ne pas contrôler Structure de Données en entrée pouvant mettre à jour d’autres Structure de Données (fonctions générées: 30, 33, 39, 70 à 76).
Note: Il n’est pas possible de déclarer plus d’une Structure de Données d’utilisation M: Mouvement à contrôler ou N: Mouvement à ne pas contrôler par Programme.
E: Mouvement avec détection d'erreurs Compte-rendu de contrôle : Structure de Données mouvement en sortie.

La description comporte ou non les Rubriques facultatives. Dans le cas où il n’y a pas de sélection de celles-ci, la description sera précédée des Rubriques ENPR et GRPR calculées lors de la génération et reprenant les vecteurs EN-PRR et GR-PRR.

I: Impression directe Impression directe (ou par SYSOUT en OS IBM)

La Structure commune éventuellement présente dans la description de l’Etat ne sera pas prise en compte.

J: Impression indirecte Impression indirecte à traiter par un programme de spool.

Cette valeur suppose l’utilisation de la Structure 00 pour définir une partie commune à toutes les lignes.

Y: Table de codification interne  
Argument de tri
C’est la suite des Rubriques composant l’argument (ou indicatif) de la S.D., repérées par leur rang, tel qu’il est défini dans la description du Segment. .

Ces Rubriques sont identifiées dans la eone Clés de tri de l'onglet Lignes -CE du Segment.

Si cette zone n’est pas utilisée, l’indicatif principal (Rubriques de rang 1 à 9) sera repris par défautIf no explicit entry is made here, Elements coded with value 1 to 9 will be taken as the default.

Facteur de Blocage
Cette zone, sur 5 caractères, doit être renseignée pour la génération de la clause BLOCK CONTAINS.

Elle doit contenir une valeur numérique qui correspond à la taille du bloc, c'est à dire la taille de l'enregistrement physique. Le zéro et les espaces sont équivalents.

La taille du bloc peut être zéro pour
  • IBM OS, sauf pour les Structures de Données indexées.
  • IIBM MVS. La clause BLOCK CONTAINS est générée pour un fichier VSAM seulement si la Bibliothèque est en COBOL II.
La clause BLOCK CONTAINS n'est pas générée dans les cas suivants :
  • Fichier tri,
  • Fichier disque (fichier stocké sur un disque) si aucun nombre n'est indiqué,
  • Fichier dont le Type d'unité est R: Périphérique lent en IBM DOS (variante 1),
  • Block 0 pour Unisys série A (variante 8), AS 400 (variante O),
  • Block 0 pour COBOL II IBM VSE et Type de blocage à N: Ignorer la gestion des blacs.
Type de Blocage
Vous indiquez ici si la taille du bloc, saisie dans la zone Facteur de Blocage, représente un nombre d'enregistrements, de caractères ou si elle doit être ignorée dans la gestion des blacs.
Structure de Données Résultat

Si la Structure de Données a une Utilisation á P: Principal, vous devez indiquer le code généré de la Structure de Données résultat en sortie..

Si la Structure de Données a une Utilisation á R: Résultat ou D: Fichier en sortie, vous devez indiquer le code généré de la Structure de Données principale en entrée.

Structure de Données Source
Si la Structure de Données a une Utilisation á :
  • M: Mouvement à contrôler ou N: Mouvement à ne pas contrôler, vous devez indiquer le code généré de la Structure de Données compte-rendu de contrôle (Utilisation á E: Mouvement avec détection d'erreurs)
  • E: Mouvement avec détection d'erreurs, vous devez indiquer le code généré de la Structure de Données mouvement (Utilisation á M: Mouvement à contrôler ou N: Mouvement à ne pas contrôler).
  • S: Sélectionné, vous devez indiquer le code généré de la Structure de Données source en entrée ; sur la ligne d’appel de la Structure de Données source, vous devez indiquer le code généré de la Structure de Données sélectionnée.
Niveau de rupture sur mouvement
Dans une Structure de Données mouvement, ce niveau représente le rang de la Rubrique d’indicatif qui permet de faire la distinction entre plusieurs mouvements relatifs à un même Segment de la Structure de Données permanente (ce niveau est donc nécessairement égal ou plus fin que le niveau de synchronisation de la Structure de Données mouvement).

Tant qu’aucune rupture n’est détectée à ce niveau, les enregistrements traités appartiennent au même mouvement.

Une rupture à ce niveau conditionne, par exemple, l’initialisation des variables d’erreurs associées au mouvement et le contrôle de correspondance avec la ou les Structures de Données principales.

Par défaut, il est égal au Niveau de rupture de la Structure de Données; déjà ndiqué dans la fenêtre précédente. Sa valeur doit être saisie sur un caractère.
Note: Les blancs sont remplacés par des zéros
Type d'unité phusique
Le type d'unité possible varie selon la variante COBOL :
  • Variante = 1: IBM DOS/VSE : Indiquez le type de modèle (exemples : 2314, 3330, 2400)
  • Variante = 3: UNIX, WINDOWS :
    • EXT = Génération de la clause EXTERNAL au niveau de la FD du fichier
    • LS = Génération de la clause LINE SEQUENTIAL
    • EXLS = Génération de la clause LINE SEQUENTIAL et EXTERNAL au niveau de la FD du fichier
  • Variante = Q: ACUCOBOL :
    • LS = Génération de la clause LINE SEQUENTIAL
  • Variante = 4: BULL GCOS7 :
    • SSF = Option WITH SSF dans la clause SELECT
    • OUT = Option suffiwe -SYSOUT après le nom du fichier de la clause SELECT (WITH SSF est générée).
  • Variante = 5: BULL GCOS8 :
    • PT = Imprimante
    • CR = lecteur de cartes
    • SSF = ORGANISATION IS GFRC SEQUENTIAL SSF CODE SET IS GBCD
    • IBM = ORGANISATION IS IBM-OS SEQUENTIAL
    • xxx = WITH xxx
    Un V dans la quatrième position de cette zone permet de générer la clause VALUE OF ID. La clause générée est : VALUE OF FILE-ID IS 3-XX00-IDENTXX est le code généré de la Structure de Données. La zone 3-XX00-IDENT doit être définie en ligne -W par l’utilisateur.
    Note: Le V en quatrième position peut être combiné avec une des valeurs d’unité, sur la même ligne.
  • Variante = 8: UNYSIS A Series :
    • DK ou blanc = disque
    • DKS = disque de tri (avec ouverture T)
    • DKM = disque de fusion (avec ouverture T)
    • RD = lecteur
    • PT = imprimante
    • PO = fichier PORT
    • TP = bande
    Pour les codes à 2 caractères le troisième peut préciser un ordre de fermeture particulier :
    • P = PURGE
    • R = RELEASE
    • L = LOCK
    • S = SAVE
    Un V en quatrième position fait générer la clause VALUE OF FILENAME IS 3-FF00-IDENT.
  • Variante = U: UNYSIS 2200 Series :
    • .CR = lecteur de cartes
    • CP = perforateur de cartes
    • .UN = UNISERVO
    • .TP = bande
    • PN = imprimante avec nom externe. Si la zone Complément est renseigné, la clause RECORDING est également générée.
    • PT = imprimante sans nom externe
    • PF = imprimante avec nom externe et
      • VALUE OF PRINTER-FORMS 3-FF00-FORMS
      • LINAGE IS 3-FF00-LINES
      • TOP IS 3-FF00-TOP
      • BOTTOM IS 3-FF00-BOTTOM
      Ces quatre noms-données sont à déclarer dans les zones de travail (-W) avec les valeurs appropriés.
  • Variante = O: AS/400 :
    • RD = lecteur
    • CP = perforateur de cartes
    • DB = base de données
    • PT = imprimante
    • TP = bande
    • DK ou blanc = disque
Complément
This is a complement to the 'Physical unit type' field. The purpose of this field varies according to the 'Type of COBOL code'.
Valeur Variante
R: Lecteur 1: IBM DOS/VSE
P: Perforatrice 1: IBM DOS/VSE
S: Jeu de caractéres EBCDIC 5: BULL GCOS8 et U: UNYSIS 2200 Series
C: Jeu de caractéres ASCII 5: BULL GCOS8
O: Pas de génération de l'option OPTIONAL 4: BULL GCOS7 et 5: BULL GCOS8
A: Option d'ouverture de fichier ALLOWING ALL et lecture séquentielle option & REGARDLESS I: DEC VAX VMS
File status
Cette zone est facultative.

Si vous la valorisez, il est recommandé d'indiquer une chaîne de caractères, comprenant 10 caractères maximum, dans le format suivant: .

ddsseeeeee, où :
  • dd = Structure de Données
  • ss = Enregistrement (00 est recommandé)
  • eeeeee = Rubrique
L'utilisation de cette zone varie selon la variante du langage à générer et l'Organisation de l'appel de la Structure de Données :
  • Pour les fichiers non-VSAM et tous les types de matériel à l'exception de BULL GCOS8 :
    • Génération de la Clé nominale, symbolique ou courante selon la variante,
    • Vous devez définir la zone de working correspondante, par exemple, 1-ddss-eeeeee. Vous devez aussi préciser, avec du code spécifique, la position de cette clé et demander la lecture de la Structure de Données.
  • Pour les fichiers VSAM :
    • Génération du code retour des opérations d'entrée-sortie
    • Génération de la clauseVALUE OF correspondante uniquement si elle est définie comme zone de Working et spécifiée avec du code spécifique.
  • Pour BULL GCOS8 :
    • Identification de la Structure de Données
    • Génération de la clause FILE STATUS IS correspondante, si elle est définie comme zone de Working et spécifiée avec du code spécifique.
Clé d'accès

Vous saisissez ici la Rubrique clé dans l’enregistrement, qui est obligatoire pour les fichiers en organisation indexée.

Clé d'enregistrement

Vous saisissez ici le code mnémonique de la Rubrique permettant d’identifier par ses valeurs les différents types d’enregistrements du fichier.

Cette Rubrique se trouve obligatoirement dans la partie commune (code enregistrement 00).

Ce code peut également être précisé au niveau de la Définition du Segment partie commune, dans la zone Valeur code structure et sert alors de valeur par défaut au niveau de la génération.

Macro call

Numéro de ligne
Saisissez deux caractères numériques dans cette zone. Lorsque la Macro est paramétrée, ce numéro de ligne permet de l’appeler plusieurs fois dans le même programme, avec des valeurs différentes pour les paramètres.
Paramètres
Il est possible de déclarer jusqu'â 20 paramètres pour chaque Macro. Ils sont indiqués par $n (avec n= 1,2,...,9,0) et $x (avec x= A,B,...J) dans la colonne Paramètres.

Vous devez indiquer les valeurs de remplacement des paramètres sous forme de chaînes de caractères. Chaque occurrence du paramètre dans la Macro sera alors remplacée par la valeur saisie pour ce programme.

Le nombre de caractères utilisés pour la valeur du paramètre doit correspondre à la longueur appropriée de la zone pour l'élément paramétré. Par exemple, si $1 est utilisé comme code fonction, la valeur doit avoir une longueur de deux caractères.

Data Element call

Type de la ligne
Vous sélectionnez ici le format qui sera pris en compte lors de l'appel de la Rubrique :
  • E’: Format d'entrée,
  • I’: Format interne,
  • S’: Format de sortie.
Texte avant
Cette zone est constituée de deux parties :
  • Le "Niveau de la déclaration", sur les 17 premiers caractères de la zone, Dans cette partie, vous indiquez le nombre niveau COBOL (01, 05...) ou le nom de Section (LINKAGE SECTION,...) dans lequel la ligne sera générée.
  • La "Déclaration des données de travail", à partir du 18ème caractère et jusqu'à la fin de la zone. Vous devez indiquert les noms-données en respectant le format suivant : W-DDSS-, où:
    • W = code zone de travail (chiffre ou lettre)
    • DD = S.D. dont la zone est extraite
    • SS = Segment,
    Une fois concaténé avec le code Rubrique, le nom-donnée sera : w-ddss-eeeeee (où eeeeee est le code Rubrique)..
    Note: Lors de l’appel d’une Rubrique dans une zone de travail et de lien, et dans le cas où le code Rubrique existe au Dictionnaire, il est obligatoire de saisir le nom-donnée dans cette zone. Dans le cas contraire, le généré obtenu sera de la forme :
    03 DDSS-CORUB PICTURE X.
Texte après
Dans cette zone, vous devez saisir les caractères qui seront inséré dans le code généré aprés le nom-donnée. La plupart du temps, vous saisissez simplement un point mais vous pouvez aussi saisir d'autres valeurs (ex: 'VALUE SPACE').

Pacbase Cobol in PDP

To see the content of this view, you must have generated a program (batch Program or online Screen). Then, in the Design explorer view of the Design perspective, right-click on the corresponding .cbl file, which contains the generated Cobol, and select Open with > Pdp Cobol System z LPEX Editor in the popup menu. The Cobol editor must remain open and currently selected.
Tip: You must be familiar with the concepts explained in Generating the Pac COBOL and modifying it: the various steps before reading this help.

Dialogs/Screens

There are four possible labels:
  • The long label (36 positions), entered on the Data Element Definition tab.
  • The short label (18 positions), entered on the Data Element -D Lines tab.
  • The relational label (18 positions), entered on the Data Element -D Lines tab.
  • The column heading label, entered on the Data Element -D Lines tab.

The values for the label type correspond to the association between the Data Element and the presentation characteristics for these labels (left-justified...).

You must select a value among the following ones:
Values Comments
Default value Defaults to the value specified in the Dialog.
F: Data Element only  
L: Data Element with long label, left-justified The Data Element is preceded by the Data Element label, left-justified, on 36 positions.
M: Data Element with long label, right-justified The Data Element is preceded by the Data Element label, right-justified, on 36 positions.
N: Data Element with long label, left-justified, trimmed right The Data Element is preceded by the Data Element label, left-justified with suppression of blanks on the right.
R: Data Element with long relational label, left-justified The Data Element is preceded by the relational label, left-justified on 18 positions.
S: Data Element with short label, left-justified The Data Element is preceded by the short label, left-justified, on 18 position
T: Data Element with short label, right-justified The Data Element is preceded by the short label, right-justified, on 18 position
U: Data Element with short label, left-justified, trimmed right The Data Element is preceded by the short label, left-justified, with suppression of blanks on the right.
1: Data Element topped by a single line column label  
2: Data Element topped by 2–line column label  
3: Data Element topped by 3–line column label  
Note: The ':' character is generated for the Data elements preceded by a long, short or relational label. For the Data elements topped by a column label, the greatest length of the Data Element's label and contents is taken into account for the relative positioning in the Screen.

Position

Position type
In this field, you specify the positioning of the Screen element:
  • : Relative positioning
    The specified line and column numbers correspond to a move from the Data Element located just before in the list. The calculation of the positioning from the preceding Data Element is of two types, according to the nature of this field.
    • Data Element call (for an elementary or repeated Data Element, whatever its presentation): The starting point of the positioning is calculated from the top right-hand corner of the contents (and not the label) of the previous Data Element.
    • Screen calls: The positioning is calculated from the lower right-hand corner of the called Screen in the calling Screen.
  • A: Absolute positioning: In this case, the line and column numbers correspond to the absolute address of the element on the Screen.
Notes on position:
  • For Data Elements with column labels, the starting position is the first character of the field.
  • For Data Elements with labels, the starting position is the first character of the label.
  • For Data Elements without either, the starting position is the first character of the Data Element itself.
  • The elements which identify Screen group categories have a position. The first element within the category is therefore positioned relatively to the beginning of this category.
Line
In this field, you specify, on two numeric characters, the line number which determines the position of the element
  • In a relative positioning, this is the number of lines between two Data Elements. If the presentation type corresponds to a column heading, the number of lines in the column heading is automatically added, upon generation, to the indicated number.
  • In an absolute positioning, this is the line number on the Screen. The line overflow is automatically controlled.

If the line and column numbers are both equal to zero, the Data Element is automatically positioned on the next tabulation point available.

Column
In this field, you specify, on three numeric characters, the column number which determines the position of the element:
  • In a relative positioning, if the line number is zero, the column number corresponds to the number of spaces between two Data Elements on the same line. If the line number is greater than zero, the column number corresponds to an absolute positioning.
  • In an absolute positioning, the column number is the address of the Data Element on the line. A zero value corresponds by default to column 2 upon generation (column 1 being reserved for the attribute). If the value is 1, the attribute is on the preceding line.

Any line length overflow and field overlapping are automatically detected. However, the presence of a space in front of each field is not verified.

If the line and column numbers are both equal to zero, the Data Element is automatically positioned on the next tabulation point available.

Intensity
Select here its intensity attribute, among the following ones:
  • Default value: Defaults to the Dialog Definition
  • N: Normal: Default value at the Dialog level
  • B: Bright: It will be highlighted.
  • D: Dark: It will be hidden.
Presentation
Select here its presentation attribute, among the following ones:
  • Default value: Defaults to the Dialog Definition
  • N: Normal: Default value at the Dialog level
  • B: Blinking
  • R: Reversed video
  • U: Underlined
Color
Select here its color attribute, among the following ones:
  • Default value: Defaults to the Dialog Definition
  • W: Normal: Default value at the Dialog level
  • B: Blue
  • R: Red
  • P: Pink
  • Y: Yellow
  • G: Green
  • T: Turquoise

Screen - CS lines

id

Category
This field displays the category in which the Segment is used. The category, and therefore the corresponding Segments are processed in the following order:
  • A category:

    Segment belonging to the screen-top.

  • R: repetitive category:

    Segment belonging to the repetitive section.

  • Z: Bottom category:

    Segment belonging to the screen-bottom.

If you move a Segment from a category to another, the value in this field is modified accordingly.
Segment code
This field contains the Segment code used by the generated program associated to the Screen. The Segment code used can be identical to the one present in the Database.
Line number
This is a pure numeric field. Only one 00 line number per Segment is permitted (default). The values from 01 to 99 are required for any other references to this Segment.

Logical characteristics

Generation limitation
In the dropdown list, select the generation limitation of the logical accesses to Segments:
  • Automatic:

    the logical access is generated automatically, according to the use of the Segment.

  • User defined Segment:

    Logical accesses to be written in Structured Code.

  • No description of Segment:

    Segment accesses not described.

Control break
This is the control break indicator for display option. Select an option in the dropdown list:
Header Header
Blank: no control break.
C: display break This provides an indication of the logical end-of-file for control break processing in the repetitive section . Control break processing will take place under either of these conditions:
  • The value in the field of the group key Data Element identified with this 'C' is different from the previous value in this field.
  • The value of a superior key Data Element does not match its previous value.
E: display break (SQL) Display control break, causes the generation of an equal condition in the 'WHERE' clause of the SQL 'DECLARE CURSOR' statement (and not >=, which is generated otherwise). Allows optimization of the use of 'CURSORs' in the repetitive category.
Sub-schema
This field is used with the Pactables function, to indicate which sub-schema is to be described. You must select in the dropdown list between the All data elements choice and a description from 0 to 9 (0 corresponds to sub-schema 10). A subschema is a group of Data Elements present in the Segment composition.
Generate level
The Dialog function automatically generates in the Program associated with the Screen:
  • Values entered between 06 to 98: a sub-function of the F20 function per Data Element called in the Segment to control,
  • a sub-function of the F25, F35 and F60 functions per each accessed Segment.
The hierarchical level of these sub-functions is set to 10 by default. It can be modified for a Data Element or a Segment.

Access key filling

Previous Segment code
In each processing category, several Segments can be accessed. You may thus have to specify the hierarchy of accesses to the Segments within a category. In this field, you specify the code of the preceding Segment in the hierarchy of accesses. This Segment must belong to the same category. It is not recommended to link Server calls and calls of Segments that correspond to Databases or files.
Display
Select one of the choice in the dropdown list.
  • If you select A: Used in display, the Segment is used in display. The access statement will be generated for the display according to the type of logical access processing. If the Previous Segment code is blank and the Segment is used, the key is saved in the conversation area.
  • If you select N: not used, no access order is generated for this Segment in the display processing. Otherwise, access orders are generated according to the generation limitation.
Reception
Here you specify the way the Segment is used in validation and update processing. Select an option in the dropdown list:
Options Description
N Not used. No access statement will be generated for this Segment in the validation and update processing.
L Read. A simple read command is generated for the Segment.
E Existence validation to execute. A read command with the setting of an error code is generated (if it is not found).
M Updated Segment (modification only).
X Updated Segment (creation and modification only).
T

Updated Segment (creation, modification and deletion). In the last three cases, the existence validations and the update statements corresponding to the chosen options are generated.

If the Segment is related to a previous Segment, regardless of the indicated use, only the update commands for modification and creation are generated.

For Segments accesses conditioned by a previous Segment access, update commands for deletions will not be generated.

U User-defined logical accesses.
Access key source
This field (14 characters long) indicates the source to be used to fill in the key fields of the Segment.

Entered on the '00' line, the '*SSA' value inhibits the generation of the qualified SSA corresponding to the Segment in the PCB. The Access key source field must be entered with the code of the Data Element used as the display key. The K-.... field is generated with the access key indicated in the Primary access key field (Data element). The key will be filled in automatically in functions F25, F40, and F60.

The SSA of the processed Segment is filled in from the '-CS' lines whose key code has not been found in the hierarchical path

Note: If the Segment is used in display in the repetitive category, the K-....-......(2) key is not filled in since the Segment's access key is not defined.

This specification is not available with the HLPI option (the key is directly coded in the 'WHERE' parameter).

Primary access key

In this pane, you select a Data element or you enter the name of a new Data Element (not defined in the Dictionary) that will be used as the primary access key to the Segment. It is used to generate the 'RECORD KEY' clause. The Data Element specified here is considered as a Group Data Element except for SQL organizations where it is considered as an Elementary Data Element.

Data element
This field contains the code of the Data Element used as an access key to the Segment and you can select another one via the Change button.
Undefined Data element
If the primary access key is a group Data Element, you enter in the Undefined Data element field the code of the elementary Data Elements composing the group.

If a group Data Element is used, and different values are given to the individual members of that group, the codes of those elementary Data Elements are named here. Key Data Elements are not updated in a 'SQL UPDATE' order.

For a Table (’G’ organization), selection of a sub-system is executed by indicating the value ’NUSSY’ in this field. The system generates the associated key (G-ddss-NUSSY).

In DL/1, the Data Element can belong to all SSA’s that permit access to the Segment in the PCB indicated in the external name (code of the PCB).

For SQL Database Segments, a key element must be entered on each line where the value of the Use in display field is not ’N’.

In generated accesses, the Segments are selected when the keys are equal for update or a direct read; for a sequential read in the repetitive category, the Segments are selected when their keys are equal or greater.

A Segment can not contain more than 10 key Data Elements.

Key Data Elements are not updated in a 'SQL UPDATE' order.


Terms of use | Feedback

This information center is powered by Eclipse technology. (http://www.eclipse.org)