ADELIA |
|
|
|
|
(I) |
|
|
|
|
Section for use
INITIALIZATION, VERIFICATION, VALIDATION, TRANSACTION, SFTKYS_PROCESS, or any other section, specifying the transaction number.
Syntax
REVERSE_IMAGE Option SeriesVarId Transaction
Option |
→ |
*ON | *OFF | None |
|
|
|
SeriesVarId |
→ |
SeriesVarId VarId | VarId |
|
|
|
Transaction |
→ |
TransactionNum | None |
Description
This instruction is used to condition a screen field display. A DDS screen attribute DSPATR(RI) is generated for all fields SeriesVarId indicated after this instruction. The attribute is preceded by an indicator in the screen file; this indicator is then activated by the program after the instruction is executed.
Whenever this instruction is used without *ON or *OFF, it is deactivated after each screen reading (indicator reset to 0), as well as by the instructions END_MANAGE_SFL and END_ADD_SFL when placed in a MANAGE_SFL/END_MANAGE_SFL or ADD_SFL/END_ADD_SFL block.
It is only possible to mention a transaction number if this instruction is used with *ON or *OFF.
When the instruction is used with *ON, it remains activated until executed with *OFF, for the same group of variables.
Notes:
- A variable used with a group of variables must always be used with this same group.
- For a specific variable, this instruction cannot be used once with *ON or *OFF and another time without *ON or *OFF.
Example
IF CUSTOMER_VIEW EXISTS
REVERSE_IMAGE *ON ZORDER_NBR ZORDER_DATE ZORDER_CUST_COD
END
*
BEGIN_PROCEDURE ENTRY
*
* this procedure deals with transaction # 3
*
IF ACTION_CODE = 'DELETE'
REVERSE_IMAGE *OFF ZORDER_NBR ZORDER_DATE ZORDER_CUST_COD 03
PROTECT *ON ZORDER_NBR ZORDER_DATE ZORDER_CUST_COD 03
ELSE
REVERSE_IMAGE *ON ZORDER_NBR ZORDER_DATE ZORDER_CUST_COD 03
PROTECT *OFF ZORDER_NBR ZORDER_DATE ZORDER_CUST_COD 03
END
END_PROCEDURE