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

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Composition Setup
import.css=/download/attachments/327912/newLayout.css
Portuguese

Pagetitle
CPDBtnVis - Inibe opção de visualização na Consulta Padrão
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:
NomeTipoDescriçãoDefaultObrigatórioReferência
ParamIXBVetorVetor 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