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

SET Out

Propósito

Sair ou não de um conjunto de GETs quando for digitado {SPC} ou {SPB}.

Sintaxe

SET OUT on | OFF

Utilização

Quando ligado (ON), encerra um comando READ, se no primeiro GET for digitado {SPC} ou se no último GET for digitado {SPB}.

Exemplo

O exemplo a seguir mostra a utilização do comando SET OUT. Experimente mudar o estado do comando SET OUT para OFF.

PROG

var_nom, var_tel, var_end, var_ani = ""

SET OUT ON

@ 06,10 SAY "UTILIZE AS SETAS"

@ 08,10 SAY "Nome " GET var_nom PIC REP("X",20)

@ 09,10 SAY "Telefone " GET var_tel  PIC "(999) 999-9999"

@ 10,10 SAY "Endereço " GET var_end  PIC REP("X",30)

@ 11,10 SAY "Aniversario (Dia/Mes)" GET var_ani  PIC "99/99"

READ

Consulte

@ ... GET, READ, SET KEY, SET PF, SET ROLL e SET TAB.

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