WHERE (FOR EACH)

/******************** STATEMENTS**********************************
**
** WHERE (FOR EACH...) - E uma clausula que
** compoe a sintaxe do FOR EACH
** e que lhe permite encontrar no
** DB e consequentemente copiar
** para o record buffer, um
** determinado registro de uma
** tabela, conforme um criterio de
* selecao.
**
**********************************************************************/

Código:

FOR EACH customer WHERE
         customer.cust-num >= 10:
 DISPLAY customer.cust-num
         customer.name
         customer.phone.           
END.