Rational Developer for System z, Version 7.6

Onglet Complément du Dialogue

Cet onglet vous permet de compléter le Dialogue par des informations communes à tous ses Ecrans et par des informations concernant l'environnement physique de la transaction.

Les informations communes à tous ses Ecrans sont :
  • Les caractéristiques de la zone commune de conversation qui véhiculera les informations nécessaires entre les différents Ecrans du Dialogue,
  • Le code du premier Ecran, c'est-à-dire, l'Ecran qui sera affiché au moment du lancement de la transaction,
  • Les caractéristiques du fichier des libellés d'erreur du Dialogue.
Les caractéristiques physiques du fichier des libellés d'erreur et la zone commune de conversation peuvent être fournies quel que soit le moniteur de temps réel.

Les autres options sont utilisées en fonction du matériel et du moniteur TP.

Plusieurs valeurs peuvent être saisie dans la zone Options, séparées par un blanc. Lors de la génération de l'Ecran, un message de type warning signale les paramètres erronés.

Zone commune de conversation

La zone commune de conversation constitue la zone d'échange entre les différents Ecrans du Dialogue.

SD pour Zone commune de conversation
Par défaut, aucune zone de conversation n'est indiquée et la zone s'intitule 'Zone commune de conversation non définie'.

Pour indiquer une zone de conversation, cliquez sur le bouton Modifier et sélectionnez une Structure de Données.

Lorsque plusieurs Segments sont décrits pour cette Structure de Données, ils sont redéfinis dans la description générée dans les transactions.

Complément longueur de conversation
Vous devez indiquer un nombre dans cette zone si la longueur de la zone commune de conversation dépasse 100 caractères.

La longueur totale de la zone de conversation (5-xxnn-LENGTH dans le programme généré) est constituée par les longueurs combinées d'une zone de mémorisation du code Ecran (6 caractères), du fichier zone commune de conversation utilisateur, de la zone permettant de mémoriser les clés d'accès aux Segments en affichage et de renseignements technologiques (transparents pour l'utilisateur).

Dans le calcul de cette longueur, il faut prendre en compte le fait que :
  • La longueur correspondant aux clés d'accès de chaque Segment en affichage est calculée par catégorie.
    Exemple : si un Segment est utilisé dans l'en-tête, dans la catégorie répétitive et dans la catégorie de fin, la longueur des clés mémorisées pour ce Segment est :
    • 1 fois la longueur de la clé pour l'en-tête,
    • + 2 fois la longueur de la clé pour la répétitive (clé de début et clé de fin),
    • + 1 fois la longueur de la clé pour la fin d'écran..
  • Avec une option de génération MDT-OFF (voir la zone Options) ou, pour BULL multi-écrans et UNISYS Série A, une option DYNPRT (protection automatique des champs variables), vous devez tenir compte, dans le calcul de de cette longueur, de la longueur du plus long fichier Ecran du Dialogue considéré.
PSB ou code Sous-schéma
Cette zone est féservée aux Segments de Bases de données DL/1.

Le code du PCB du fichier libellés d'erreur doit appartenir au PSB du Dialogue.

Pour HP3000, vous devez indiquer le code Bloc de la Base ALLBASE/SQL, pour générer le moniteur avec une connexion à la Base.
Premier Ecran du Dialogue
Cette zone permet d'indiquer le premier Ecran de la transaction.
Selon la variante COBOL à générer, les spécifications de ce code sont différentes :
  • Pour CICS :

    Si aucun Ecran n'est pas indiqué, la COMMON-AREA de chaque Ecran du Dialogue est générée en WORKING-STORAGE SECTION.

    Si un Ecran est indiqué, la COMMON-AREA de chaque Ecran du Dialogue est générée en LINKAGE SECTION, sauf pour le premier Ecran indiqué pour lequel elle est générée en WORKING-STORAGE SECTION.

  • Pour IMS :

    Le module Dialogue génère un moniteur d'enchaînement. Ce moniteur enchaîne sur l'Ecran indiqué quand on débute la conversation et renvoie cet Ecran à la fin de la conversation. (Les noms externes du premier Ecran affiché et du programme correspondant doivent avoir été indiqués au niveau de l'onglet Définition de l'Ecran concerné.)

    Le code est obligatoire même si l'option MONITOFF a été indiquée.

  • Pour GCOS7 and GCOS8 :

    Cette zone est utilisée uniquement pour les transactions de type multi-écrans.

  • Pour DEC/VAX, MICROFOCUS et HP3000 :

    Un moniteur d'enchaînement est généré . Ce moniteur enchaîne sur l'Ecran indiqué au début de la conversation.

  • Pour UNISYS-A :

    Cette zone est utilisée uniquement pour les transactions de type multi-écrans.

  • Pour UNISYS-2200 :

    Cette zone n'est pas utilisée.

Options
Dans cette zone, vous saisissez des options, séparées par un blanc. Il est à noter que toutes ces options sont aussi saisissables dans la section Lignes -GO de l'onglet Lignes -G.
Remarque : Un synonyme a été associé à certaines options pour permettre la saisie de toutes les options nécessaires.
Valeur Signification
ATTRE UNISYS 2200: Définition des attributs par défaut au niveau de l'Ecran.
ATTRIB UNISYS 2200: L'affichage des attributs spécifiés dynamiquement (Clignotant et Inversion) est conservé. Cette option agit sur la fonction F7020.

CICS: Prise en compte de la modification dynamique des attributs de présentation. Cette option agit sur la fonction .F7020.

CSSA Mémorisation de toutes les SSAs utilisées lors d'un accès généré aux Bases de Données. Cette option allonge la zone de communication et est valide pour tous les Ecrans du Dialogue.

Il est donc nécessaire de recompiler tous les Ecrans du Dialogue lorsqu'on modifie cette option.

CVISION GCOS6: Permet de descendre les contrôles standard (contrôle de numéricité, contrôle de présence et mise en forme du caractère d'initialisation) au niveau du gestionnaire d'écran CVISION, améliorant ainsi les performances.
DCPROC Pour les tables DB2, NONSTOP SQL et DATACOM, génération des DECLARE CURSEUR en PROCEDURE DIVISION fonction FOC.

Si vous ne sélectionnez pas cette option, les DECLARE CURSEUR seront générés en WORKING STORAGE SECTION.

DFHAID IBM CICS : Initialisation de la Table des PFKEYS avec le contenu de DFHAID.
DYNAM Appel des tables Pactables en Call Dynamique.
DYNPRT Prise en compte de la protection des champs variables dans la table EN-AT (poste 5) et traitement automatique de cette protection en F7020.

Pour prendre en compte la protection, vous devez placer un F dans le poste 5 de la table EN-AT pour la Rubrique concernée. Attention, les Rubriques deviennent protégées et transmissibles.

Cette option n'est pas opérationnelle pour les variantes IBM 36 et UNISYS série A format SDF

F10 Traitement de chaque catégorie (en-tête, répétitive, bas de page), à condition qu'elle contienne au moins une zone variable ou un accès à un Segment.
FOR Formatage du COBOL généré. La DATA DIVISION sera générée avec justification à gauche, tandis que la PROCEDURE DIVISION sera générée sans justification et à raison d'un ordre COBOL par ligne.

Cette option peut être déclarée dans l'onglet Définition de la Bibliothèque.

Dans ce cas, le Dialogue est généré avec formatage du COBOL, même si l'option FOR n'est pas indiquée ici.

Avec cette option, jusqu'à 150 lignes sont possibles dans un paragraphe COBOL (entre deux points).
Attention : Cette option existe toujours mais n'est plus maintenue.
HEXVAL UNISYS A : Génération des zones à value HEXADECIMAL en PIC XX.
HLPI Génération de l'accès aux fichiers à l'aide de l'interface HLPI.
HLPVAL Envoi dans le fichier libellés d'erreur des valeurs à contrôler indiquées dans les Lignes -D d'une Rubrique, même si ce contrôle a été supprimé au niveau de l'Ecran dans lequel est appelée cette Rubrique.
HPRT Appel de la documentation associée aux champs protégés (nature P et F). Elle comprend la documentation associée à la Rubrique ainsi que les Textes ou commentaires associés. dans les lignes de commentaires de l'Ecran.

Dans le programme souffleur, l'enchaînement des écrans de documentation se fera d'abord sur les Rubriques variables, puis sur les Rubriques protégées dans l'ordre de l'onglet Lignes -CE.

IMSME Génération de la variante 'Multi-Ecrans' pour IMS.
INDEXS DL1: Génération automatique des accès aux Segments par index secondaires.

Cette option est incompatible avec l'option NOPSB si le code Segment cible est différent du code Segment source et si ce dernier n'est pas généré dans la zone PSB.

LOGMES Variantes CICS multi-écrans et MicroFocus : génération d'un message logique qui gère l'affichage d'écran et l'envoi de message vers le moniteur de communication sélectionné par l'option MONIT (si elle n'est pas définie par défaut dans la variante).

AS400 et IMS: Cette option est utilisée uniquement pour le Web.

LPAGE or LPA Gestion du LOGICAL PAGING selon les 2 modes possibles : implicite (utilisation de la touche PA1) et explicite (utilisation d'un opérateur de pagination dans les lignes -CE de l'Ecran),

Cette option est disponible avec l'utilisation d'un moniteur, d'un sous-moniteur ou avec MONITOFF.

Avec MONITOFF, la pagination ne peut se faire que sur le même Ecran.

Dans le cas d'utilisation d'un moniteur ou d'un sous-moniteur, la pagination peut se faire sur le même Ecran ou sur des Ecrans différents. Si elle se fait sur des Ecrans différents, il faut indiquer quels sont les Ecrans qui participent à la pagination, au niveau des lignes -W du Dialogue.
Remarque : Avec les sous-moniteurs, tous les Ecrans qui composent un groupe de pagination doivent être dans le même sous-moniteur.

Les options LPAGE et SWAP sont incompatibles. Si elles sont indiquées toutes les deux, l'option SWAP est ignorée.

MONIT UNISYS A Series: Génération avec moniteur.

IBM CICS: Génération avec moniteur.

MONITOFF or MOFF IMS: Obtention d'un code transaction par Ecran du Dialogue et pas de génération de moniteur.

Les options MONITOFF et NOTRAC sont incompatibles. Si les deux sont renseignées, seule l'option MONITOFF est traitée.

NOATTR IMS: Génération des champs protégés dans le MOD sans leurs attributs (ATTR=YES). Cette option est valide pour tous les Ecrans d'un même Dialogue.
NOLOCK AS400: Lecture des Segments sans mise à jour avec ajout de la clause WITH NO LOCK dans la fonction de lecture lorsque le fichier est ouvert en OPEN I-O.

Cette option est inopérante si on accède à plusieurs Segments du même fichier en réception, seuls certains d'entre eux étant mis à jour, car le READ WITH NO LOCK enlève le verrou précédent.

NOOPEN MICROFOCUS et DEC: Optimisation des ouvertures des fichiers HE (sauvegarde du HELP) et LE, OU, EM (libellés d'erreur) ainsi que le CONNECT à ORACLE.
NOOPENB HP3000, TurboImage: Interruption de l'ouverture de la base TurboImage, pas de génération de OPEN dans le programme.
NOPSB Limitation de la génération des Segments :

Dans chaque Ecran, seuls les Segments utilisés et leurs parents hiérarchiques sont générés. Dans le moniteur et les sous-moniteurs, la zone PSB n'est plus générée ni transmise aux Ecrans.

NOSAV With DEC/VAX, GCOS7, MICROFOCUS, ICL, IBM 36 and 38, et BOS/TP: Evite la génération de la description et l'accès physique au fichier HE (HELP).
NOSDERR UNISYS 2200: Reconnaissance de la Rubrique LIERR dans le message qui n'est donc pas envoyé par la clause SEND ERROR.
NOTRAC IMS: Pas de génération du code transaction dans le MID du premier Ecran de Dialogue.
OCF Positionnement à '1' de OCF dès la première entrée dans le programme.
OFF Les programmes et les maps du Dialogue seront générés avec l'option MDT-OFF (valeur par défaut pour GCOS7 FORMS).
ON Les programmes et les maps du Dialogue seront générés avec l'option MDT-ON (valeur par défaut, sauf pour GCOS7 FORMS).
PACSQL Prise en compte des données saisies dans les Lignes -GG du Segment pour les ordres SQL.
PSBINIT Ecran CICS-DL1 avec option moniteur: Cette option permet d'effectuer la connexion au PSB et sa fermeture (SCHEDULE PSB et TERMINATE) au niveau du sous-moniteur et non plus au niveau de chaque Ecran.
REFER ou REF Génération de la liste de toutes les Rubriques référencées dans le programme Dialogue. Cette liste apparaît en WORKING-STORAGE SECTION en commentaire. Elle comporte les :
  • Rubriques des Segments appelés dans l'Ecran ou le Dialogue sur des lignes -CS,
  • Rubriques des Segments appelés sur des lignes -W de type F,
  • Rubriques appelées directement sur des lignes -W de type I, E ou S,
  • Rubriques appelées dans l'Ecran ou le Dialogue, sur des lignes -CE.
REPET ou RPT Contrôle, transfert et positionnement des attributs des zones variables répétées horizontalement et/ou verticalement.

Si une zone répétée est utilisée pour l'accès à un Segment, il faut indiquer le nombre de répétitions au niveau de l'appel des Segments dans l'Ecran considéré.

SQLALL ou SQA SQL : Enumération de toutes les colonnes de la table dans les ordres d'accès aux Segments :
(SELECT ALL COLCORUBn, ...  
        INTO   :FFNN-CORUBn)
SQLCA ou SQC SQL : Génération de l'ordre INCLUDE SQLCA en WORKING-STORAGE s'il y a au moins un Segment DB2 ou Non-Stop SQL appelé dans l'Ecran (Onglet Lignes -CS, Organisation = S, Q ou N).
SQLIND ou SQI Génération d'indicateurs de présence de la Rubrique avant sa mise à jour ou son affichage.
SQLREF ou SQR Génération des indicateurs de la nouvelle structure V-FFnn-CORUB, permettant la gestion automatique de références croisées.
SSMON Indique, pour chaque Ecran, qu'on prend le PSB du sous-moniteur auquel il appartient. Permet de générer un PSB par sous-moniteur et non un PSB général pour tout le Dialogue (voir aussi la section Lignes -GG de l'onglet Lignes -G ).
SWAP Avec l'utilisation d'un moniteur ou d'un sous-moniteur permet d'indiquer, dans la map MFS, le code Ecran de débranchement via une touche fonction. Dans les maps la zone FUNC est générée sur 10 caractères. Cette zone comporte la valeur de la touche fonction et le nom externe du prochain Ecran à appeler.

En cas de fin de conversation, le nom externe est à blanc.

En cas de débranchement différé ou de traitement de la PFKEY comme alimentation du code opération, le nom externe est celui qui correspond à la map générée. Le traitement de cette zone est effectué dans le moniteur ou le sous-moniteur.

Cette option améliore les performances, car il n'est nécessaire de rappeler le programme pour effectuer le débranchement.

TMF TANDEM : Prise en compte du mode transactionnel par génération des ordres BEGIN-TRANSACTION et END-TRANSACTION dans les requesters et des ordres BEGIN-WORK et COMMIT-WORK dans le moniteur transactionnel PacWeb.
TS CICS : Gestion de la zone de communication en dehors de la LINKAGE SECTION. Cette zone est décrite en WORKING et sauvegardée par défaut en TEMPORARY STORAGE. En cas de MDTOFF et d'appel de la fonction souffleur, l'écran est sauvegardé dans une seule zone.
TZVAR BULL multi-écrans : alimentation des zones de réception et d'affichage en cas d'erreur.
ZNUM GCOS7 (sauf GCOS7 FORMS) et GCOS8 : Alimentation des zones numériques dans le message (F8145) effectuée uniquement si aucune erreur n'a été détectée (GR-EG=0).

Fichier d'erreur

Vous précisez ici les caractéristiques physiques du fichier des libellés d'erreur, afin que la description de ce fichier et ses accès puissent être générés.

Les accès physiques sont générés en fonction F8098. Si vous désirez les ré-écrire, vous devez écraser cette sous-fonction.

Organisation
Cette zone permet d'indiquer le type d'organisation du fichier des libellés d'erreur :
  • : Aucune
  • D: Segment de base DL/1

    La description du fichier des libellés d'erreur et les ordres d'accès à ce fichier sont générés automatiquement. En IMS, la description du fichier libellés d'erreur n'est pas générée automatiquement. Vous devez la décrire dans un Segment appelé par un Bloc hiérarchique.

  • S: Base DB2
  • U: Accès par code spécifique
  • V: Organisation indexée
  • Y : UNYSIS 2200 SFS organisation indexée

    Les Segments sont déclarés en FD et les accès sont générés en fonction F80.

Nom externe
Renseignez ici le nom externe du fichier des libellés d'erreur. Sa valeur varie selon la variante COBOL à générer :
  • IBM CICS - VSAM : DDNAME sur 8 positions,
  • GCOS7 - UFAS : Code fichier sur 2 caractères,
  • GCOS8 - TP8 : Nom externe sur 4 caractères (généré dans la clause SELECT); blocage sur les 4 derniers caractères (généré dans la clause FD).
  • TOUTE AUTRE VARIANTE : Nom logique généré dans la clause SELECT.
Pour DL/1, il s'agit du: code du PCB. Le nom du PCB du fichier libellés d'erreur doit appartenir au PSB du Dialogue.

Conditions d'utilisation | Commentaires en retour

Ce centre de documentation utilise la technologie Eclipse. (http://www.eclipse.org)