REVERSE

• Propósito
• Sintaxe
• Utilização
• Exemplo
• Consulte

Propósito

Inverter o sentido da leitura de um arquivo.

Sintaxe

REVERSE

Utilização

Utilizado para inverter o sentido da leitura de um arquivo seja ela seqüencial ou em cadeia.

Após a execução deste comando o próximo registro a ser lido será o registro anterior ou posterior conforme o sentido de leitura atual.

Este comando não é utilizado em arquivo externo tipo indexado.

Exemplo

O exemplo a seguir mostra-nos como paginar um arquivo lendo seus registros seqüencialmente de trás para frente e de frente para trás.

USE tab_func

LOCATE

sentido = "inicio -> fim"

DO WHILE FOUND()

  ? nom_func

  ? sentido

  WAIT " Muda o sentido ? " TO resp

  IF resp $ "sS"

    REVERSE && Inverte o sentido da leitura.

    CONTINUE

    sentido = "fim -> inicio"

  ENDIF

  CONTINUE

ENDDO

Consulte

CONTINUE, LOCATE, SEEK, SKIP, DBERR( ), EOF( ), FCONTINUE( ), FLCONTINUE( ), FLLOCATE( ), FSEEK( ) e FLSKIP( ).