Tipo: TELNET VT100
Ativa edição em tela usando objetos GET
Sintaxe
VTREAD
Descrição
O comando READ executa um módulo de edição em tela usando todos os objetos VTGET criados e adicionados.
Dentro de um READ, o usuário pode editar o buffer de cada objeto VTGET bem como mover-se de um objeto GET para outro. Antes que o usuário possa entrar com um objeto VTGET, o controle passa para o respectivo WHEN.
Quando o usuário pressiona uma tecla de saída de VTGET, o controle passa VALID respectivo, caso tenha sido especificada.
O exemplo abaixo define vários VTGETs e a seguir usa o comando
READ:
#include ‘apvt100.ch’
cVar1 := cVar2 := cVar3 := SPACE(10)
@ 1, 1 VTSAY “Um :” VTGET cVar1 VALID !EMPTY(cVar1)
@ 2, 1 VTSAY “Dois:” VTGET cVar2 WHEN RTRIM(cVar1) != “Um”
@ 3, 1 VTSAY “Tres:” VTGET cVar3 VALID !EMPTY(cVar3)
VTREAD
Estude para provas de certificações em TI com os simulados Bynem