L'éditeur de COBOL de la Macro permet de créer ou de maintenir le source COBOL de vos Macros. Il convient de respecter la syntaxe de la saisie indiquée dans cette page.
Les instructions COBOL doivent être introduites par des identifiants afin de permettre leur placement en début de programme, en WORKING-STORAGE SECTION ou en PROCEDURE DIVISION. Les identifiants doivent être saisis dans la marge de gauche, de la colonne 1 à 6. Les numéros de lignes doivent être insérés sur la ligne à la suite de la ligne qui contient l'identifiant. Les lignes de la Macro seront insérées aux emplacements correspondant aux identifiants.
La ligne identifiante est une ligne sur laquelle on définit l'emplacement en zone de travail (en working) ou les informations relatives à la fonction/sous-fonction. Si votre Macro contient une ligne orpheline, c'est-à-dire une ligne qui n'est pas précédée d'une ligne identifiante, un message apparaît pour vous en avertir.
Paragraphes générés | Identifiant |
---|---|
B$n$n | |
Commentaire API COBOL | B__01 |
Commentaire PAF | B__05 |
PROGRAM-ID | B__10 |
AUTHOR | B__20 |
DATE-COMPILED | B__30 |
ENVIRONMENT DIVISION | B__40 |
CONFIGURATION SECTION | B00 |
SOURCE-COMPUTER | B0000 |
OBJECT-COMPUTER | B0010 |
SPECIAL-NAMES | B0020 |
INPUT-OUTPUT SECTION | B01 |
FILE-CONTROL | B01 |
SELECT FF-FICHIER | B01FF |
I-O-CONTROL | B0100 |
Est réservé à la ligne 'DATA DIVISION' | B60 |
Est réservé à la ligne 'FILE SECTION' | B99 |
Réécriture de la clause FD pour le fichier FF | B9*FF |
Identifiant | Commentaire |
---|---|
WXX | XX correspond à l'emplacement en working. Peut être paramétré. |
Identifiant | Commentaire |
---|---|
FXXYY | XX est le code fonction, YY est le code sous-fonction. Peuvent être paramétrés |
Identifiant | Commentaire |
---|---|
IXXYY | Equivaut à la dimension de table à renseigner
dans la zone working. XX = 2 caractères, YY= 2 caractères Equivaut à une dimension de table. Les indices L, R, et M peuvent y être saisis : IXXYYM initialisé à la valeur maximale et IXYYL et IXXYYR initialisés à zéro. |
JXXYY | XX= code fonction, YY= code sous-fonction Equivaut à un indice utilisé dans une boucle DO. Pour qu'ils soient générés sous un niveau 01 de votre choix, vous devez les saisir sous un identifiant Wxx (se reporter au tableau 2. |
Attributs | Valeurs | Commentaires |
---|---|---|
TYPE DE TRAITEMENT | Type de traitement à réaliser
(facultatif). Lorsqu'il est renseigné, c'est le premier attribut. Sa particularité est d'être saisi tel quel, sans code attribut (voir exemple ci-dessous). Ces types permettent, lors de la génération de l'entité appelante, de générer les ordres COBOL associés : |
|
IT | La condition est saisie sur la ligne suivante. Génération automatique de l'ordre COBOL IF THEN condition et NEXT SENTENCE GO TO Fffss-FN. |
|
EL | Génération automatique de l'ordre COBOL
: Fffss-900, GO TO Fffuu-FN. sur la sous-fonction Fffss associée portant le type IT. |
|
DO | Génération automatique de l'ordre COBOL : Fffss-900. GO TO Fffss-A. | |
DW | Génération automatique de l'ordre COBOL : Fffss-900. GO TO Fffss. | |
DU | Pas de génération automatique. | |
Dans une Macro le type de structure ou de condition ne peut pas être paramétré. | ||
LV | Niveau de la fonction ou sous-fonction (obligatoire). Pour une ligne détail, pas de niveau. Peut être paramétré ($). | |
ACTION | Facultatif. Non paramétrable ($) | |
Modèles Dialogue et Serveur | ||
*A | Insertion avant | |
*P | Insertion après | |
*R | Remplacement | |
Modèle serveur | ||
*C | Niveau Vue Logique | |
*B | Insertion dans traitements élémentaires appelés par PERFORM. | |
REF | Facultatif. Utilisé par les modèles Dialogue et Serveur. Peut être paramétré ($). |