Monta um Browse com menu de opções.
Sintaxe
MBrowse( [ uPar1 ], [ uPar2 ], [ uPar3 ], [ uPar4 ], cAlias, [ aFixos ], [ cCpo ], [ uPar5 ], [ cFun ], [ nPadrao ], [ aCores ], [ cExpIni ], [ cExpFim ], [ nCongela ] ) -> nil
| Argumento | Obrigat. | Tipo | Descrição |
| uPar1 | Não | N | Parâmetro reservado. |
| uPar2 | Não | N | Parâmetro reservado. |
| uPar3 | Não | N | Parâmetro reservado. |
| uPar4 | Não | N | Parâmetro reservado. |
cAlias | Sim | C | Alias do arquivo a ser visualizado no browse. |
| aFixos | Não | A | Contendo os nomes dos campos fixos pré-definidos pelo programador, obrigando a exibição de uma ou mais colunas. |
| cCpo | Não | C | Campo a ser validado se está vazio ou não para exibição do bitmap de status. |
| uPar5 | Não | N | Parâmetro reservado. |
| cFun | Não | C | Função que retornará um valor lógico para exibição do bitmap de status. |
| nPadrao | Não | N | Número da rotina a executada quando for efetuado um duplo clique em um registros do browse. Caso não seja informado o padrão será executada visualização ou pesquisa. |
| aCores | Não | A | Este vetor possui duas dimensões, a primeira é a função de validação para exibição do bitmap de status, e a segunda o bitmap a ser exibido. |
| cExpIni | Não | C | Função que retorna o conteúdo inicial do filtro baseada na chave de índice selecionada. |
| cExpFim | Não | C | Função que retorna o conteúdo final do filtro baseada na chave de índice selecionada. |
| nCongela | Não | N | Coluna a ser congelado no browse. |
Descrição
As variáveis cCadastro e aRotina (*) precisam ser declarados como private acima da chamada da função.
Apenas um dos parâmetros ( cCpo, cFun, aColors ) deve ser informado.
(*) vetor com as rotinas que serão executadas, nele será definido o tipo de operação a ser executada (inclusão, alteração, exclusão, visualização, pesquisa, …) sua estrutura é composta de 5 (cinco) dimensões: 1º – Título; 2º – Rotina; 3º – Reservado; 4º – Operação (1 – pesquisa; 2 – visualização; 3 – inclusão; 4 – alteração; 5 – exclusão); 5 – Acesso relacionado a rotina, se esta posição não for informada não validará os acessos.
Exemplo
Private cCadastro := ‘Cadastro de Clientes’
Private aRotina := { { ‘Pesquisar’ , ‘AxPesqui’ , 0, 1 },;
{ ‘Visualizar’ , ‘AxVisual’ , 0, 2 },;
{ ‘Incluir’ , ‘AxInclui’ , 0, 3 },;
{ ‘Alterar’ , ‘AxAltera’ , 0, 4 },;
{ ‘Excluir’ , ‘AxExcluir’, 0, 5 }}
MBrowse( ,,,, ‘SA1’,, ‘!A1_COD’,,, 4 )