Relacionamento de Tabelas

/******************** STATEMENTS**************************************
**
** Relatorio usando tabelas relacionadas.
** Utilize a clausula WHERE para seleci-
** onar com o FIND ou o FOR EACH, regis-
** tros da tabela a relacionados com o
** da tabela b.
**
**********************************************************************/

Código:

FOR EACH customer:
 DISPLAY customer.cust-num
         customer.name.
 FOR EACH order WHERE
   order.cust-num = customer.cust-num:
   DISPLAY order.order-num
           order.order-date.
 END.          
END.