| Linha de Produto: | Microsiga Protheus® |
|---|---|
| Segmento: | Serviços |
| Módulo: | Financeiro |
| Ponto de Entrada | MT923MNU |
Ponto de Entrada MT923MNU permite que o cliente executar rotinas personalizadas na chamado o Menu.
No exemplo abaixo uma rotina personalizada estar sendo executada ao clicar nos botões "Pesquisar" ou "Incluir" quando o usuário possui um nível de acesso menor que 9.
#INCLUDE "TOTVS.CH"
/*/{Protheus.doc} User Function MT923MNU
(P.E. Permite abrir rotinas personalizadas na chamada no menu )
@type Function
@author Cassio S Dias
@since 30/11/2023
@version 12.1.2310
@return Nil
@see (https://tdn.totvs.com/x/MCwwM)
±±³ . Tipo de Transação a ser efetuada: ³±±
±±³ ³ 1 - Pesquisa e Posiciona em um Banco de Dados ³±±
±±³ ³ 2 - Simplesmente Mostra os Campos ³±±
±±³ ³ 3 - Inclui registros no Bancos de Dados ³±±
±±³ ³ 4 - Altera o registro corrente ³±±
±±³ ³ 5 - Remove o registro corrente do Banco de Dados ³±±
/*/
User Function MT923MNU()
if CNIVEL < 9
arotina[1][2]:="U_RotPesq()" //Rotina Pesquisar
arotina[3][2]:="U_RotInc()" //Rotina Incluir
MSGINFO( "Seu nível de acesso é "+cValToChar(CNIVEL)+". Acesso personalizado ", "Rotina Personalizada" )
else
MSGINFO( "Passou pela pe MT923MNU", "P.E - MT923MNU" )
endif
Return Nil
user Function RotPesq()
Local cMsg as Character
cMsg := "Rotina Pesquisar - Passou pelo Ponto de Entrada MT923MNU"
MSGINFO( cMsg, "Novo botao do P.E MT923MNU " )
Return Nil
user Function RotInc()
Local cMsg as Character
cMsg := "Rotina Incluir - Passou pelo Ponto de Entrada MT923MNU"
MSGINFO( cMsg, "Novo botao do P.E MT923MNU" )
Return Nil
O( cMsg, "Novo botao do P.E MT923MNU" )
Return Nil |
Não há
<style>
div.theme-default .ia-splitter #main {
margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
display: none;
}
#main {
padding-left: 10px;
padding-right: 10px;
overflow-x: hidden;
}
.aui-header-primary .aui-nav, .aui-page-panel {
margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
margin-left: 0px !important;
}
</style>
|