Função Repeat

Boa tarde pessoal,
Parece besteira mas esqueci como funciona a função repeat com um nr. de vezes.....por exemplo, quero criar uma rotina para ser executada 100 vezes, então tentei assim

REPEAT 1 TO 100:

END.

Mas dá erro de sintaxe, onde está errado?

att,

Diogo

Diogo,

eu costumo utilizar o DO para fazer esse tipo de rotina.

Código:

DEFINE VARIABLE i-contagem AS INTEGER     NO-UNDO.

DO  i-contagem = 1 TO 100:
    MESSAGE i-contagem
        VIEW-AS ALERT-BOX INFO BUTTONS OK.
END.

ok, deu certo... muito obrigado.

Se você quiser usar o repeat:

Código:

def var l-Sair as log no-undo.
def var i-COnt as int no-undo initial 0.
repeat:
     assign i-COnt = i-Cont + 1.
     if i-Cont = 100 then 
         leave.
end.

Ola.

se vc quiser usar o repeat, pode fazer assim também

define variable x-i as integer.
x-i = 0.
repeat while x-i < 100:
disp x-i.
x-i = x-i + 1.
end.

Abraços