Abrangências: | Microsiga Protheus 8.11 , Protheus 10 |
Versões: | Microsiga Protheus 8.11 , Protheus 10 |
Compatível Países: | Todos |
Sistemas Operacionais: | Todos |
Compatível às Bases de Dados: | Todos |
Nível de Acesso: | Nível 1 (Acesso Clientes) |
Idiomas: | Espanhol , Inglês |
Monta um browse com referência a um array.
VTABrowse - Monta um Browse com referência a um Array ( nTopo nEsquerda nBase nDireita aCab [ aItens ] [ aSize ] [ cFuncaoUsuario ] [ nItemInicial ] ) --> nPosicao
-
nPosicao(numerico)
- Retorna a posição numérica ocupada pelo item de menu selecionado no vetor "aItens". Se o processo de seleção for interrompido, retorna zero.
Tipo: TELNET VT100
Função de usuário:
Da mesma forma que as demais funções de interface com o usuário, VTABROWSE () aceita uma função de usuário.
Modos de VTABROWSE():
0 - Inativo
1 - Tentativa de passar início da lista
2 - Tentativa de passar final da lista
3 - Normal
4 - Itens não selecionados
Após ter executado as operações apropriadas ao modo VTABROWSE(), a função de usuário deve retornar um valor que solicite ao VTABROWSE() executar uma operação entre o seguinte conjunto de ações:
Valores de Retorno da Função de Controle de VTABROWSE()
0 - Aborta seleção
1 - Executa seleção
2 - Continua VTABROWSE()
3 - Vai para o próximo item cuja primeira letra é a tecla pressionada
#INCLUDE "APVT100.CH"VTClear aCab := {"Codigo","Cod ","Descricao ","UM"} aSize:= {10,4,20,10} nPos := 12 aItens :={ {"1010 ",10 ,"DESCRICAO1","UN "},; {"2010 ",20 ,"DESCRICAO2","CX "},; {"2020 ",30 ,"DESCRICAO3","CX "},; {"2010 ",40 ,"DESCRICAO4","CX "},; {"2020 ",50 ,"DESCRICAO5","CX "},; {"3010 ",60 ,"DESCRICAO6","CX "},; {"3020 ",70 ,"DESCRICAO7","CX "},; {"3030 ",80 ,"DESCRICAO7","CX "},; {"3040 ",90 ,"DESCRICAO7","CX "},; {"2010 ",40 ,"DESCRICAO4","CX "},; {"2020 ",50 ,"DESCRICAO5","CX "},; {"3010 ",60 ,"DESCRICAO6","CX "},; {"3020 ",70 ,"DESCRICAO7","CX "},; {"3030 ",80 ,"DESCRICAO7","CX "},; {"3050 ",100,"DESCRICAO7","CX "}} nPos := VTaBrowse(0,0,7,15,aCab,aItens,aSize,"TesteCtrl",nPos) . . . Function TesteCtrl(nModo,nElem,nElemW) If nModo == 1 VtAlert("Top") ElseIf nModo == 2 VtAlert("Bottom") Else If VTLastkey() == 27 VtAlert("Sair") VTBeep(3) Return 0 ElseIf VTLastkey() == 13 VtAlert("Ok") VtBeep(1) Return 1 EndIf EndIfReturn 2
Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
nTopo | Numérico | Define a coordenada do canto superior da janela. Valores de linha e coluna podem variar entre 0, 0 e VTMAXROW(), VTMAXCOL(). | X | ||||||||||||||
nEsquerda | Array of Record | Define a coordenada do canto esquerdo da janela. Valores de linha e coluna podem variar entre 0, 0 e VTMAXROW(), VTMAXCOL(). | X | ||||||||||||||
nBase | Array of Record | Define a coordenada do canto inferior da janela. Valores de linha e coluna podem variar entre 0, 0 e VTMAXROW(), VTMAXCOL(). | X | ||||||||||||||
nDireita | Array of Record | Define a coordenada do canto direito da janela. Valores de linha e coluna podem variar entre 0, 0 e VTMAXROW(), VTMAXCOL(). | X | ||||||||||||||
aCab | Array of Record | Vetor que contém os títulos das colunas. | X | ||||||||||||||
aItens | Array of Record | Vetor que contém os dados que serão mostrados. | |||||||||||||||
aSize | Array of Record | Vetor que contém o tamanho de cada coluna. | |||||||||||||||
cFuncaoUsuario | Array of Record | Nome de uma função definida pelo usuário que é executada quando uma tecla não reconhecida for pressionada. O nome da função é especificado como uma expressão caracter sem parênteses ou argumentos. Note que o comportamento de VTABROWSE() é afetado pela presença desse argumento. Consulte as observações para mais informações. | |||||||||||||||
nItemInicial | Array of Record | Posição ocupada no vetor “aItens” pelo item que aparecerá em destaque quando o menu for exibido pela primeira vez. Caso um item de menu que não esteja disponível seja especificado, ou use algum argumento, o item que aparecerá em destaque será o primeiro item selecionável do vetor. |