Ponto-de-Entrada: EDAPPBUT - Desabilta botões
| Abrangências: | Microsiga Protheus 10 |
| Versões: | Microsiga Protheus 10 |
| Compatível Países: | Todos |
| Sistemas Operacionais: | Todos |
| Compatível às Bases de Dados: | Todos |
Descrição:Ponto de entrada que pode ser executado para realizar algum tratamento para desabilitar os botões da consulta genérica.
SintaxeEDAPPBUT - Desabilta botões ( [ ParamIXB ] ) --> aRet
Parâmetros:
| Nome |
|
| Tipo |
|
| Descrição |
|
| Default |
|
| Obrigatório |
|
| Referência |
|
| ParamIXB |
|
| Vetor |
|
| Vetor que contém a propriedade dos botões da consulta genérica, que define se o item está habilitado. |
|
|
|
|
|
|
|
|
|
|
RetornoaRet(vetor)- Vetor de retorno do Ponto de Entrada que contém a propriedade dos botões da consulta genérica, que define se o item deve ser habilitado ou desabilitado.
ObservaçõesParâmetro PARAMIXB
O conteúdo de cada elemento do array deve ser lógico (.T. ou .F.)
Todos os elementos do array são passados com o conteúdo .T., quer dizer, até a execução do Ponto de Entrada, todos os botões estão habilitados.
Posição dos botões no array
- [1] Arquivo
- [2] Pesquisa
- [3] Filtro
- [4] Dicionário
- [5] Impressão
- [6] Visualizar
- [7] Exp. Excel (este elemento só é apresentado em client windows)
Retorno aRet
O retorno do P.E. deve ser um array com a mesma quantidade de elementos trazida no PARAMIXB.
O conteúdo de cada elemento do array deve ser lógico (.T. ou .F.)
Exemplos#include "protheus.ch"User Function EDAPPBUT()Local aBut := PARAMIXB //cada posição do array identifica o botão da consulta genérica//No exemplo abaixo iremos desabilitar as opções de Impressão e Visualizar do usuário AdministradorIf __cUserID == "000000" aBut[5] := .F. aBut[6] := .F.EndIfReturn aBut