ADELIA |
VADELIA |
SADELIA |
WADELIA |
EADELIA |
(I/B) |
(I/B) (C/S) |
(B) (S) |
(I/B) (C/S) |
(B) (C/S) |
Warning: In the case of ADELIA programs, this reserved word is only compatible with the Adelia/400 RPG generator.
Type
3.0 N
Use
This reserved word symbolizes the value 100 which enables the *SQLCODE return code, or the return code for an operation performed on a list, to be tested.
Not modifiable by the programmer.
Example
IF &CODE_LST(LIST1:LIST) = *NOT_FOUND |
|
or |
IF *SQLCODE = *NOT_FOUND |