Pausa automatica

/******************** STATEMENTS**********************************
**
** Pausa automatica.
** O Progress realiza algumas pausas au-
** tomaticas em suas procedures. Por exem-
** plo, o statement DISPLAY faz uma pausa
** automatica logo apos sua execucao.
** Outro statement que possui uma pausa
** embutida em sua funcionalidade, e o
** PROMPT-FOR, ou seja, a proxima ins-
** trucao ao PROMPT-FOR, somente sera
** executada apos que o usuario pressione
** a tecla <return> quando o cursor esti-
** ver residente no ultimo input.
**
**********************************************************************/

Código:

DEFINE VARIABLE campo1 AS CHARACTER INITIAL "Linguagem".
DEFINE VARIABLE campo2 AS CHARACTER INITIAL "Progress".
DEFINE VARIABLE campo3 AS CHARACTER INITIAL "4GL".

DEFINE FRAME f-tela
             campo1 
             campo2
             campo3
             WITH SIDE-LABELS CENTERED 
             NO-BOX 1 COLUMN ROW 4.

DISPLAY campo1 campo2 campo3 
               WITH FRAME f-tela.

PROMPT-FOR campo1 campo2 campo3 
               WITH FRAME f-tela.
               
ASSIGN campo1 campo2 campo3.