BREAK BY

/******************** STATEMENTS**********************************
**
** BREAK BY (Option)
** Indexa uma determinada pesquisa, bus-
** cando identificar o inicio e o fim
** das quebras conforme uma deterninada
** alteracao de dados.
**
** (TOTAL BY ...) (BREAK BY...)
** E uma ordem de impressao de subtotais
** conforme o gerenciamento da quebra.
**
**********************************************************************/

Código:

FOR EACH customer BREAK BY customer.state: 
    DISPLAY customer.state
            customer.cust-num
            customer.balance(TOTAL BY customer.state).
END.