O REPEAT é um bloco. Ou seja, e uma instrucao que agrupa outras instrucoes. Para determinar quais instrucoes sao agrupada pelo bloco, e necessario que se defina o escopo do bloco. O escopo (area de acao) de um bloco, comeca no colon ) e finaliza no "end." NEXT (FIND) é uma clausula usada na sintaxe do FIND. E indicada para localizar o proximo registro ao registro que esta copiado no record buffer de uma determinada tabela e conforme alguma indexacao. Caso nao haja nenhum registro copiado no record buffer, entao o proximo registro sera o primeiro. Código: REPEAT: FIND NEXT state. DISPLAY state . END. Porém este programa não está na maneira mais correta, pois sua performance é ruim, visto que, cada FIND corresponde a um I/O.
