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 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 autres options sont utilisées en fonction du matériel et du moniteur TP.
Plusieurs valeurs peuvent être saisies dans la zone Options, séparées par un espace. 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 les faits suivants :- 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 la suivante :
- 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 cette longueur, de la longueur du plus long fichier Ecran du Dialogue considéré.
- La longueur correspondant aux clés d'accès de chaque Segment en affichage est calculée par
catégorie.
- PSB ou code sous-schéma
- Cette zone est ré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 premier Ecran n'est 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, un moniteur d'enchaînement est généré. 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 dans l'onglet
Définition de l'Ecran concerné.
Le code est obligatoire même si l'option MONITOFF a été indiquée.
- Pour GCOS7 et GCOS8, cette zone est utilisée uniquement pour les transactions de type multi-écrans.
- Pour DEC/VAX, MICRO FOCUS 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.
- Pour CICS, si aucun premier Ecran n'est indiqué, la COMMON-AREA de chaque
Ecran du Dialogue est générée en WORKING-STORAGE SECTION.
- Options
- Dans cette zone, vous saisissez des options, séparées par un blanc. La saisie des options n'est
pas contrôlée.
Les options sont différentes selon le type de Dialogue et d'Ecran et la variante de génération.
Référez-vous au Tableau 1 pour les options sur un Dialogue ou Ecran standard. Ces options peuvent aussi être saisies dans les Lignes -GO.
Référez-vous au Tableau 2 pour les options sur un Dialogue ou Ecran Client. D'autres options peuvent être saisies dans les Lignes -GO.
Remarque : Un synonyme a été associé à certaines options pour permettre la saisie de toutes les options nécessaires.Tableau 1. Options sur un Dialogue ou Ecran standard. Ce tableau présente les options que vous pouvez indiquer dans l'onglet Complément d'un Dialogue standard ou dans les Lignes -GO d'un Dialogue ou Ecran standard, avec leur signification. Si les options sont indiquées au niveau du Dialogue, elles deviennent les options par défaut des Ecrans de ce Dialogue.
Valeurs 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.
BREAKDATE Décomposition des Rubriques avec un format date. Les Rubriques au format date seront décomposées en zones élémentaires à la génération.
Dans les Lignes -GO, vous pouvez demander l'inhibition de l'option en saisissant BREAKDATE=NO si cette option a été positionnée à YES au niveau Bibliothèque.
Cette décomposition sera prise en compte dans les entités suivantes :- Les Programmes, pour les Rubriques élémentaires des Segments appelés dans les Lignes -CD et dans les zones de travail (directement dans le code COBOL).
- Les Dialogues et Ecrans pour les Rubriques élémentaires des Segments appelés dans le Complément au Dialogue, dans les Lignes -CS et dans les zones de travail (directement dans le code COBOL).
- Les Rubriques appelées dans les zones de travail.
Si vous activez l'option BREAKDATE, les Rubriques définies avec un format date seront décomposées en zones élémentaires correspondant au jour, au mois et à l'année avec éventuellement le séparateur (si celui-ci est inclus dans le format).
Exemple : Date définie avec un format de type M (JJ/MM/SSAA) :
10 ffnn-date. 11 ffnn-date-JJX. 12 ffnn-date-JJ PICTURE 99. 11 ffnn-date-S1 PICTURE X. 11 ffnn-date-MMX. 12 ffnn-date-MM PICTURE 99. 11 ffnn-date-S2 PICTURE X. 11 ffnn-date-SSX. 12 ffnn-date-AA PICTURE 9(4).
Notes :Une date ne sera décomposée que si le niveau généré correspondant au champ date est inférieur ou égal à 47.
Si une valeur initiale a été indiquée, elle sera générée sur la zone groupe. Toute information supplémentaire (valeur initiale par exemple) doit être saisie sur la même ligne que l'appel de la Rubrique, sur des lignes de type I, E ou S des zones de travail. Si une ligne suite a été indiquée, la date ne sera pas décomposée.
Les Rubriques appelées dans les Segments SQL ne peuvent pas être décomposées, sauf si les Segments sont des Segments DB2 et si l'option DESCR=ALL a été saisie dans les Lignes -GO du Bloc DB2.
Les variables hôtes ne pouvant être des zones groupe, les zones élémentaires seront générées sous un niveau groupe en redéfinition de la façon suivante : ffnn-date-BRK REDEFINES ffnn-date.
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 si cette option est modifiée.
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 Pour IBM® CICS : Initialisation de la table des touches fonction 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. 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 (Lignes -D de la Rubrique) ainsi que les Textes ou commentaires associés (lignes de type C ou T suivant une ligne de type F) dans les Lignes -GE 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 des Lignes -CE.
IMSME IMS : Génération de la variante multi-écrans. INDEXS DL/1 : Génération automatique des accès aux Segments par index secondaires. Cette option est incompatible avec l'option NOPSB si le Segment cible est différent du Segment source et si ce dernier n'est pas généré dans la zone PSB.
LOGMES CICS multi-écrans et MICRO FOCUS : 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 ou 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 zones de travail 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 IBM CICS et UNISYS A Series : Génération avec moniteur. MONITOFF ou 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 AS/400 : 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.
NOOCF A la première entrée dans le programme, OCF ne sera pas positionnée à 1 (suppression de la fonction F0160). NOOPEN MICRO FOCUS et DEC : Optimisation des ouvertures des fichiers HE (sauvegarde du HELP) et LE, OU, EM (libellés d'erreur) ainsi que le CONNECT à ORACLE. 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.
NORPT Pas de traitement automatique des Rubriques répétées (contrôle, transfert et positionnement des attributs). NOSAV DEC/VAX, GCOS7, MICRO FOCUS, ICL et IBM 38 : 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 Génération des programmes et mappes du Dialogue avec l'option MDT-OFF (valeur par défaut pour GCOS7 FORMS). ON Génération des programmes et mappes du Dialogue 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 CICS-DL/1 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 suivantes : - Rubriques des Segments appelés dans l'Ecran ou le Dialogue sur des lignes -CS,
- Rubriques des Segments appelés dans des zones de travail de type F,
- Rubriques appelées directement sur des zones de travail 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 SECTION s'il y a au moins un Segment DB2 ou NonStop 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 Pour chaque Ecran, prise en compte du 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 les Lignes -GG). SWAP IMS: Option à utiliser avec un moniteur ou un sous-moniteur. Permet d'indiquer, dans la mappe MFS, l'Ecran de débranchement à partir d'une touche fonction. Dans les mappes, 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 touche fonction comme alimentation du code opération, le nom externe est celui qui correspond à la mappe 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.
Remarque : Si l'option MONITOFF ou LPAGE est indiquée, l'option SWAP n'est pas prise en compte.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-STORAGE SECTION 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). Tableau 2. Options sur un Dialogue Client. Ce tableau présente les options que vous pouvez indiquer dans l'onglet Complément d'un Dialogue Client, avec leur signification. Ces options deviennent alors les options par défaut des Ecrans de ce Dialogue.
D'autres options peuvent être indiquées dans les Lignes -GO.
Valeurs Signification HPRT Appel de la documentation associée aux champs protégés (nature P et F). Elle comprend la documentation associée à la Rubrique (Lignes -D de la Rubrique) ainsi que les Textes ou commentaires associés (lignes de type C ou T suivant une ligne de type F) dans les Lignes -GE 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 des Lignes -CE.
INICHECK Gestion de la présence des Rubriques. Option réservée à un Dialogue Client.
Un buffer de présence des données est généré et initialisé à P (champ absent). Lors des transferts en vue d'une mise à jour (fonction F30), le poste de chaque champ effectivement transféré sera positionné à N. Les transferts en affichage seront aussi conditionnés par la présence du champ.
MONIT Utilisation d’un moniteur ou sous-moniteur client. Le transfert d’un client à un autre ainsi que l’appel des serveurs se fera dans le moniteur. Dans le cas des variantes pour lesquelles le moniteur est obligatoire (MICRO FOCUS), cette option permet de gérer les appels des serveurs dans le moniteur.
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. NOOCF A la première entrée dans le programme, OCF ne sera pas positionnée à 1 (suppression de la fonction F0160). NORPT Pas de traitement automatique des Rubriques répétées (contrôle, transfert et positionnement des attributs). NOSAV DEC/VAX, GCOS7, MICRO FOCUS, ICL et IBM 38 : Evite la génération de la description et l'accès physique au fichier HE (HELP). NOTRAC IMS : Pas de génération du code transaction dans le MID du premier Ecran de Dialogue. OFF Génération des programmes et mappes du Dialogue avec l'option MDT-OFF (valeur par défaut pour GCOS7 FORMS). ON Génération des programmes et mappes du Dialogue avec l'option MDT-ON (valeur par défaut, sauf pour GCOS7 FORMS). SERVER MICRO FOCUS WINDOWS N/T : Gestion de l'affichage par le serveur multip-applications. 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-STORAGE SECTION 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.
Fichier d'erreur
Précisez 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
- Indiquez le nom externe du fichier des libellés d'erreur. Sa valeur varie selon la variante
COBOL à générer :
- Pour IBM CICS - VSAM, indiquez un DDNAME sur 8 positions.
- Pour GCOS7 - UFAS, indiquez un code fichier sur 2 caractères.
- Pour GCOS8 - TP8, indiquez un nom externe sur 4 caractères (généré dans la clause SELECT) et un blocage sur les 4 derniers caractères (généré dans la clause FD).
- Pour toute autre variante, indiquez un nom logique, généré dans la clause SELECT.