These manipulate bits in fields.
Description: Tests if specified bits are on or off.
Legacy RPG400 Example:
C TESTB '01' Field 99
Modern RPGLE Example:
if %bitand(Field : x'03') = x'03';
// Bits on
endif;
// Bits on
endif;
From AS400 to iSeries to System i to IBM i on Power
These manipulate bits in fields.
Description: Tests if specified bits are on or off.
Legacy RPG400 Example:
Modern RPGLE Example:
Session expired
Please log in again. The login page will open in a new tab. After logging in you can close it and return to this page.