Páginas filhas
  • EDAPPBUT - Desabilita botões.

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.
Programa Fonte
APLIB230.PRW
Sintaxe

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










Retorno
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.
Observações

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

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


  • Sem rótulos