Ces micro-patterns sont des commentaires formatés insérés
dans le code d'un Programme, d'un Ecran, d'un Serveur
ou d'une Macro. Ces commentaires appellent des Rubriques dans
les zones de travail et de liens. Après une regénération du Programme,
de l'Ecran ou du Serveur, ces micro-patterns seront complétés
avec le format ou l'usage des Rubriques appelées, tels qu'ils
sont déclarés dans le référentiel.
Format de saisie
Vous pouvez insérer ces
micro-patterns dans les sections
WORKING-STORAGE et
LINKAGE du
code COBOL, en utilisant l'éditeur COBOL
PDP ou l'onglet
Source
COBOL des Macros.
Remarque : Vous pouvez saisir intégralement
les micro-patterns ou utiliser le masque de saisie disponible depuis
la vue Fragments de Rational Developer for
System z, dans la catégorie Fragments RPP.
Vous
devez déclarer une donnée COBOL sans le format.
Il existe trois
types de micro-patterns, que vous saisissez de la même façon ; seul
l'identifiant du micro-pattern diffère. Cet identifiant détermine
lequel des trois formats de la Rubrique sera récupéré lors de la prochaine
génération.
Pour appeler une Rubrique en tant que zone de travail
et de liens, vous devez saisir un des deux groupes de lignes suivants
(les deux produisent la même génération) :
*!WX
01 DDSS-CORUB
VALUE SPACE.
ou
*!WX
01 DDSS-CORUB VALUE SPACE.
où :
Remarque : Dans une Macro, vous pouvez paramétrer la saisie, sauf
les balises de début et de fin. Donc, par exemple, vous pouvez saisir
:
*!WI
$1
ou
*!WI
01 DDSS-RUB$1.
Résultat de la génération
Après la re-génération
du Programme, de l'Ecran, du Serveur ou de la Macro, les micro-patterns
sont complétés avec un des formats de la Rubrique (selon l'identifiant
du micro-pattern) ou l'usage de la Rubrique. Les lignes suivantes
montrent quelques exemples de micro-patterns complétés après la génération
:
- Pour une Rubrique avec un format :X et
un usage D: DISPLAY, le micro-pattern généré
sera :
*!WX
01 DDSS-CORUB
PICTURE X.
- Pour une Rubrique avec un format S9(4) et
un usage 3: COMPUTATIONAL-3, le micro-pattern
généré sera :
*!WX
01 DDSS-CORUB
PICTURE S9(4) COMP-3.
- Pour une Rubrique avec un format non renseigné et un usage J:
COMPUTATIONAL-6, le micro-pattern généré sera :
*!WX
01 DDSS-CORUB
COMP-6.