Páginas filhas
  • CPDBtnVis - Inibe opção de visualização na Consulta Padrão

Ponto-de-Entrada: CPDBtnVis - Inibe opção de visualização na Consulta Padrão
Abrangências: Microsiga Protheus 10 , Microsiga Protheus 11
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Descrição:
Ponto de entrada utilizado para validar a apresentação do botão Visualizar, na Consulta Padrão.
Eventos

Programa Fonte
MSLIB.PRW
Sintaxe

CPDBtnVis - Inibe opção de visualização na Consulta Padrão ( [ ParamIXB ] ) --> lRet

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
ParamIXB Vetor Vetor com as informações da consulta padrão que está sendo executada
Retorno
    lRet(logico)
  • Define se o botão Visualizar será apresentado na Conpad. Se .T. apresenta o botão Visualizar, caso contrário o botão não é exibido.
Observações
Parâmetro PARAMIXB
  
  • Estrutura do array:
    [1] - Nome da consulta padrão que está sendo executada.
    [2] - Alias utilizado na consulta padrão.
Exemplos
#include "protheus.ch"User Function CPDBtnVis()Local lRet 		 := .T.       Local cCons 	 := PARAMIXB[1]Local cAliasCons := PARAMIXB[2]// Se for o Administrador e o nome da consulta for SA1 ou a tabela principal da consulta for SA1, inibe a opção Visualizar.If __cUserID == "000000" .And. (cCons == "SA1" .Or. cAliasCons == "SA1")	lRet := .F.EndIfReturn lRet

  • Sem rótulos