All instructions must be entered in UPPER CASE letters. Only comments can be entered in lower case.
A space must be left between each instruction, variable or reserved word. Some instructions require these blanks; in general, this procedure makes the program more readable.
Write only one instruction per line.
Example:
IF CUST_BALANCE < 0 OR PAYMENT_DELAY > 35
MAKE_BLINK Z_CUST_NAME
END
(3 instructions => 3 lines)
When generating in RPG, instructions can be up to 2,000 characters long, but only the first 250 characters of a source line are taken into account. For the instructions with length exceeding 250 characters, you can use the continuation character "-" in the line and continue your instruction in the following line.
Example:
IF CUST_BALANCE < 0 –
OR PAYMENT_DELAY > 35
MAKE_BLINK Z_CUST_NAME
END
(3 instructions => 4 lines)
The lines of comment cannot exceed 250 characters in length.
Instructions for macro-instructions cannot exceed 250 characters.
Remarks can be entered on separate lines, with an asterisk (*) at the beginning of the line. Leave a space after the asterisk, to avoid confusion between remarks and reserved words.
Example:
* Country code control
*
IF COUNTRY_CODE = 'USA'
CALL SELECT_STATE STATE_CODE
END
In programs, only use guide words to identify:
- variables (files, layouts, calculations, etc.),
- views,
- print formats,
- called programs,
- arrays,
- control breaks.
Even though Adelia automatically associates indicators to your operations, you can use them in your programs with the reserved words *INxx.
Warning: Be careful not to use those which were defined in the environment attributes, on the 3GL Generation - Indicators tab.
To test the function keys, use the reserved words *CDExx or *Fxx or *NCDxx or *NFxx.
Example:
IF *CDE12 |
or |
IF *F12 |
TERMINATE |
|
TERMINATE |
END |
END |
|
|
|
|
IF *NCD06 |
or |
IF *NF06 |
PROCESS 01 |
|
PROCESS 01 |
END |
|
END |