Anterior Sumário Próximo OpenBASE! o Banco de Dados inteligente. Fale conosco!

DO WHILE

Propósito

Executar um bloco de comandos enquanto uma condição for verdadeira.

Sintaxe

DO WHILE <exp.L>

<comandos>

[LOOP]

<comandos>

[EXIT]

<comandos>

ENDDO

Argumentos

<exp.L>

Representa uma condição a ser avaliada a cada iteração.

LOOP

Determina que a seqüência de execução retornará ao início do laço (comando DO WHILE).

EXIT

Determina o encerramento forçado do laço.

Utilização

Quando há necessidade de repetir-se um conjunto de comandos um número indeterminado de vezes, de acordo com uma condição de controle.

Quando a expressão avaliada (<exp.L) retornar um valor falso (.F.),o laço é terminado. Caso a condição não retorne nunca um valor falso, o laço torna-se infinito.

Exemplo

O exemplo a seguir exibe todos os números de 0 a 100.

var_num = 0

DO WHILE var_num <= 100

  ? var_num             && Exibe um numero em cada linha.

  var_num = var_num + 1

ENDDO

O exemplo a seguir exibe todos os números pares entre 0 e 100.

var_num = 0

DO WHILE var_num <=100

  ? var_num             && Exibe um numero em cada linha.

  var_num = var_num + 2

ENDDO

O exemplo a seguir exibe todos os números pares entre
0 e 100 utilizando a cláusula LOOP.

var_num = 0

DO WHILE var_num <= 100

  IF var_num % 2 # 0    && Verifica se num não é múltiplo de 2

    ++ var_num 

    LOOP            && Devolve o controle ao comando DO WHILE

  ENDIF

  ? var_num             && Exibe um numero em cada linha

  ++ var_num 

ENDDO

Consulte

DECR, EXIT, FOR ... NEXT, INCR, LOOP, QUIT, STORE, CHR( ) e VAL( ).

Anterior Sumário Próximo OpenBASE! o Banco de Dados inteligente. Fale conosco!