The Macro COBOL editor is used to create and maintain the COBOL source of your Macros. It is important to be careful of the input format indicated in this page.
You must insert identifiers before COBOL statements, so that they can be inserted at the beginning of a program, in the WORKING-STORAGE SECTION or in the PROCEDURE DIVISION. The identifiers must be entered in the left margin, from column 1 to 6. The line numbers must be entered on a line following the line which contains the identifier. The lines of the Macro will be inserted in the locations indicated by the identifiers.
The identifying line is a line on which you define the location in a working area or the information relating to a function/subfunction. If your Macro contains an orphan line (a line which is not preceded by an identifying line), a message warns you.
Paragraph to generate | Identifier |
---|---|
B$n$n | |
API COBOL comments. | B__01 |
PAF comments. | 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 |
Only for line 'DATA DIVISION' | B60 |
Only for line 'FILE SECTION' | B99 |
Rewrite clause FD for file FF | B9*FF |
Identifier | Comment |
---|---|
WXX | XX corresponding to the position in working section. Can be parameterized. |
Identifier | Comment |
---|---|
FXXYY | XX is the function code, YY is the subfunction code. Can be parameterized. |
Identifier | Comment |
---|---|
IXXYY | XX = 2 characters, YY= 2 characters Equivalent to table size in the working section. Indexes L, R, and M can be entered: IXXYYM initialized to the maximum value, IXYYL and IXXYYR initialized to zero. |
JXXYY | XX= function code, YY= subfunction code Equivalent to the indexes used in the loop 'DO'. To be generated in a level 01, you must enter them in a Wxx identifier (see table 2. |
Attributes | Values | Comment |
---|---|---|
TYPE OF PROCESSING | Type of processing to be performed
(optional). When it is indicated, it is the first attribute. Its specificity is to entered as is, without any attribute code (see the example below). These types of service processing are used when a calling entity is generated, to generate the associated COBOL statements: |
|
IT | The condition is entered on the next line. Automatic generation of COBOL statement IF THEN condition and NEXT SENTENCE GO TO Fffss-FN. |
|
EL | Automatic generation of COBOL statement: Fffss-900, GO TO Fffuu-FN. in the associated subfunction Fffss including the type 'IT'. |
|
DO | Automatic generation of COBOL statement: Fffss-900. GO TO Fffss-A. | |
DW | Automatic generation of COBOL statement: Fffss-900. GO TO Fffss. | |
DU | No automatic generation. | |
In a Macro, the type of structure or of condition cannot be parameterized. | ||
LV | Level of function or subfunction (mandatory). For a detail line, no level. Can be parameterized ($). | |
ACTION | Optional. Cannot be parameterized ($) | |
Dialogue and Server models | ||
*A | Insertion before | |
*P | Insertion after | |
*R | In replacement of. | |
Server model | ||
*C | Logical View level | |
*B | Insertion in elementary procedures called by PERFORM. | |
REF | Optional. Used by Dialogue and Server models. Can be parameterized ($). |