ADELIA |
|
|
|
|
(I) |
|
|
|
|
Section for use
INITIALIZATION, VERIFICATION, VALIDATION, TRANSACTION, SFTKYS_PROCESS, or any other section, specifying the transaction number.
Syntax
PROTECT Option SeriesVarId Transaction
Option |
→ |
*ON | *OFF | None |
|
|
|
SeriesVarId |
→ |
SeriesVarId VarId | VarId |
|
|
|
Transaction |
→ |
TransactionNum | None |
Description
This instruction is used to condition a screen field entry SeriesVarId. A DDS screen attribute DSPATR(PR) is generated for all fields 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. The instruction can only be used on input or input/output fields.
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 END_MANAGE_SFL and END_ADD_SFL instructions 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 TransactionNum 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 MODE = 'CREATE'
POS_CURSOR *ON Z_ORDER_NBR
PROTECT *OFF Z_ORDER_NBR ZO_COMPANY ZO_WAREHOUSE
POS_CURSOR *OFF Z_CUST_CODE
ELSE
POS_CURSOR *OFF Z_ORDER_NBR
PROTECT *ON Z_ORDER_NBR ZO_COMPANY ZO_WAREHOUSE
POS_CURSOR *ON Z_CUST_CODE
END
List of 4GL instructions by topic