Enable
Enable
allows to enable button and/or links present at a bottom of a screen or on the menu bar of a function.
This function is only usable in Classic pages related code and is deprecated for code running in version 7 mode.
Syntax
Enable LIST_OF_BUTTON_CODE
LIST_OF_BUTTON_CODE is a list of integer values representing buttons or links, separated by a comma. For some predefined button, global variables are usable.
Examples
# Enable "Create" and "Save" actions in the "File" sub-menu
Enable GSTACRE, GSTAENR
# Could be written with the corresponding values (but using glbal variables is preferable in this case)
Enable 93, 92
# Enable buttons specific to a given function
Enable GSTABOU+1, GSTABOU+2
# Let's call a dialog box and enable/disable some specific buttons
# depending on a condition
Local Dlgbox Mask ABC button mess(15,198,1), mess(101,198,1)
& coded GSTABOU+1, GSTABOU+2
Local Integer OK
Boxact [ABC]
Gosub CONDITION : # Sets OK to true or false
If OK Then Enable GSTABOU+1, GSTABOU+2
Else Disable GSTABOU+1, GSTABOU+2
Endif
Boxinp [ABC] using ANSWER
Description and comments
Enable
is used to enable the use of buttons and/or menu items. It is used before the input in a dialog box.
Comment
In standard object management, Enable
is mostly used in the SETBOUT action, and most of the status usable with this instruction are defined with global variables.
# Let's enable the "Create" and "Save" actions (like the first example given above
Local Integer ETABOU(1..GNBBOU)
ETABOU (GCREE) = 1
ETABOU (GENRE) = 1
Call SETBOUT(ETABOU) From GESECRAN