LABEL

/******************** STATEMENTS**************************************
**
** LABEL
** Nao e uma caracteristica geral da
** frame e sim de um campo individual
** de uma frame. Permite instituir um
** label para um dado, diferente da-
** quele que foi definido no dicionario
** de dados.
**
**********************************************************************/

Código:

FOR EACH customer: 
 DISPLAY customer.cust-num LABEL "Codigo" 
         customer.name     LABEL "Nome".
 FOR EACH order WHERE
   order.cust-num = customer.cust-num:
   DISPLAY order.order-num  LABEL "Pedido" 
           order.order-date LABEL "Data".
 END.          
END.