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

SET Scroll

Propósito

Permitir ou não o rolamento das opções da função ACHOICE( )

Sintaxe

SET SCROLL ON | off

Utilização

Quando ligado (ON), permite que na primeira opção, ao se digitar {SPC}, a última opção seja exibida e as outras deslocadas. Desse modo, impede-se que o usuário perca tempo na tentativa de localizar a primeira e a última opção. Quando desligado (OFF), não permite este rolamento, fazendo com que as opções e a barra permaneçam paradas.

Exemplo

O exemplo a seguir mostra-nos a utilidade deste comando. Retire a linha do comando SET SCROLL OFF ou mude de OFF para ON e note a diferença.

PROG

SET SCROLL OFF

DECLARE vet_cod[05] = SPACE(30)

vet_cod[01] = "01 - Parafuso 01"

vet_cod[02] = "02 - Parafuso 02"

vet_cod[03] = "03 - Parafuso 03"

vet_cod[04] = "04 - Parafuso 04"

vet_cod[05] = "05 - Parafuso 05"

opt = ACHOICE(01, 01, 05, 31, vet_cod)

@ 01,01 CLEAR TO 07,31

opt = IIF(opt = -1, opt + 2, opt + 1)

? LEFT(vet_cod[opt], 2)

Consulte

ACHOICE( ).

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