Permitir ou não o rolamento das opções da função ACHOICE( )
SET SCROLL ON | off
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.
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)
ACHOICE( ).