EDAPPBUT - Desabilita botões.

Ponto de entrada que pode ser executado para realizar algum tratamento para desabilitar os botões da consulta genérica.

APLIB230.PRW

EDAPPBUT - Desabilta botões ( [ ParamIXB ] ) --> aRet

(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.

Parâ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.)
 

#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