I. EQUEL/FORMS Examples : Extended Examples : Example of Activations
 
Share this page                  
Example of Activations
The following example illustrates various activate statements:
##  namevar character_string(26)
##  salvar  float
##  ingres "personnel"
##  forms
##  forminit empform
##  display  empform
##  initialize (ename = namevar, sal = salvar)
##  activate field "ename"
## {
     program code
## }
##  activate frskey5
## {
     program code
## }
##  activate menuitem "Help"
## {
     program code
## }
##  activate menuitem "Add"
## {
     program code
## }
##  activate menuitem "End", frskey3
## {
##   enddisplay
## }
##  finalize
##  endforms
##  exit
The first activate section is executed when the user moves the cursor out of the ename field. The second section is activated if the user pressed the function, arrow, or control key that is mapped to FRS key 5. The next three activate sections are associated with menu items and cause the following menu line to appear at the bottom of the form:
Help Add End
Combine any of the conditions in a single activate statement. The user can execute the last activate menuitem section by either selecting the menu item End or pressing the function key mapped to FRS key 3.