PURPOSE: This statement/command restores the settings of all the ENABLE/DISABLE options saved by a previous ENABLE TO statement/command. The user specifies the integer identifier returned by the ENABLE TO statement/command to specify the set of saved ENABLE/DISABLE options. ENABLE FROM can be used in a Command Module (CM), a Process Module (PM), or at command level.
ENABLE FROM integer_field
|
integer_field |
specifies a user-defined field, a modifiable system field, or a Global Storage (GS) field. This integer field contains the identifier of the settings returned by the ENABLE TO statement/command. |
ENABLE TO ORIGINAL_SETTING
DISABLE ERROR MESSAGES, WARNING MESSAGES, AUX MESSAGES
…
ENABLE TO SECOND_LEVEL_SETTING
…
ENABLE EUROPEAN DATE
…
ENABLE FROM ORIGINAL_SETTING
…
ENABLE FROM SECOND_LEVEL_SETTING
This example saves the settings of the ENABLE/DISABLE options, disables ERROR MESSAGES, WARNING MESSAGES, and AUX MESSAGES, and then saves the new settings. Next, the European Date is enabled.
After the ENABLE FROM ORIGINAL_SETTING statement, the ERROR MESSAGES, WARNING MESSAGES, and AUX MESSAGES are enabled and European Date is disabled. After the ENABLE FROM SECOND_LEVEL_SETTING statement, the ERROR MESSAGES, WARNING MESSAGES, and AUX MESSAGES are disabled again.