I. EQUEL/FORMS Examples : Endloop
 
Share this page                  
Endloop
Terminates a loop.
Examples—endloop statement:
In this example, endloop is used to break out of an unloadtable loop on an error:
## unloadtable empform employee (vname = ename)
## {
     program code
     if (error) then 
           /* break out of unloadtable statement loop */
##        endloop
     end if
## }
This example nests a display loop within an unloadtable statement. The endloop statement implicitly breaks out of the nested display loop.
## unloadtable formnames formtable 
##   (vname = fname, vmode = fmode)
## {
##   display fname fmode
##   initialize
##   activate menuitem "next"
##   {
##        breakdisplay
##   }
##   activate menuitem "quit"
##   {
##        endloop
##   }
##   finalize
##   message "next form"
     /* breakdisplay transfers control here */
##   sleep 2
## }
     /* endloop transfers control here */