Rational Programming Patterns

Micro-patterns de débranchement

Tous ces micro-patterns génèrent des ordres GO TO, soit dans une itération, soit dans une fonction ou sous-fonction. Les micro-patterns GFT et GDI permettent de gérer les itérations dans un Programme, Ecran ou Serveur. Les micro-patterns GB et GT permettent de gérer les débranchements dans des fonctions ou sous-fonctions.

GFT provoque l'abandon de l'itération de plus haut niveau en cours alors que GDI provoque le retour au début de l'itération de plus haut niveau en cours.

GB provoque l'abandon de l'itération en cours, dont le niveau est indiqué en opérande, avec un retour en tête de la boucle. GT provoque le débranchement à la fin de la fonction ou sous-fonction à laquelle appartient l'instruction et dont le niveau est indiqué en opérande.
Remarque : Si la fonction ou sous-fonction est de type IT et si elle est utilisée avec une fonction ou sous-fonction de type EL, les micro-patterns GB et GT à ce niveau renvoient au début de la fonction ou sous-fonction de type EL.

Pour tous ces micro-patterns, l'instruction générée se termine systématiquement par un point.

Remarque : Il existe d' autres micro-patterns de débranchement : GF, GFA, GD et GDB. Comme ils sont spécifiques aux modules Dialogue et Pacbench C/S, ils sont documentés avec les autres micro-patterns spécifiques à ces modules.

Format de saisie

La saisie s'effectue dans le code COBOL d'un Programme, Ecran ou Serveur avec l'éditeur de COBOL PDP, ou dans le code d'une Macro sous l'onglet Source COBOL de l'éditeur de design d'une Macro.

La saisie des micro-patterns de gestion des itérations est la suivante :
      *!GX
où :
  • *! est la balise de début du micro-pattern, obligatoire. Le * doit être saisi en colonne 7, réservée aux commentaires dans le code COBOL, et le ! doit être saisi en colonne 8.
  • GX est l'identifiant du micro-pattern : GFT ou GDI.
Remarque : Une fois l'instance regénérée, les micro-patterns sont complétés différemment en fonction de l'entité et de la fonction dans lesquels le micro-pattern est indiqué.
La saisie des micro-patterns de débranchement dans une fonction ou sous-fonction est la suivante :
      *!GX "NN"
où :
  • *! est la balise de début du micro-pattern, obligatoire. Le * doit être saisi en colonne 7, réservée aux commentaires dans le code COBOL, et le ! doit être saisi en colonne 8.
  • GX est l'identifiant du micro-pattern : GF ou GT.
  • " " doit encadrer les opérandes.
  • NN représente un niveau de fonction ou sous-fonction.

Résultat de la génération pour GFT

Dans un Programme généré, GFT positionne les indicateurs de fin de traitement des fichiers et débranche à la fonction de fin de programme (F20) :
   MOVE ALL ‘1' TO FT GO TO F20.
Dans un Ecran (Ecran standard ou client) généré, GFT débranche à la fin du traitement des catégories.
  • Dans une fonction < F39, GFT produit :
    GO TO F39999-ITER-FT.
  • Dans une fonction > F39, GFT produit :
    GO TO F69999-ITER-FT.
Dans un Serveur généré, GFT débranche à la fin du traitement des catégories :
  • Dans une fonction de contrôle et mise à jour (Fvunn-CHUP), GFT produit :
    GO TO Fvunn-CHUP-CATR-FN.
  • Dans une fonction de sélection (Fvunn-SELC), GFT produit :
    GO TO Fvunn-SELC-CATR-FN.

Résultat de la génération pour GDI

Dans un Programme généré, GDI provoque le retour au début de l'itération (F05) :
   GO TO F05.
Dans un Ecran (Ecran standard ou client) généré, GDI provoque le passage à l'occurrence suivante de la catégorie en cours ou à la catégorie suivante.
  • Dans une fonction < F39, GDI produit :
    GO TO F39999-ITER-FI.
  • Dans une fonction > F39, GDI produit :
    GO TO F69999-ITER-FI.
Dans un Serveur généré, GDI provoque le passage à l'occurrence suivante de la catégorie en cours ou à la catégorie suivante.
  • Dans une fonction de contrôle et mise à jour (Fvunn-CHUP), GDI produit :
    GO TO Fvunn-CHUP-CATR-SRVx-DONE.
  • Dans une fonction de sélection (Fvunn-SELC), GDI produit :
    GO TO Fvunn-SELC-CATR-SRVx-DONE.

Résultat de la génération pour GB

La génération produit la ligne suivante :
GO TO Fffss-900.
dans laquelle ffss est la fonction ou sous-fonction dont le niveau est indiqué en opérande.

Résultat de la génération pour GT

La génération produit la ligne suivante :
GO TO Fffss-FN.
dans laquelle ffss est la fonction ou sous-fonction à laquelle appartient l'instruction et dont le niveau est indiqué en opérande.

Conditions d'utilisation | Commentaires en retour

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