Tiempo aproximado de lectura 00:05:00 min
Duda
¿Cuál es la funcionalidad del PE CPDBtnVis?
Entorno
FRAMEWORK - Framework (Línea Protheus) - MI - Configurador - A partir de la versión 12.1.2210
Solución
Este punto de entrada es utilizado para validar la presentación del botón Ver en la consulta estándar.
Sintaxis
CPDBtnVis - Inhibe la opción de visualización en la consulta estándar ([ ParamIXB ] ) --> lRet
Parámetros
| Nombre | Tipo | Descripción |
| ParamIXB | Vector | Vector con información sobre la consulta predeterminada que se está ejecutando. PARAMIXB[1] - Nombre de la consulta predeterminada que se está ejecutando. PARAMIXB[2] - Alias utilizado en la consulta estándar. |
Retorno:
Lógico: define si el botón Ver se mostrará en Conpad.
Si .T. muestra el botón Ver, de lo contrario el botón no se muestra.
Ejemplo
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 | #include "protheus.ch"/*/{Protheus.doc} CPDBtnVis Ponto de entrada utilizado para validar a apresentação do botão Visualizar, na Consulta Padrão. @type user function @author Bruno Pirolo @since 26/12/2024 @return lRet, logical, Se .T. apresenta o botão Visualizar, caso contrário o botão não é exibido./*/User Function CPDBtnVis() Local lRet as logical Local cCons as character Local cAliasCons as character lRet := .T. cCons := PARAMIXB[1] //Código da Consulta Padrão cAliasCons := PARAMIXB[2] //Alias da Consulta padrão // 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 |
0 Comentarios