Esse documento visá demostrar um exemplo do ponto de entrada CT060BUT que pode adicionar novas opções de menu ao browser da rotina.
Este ponto de entrada é criado após a criação dos menus padrões da rotina. |
Parâmetro | Tipo | Descrição | Obrigatório |
|---|---|---|---|
| PARAMIXB[1] | Array | Nome do menu | Sim |
#Include 'Protheus.ch'
#Include 'FWMVCDef.ch'
User Function CT060BUT()
Local aBotoes := ParamIXB
aAdd(aBotoes,{ "PE" , "Processa( { || CTBA080() })", 0, 0} )
Return aBotoes
|
O ponto de entrada retorna a variável aBotoes contendo todos os menus a serem adicionados. |
If ExistBlock("CT060BUT")
aCT060BUT := ExecBlock("CT060BUT",.F.,.F.,aRotina)
IF ValType(aCT060BUT) == "A" .AND. Len(aCT060BUT) > 0
For nX := 1 to len(aCT060BUT)
aAdd(aRotina,aCT060BUT[nX])
Next
ENDIF
Endif
|
Aparecerão todas as opções desejáveis a serem adicionadas na aba de Outras Ações:
Outras Ações / PE

<!-- esconder o menu -->
<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>
|