01. DADOS GERAIS

Produto:

Linha de Produto:

Segmento:

Módulo:

Planejamento e Controle Orçamentário - SIGAPCO

Função:PCOA050
País:Brasil
Ticket:11113676
Requisito/Story/Issue:DSERCTR1-31475



02. SITUAÇÃO/REQUISITO

Solicitada melhoria da documentação do ponto de entrada - PCOA0501 

03. SOLUÇÃO

O ponto de entrada PCOA0501 permite a inclusão de rotinas de usuário na rotina PCOA050 para exibição e uso no menu.



04. DEMAIS INFORMAÇÕES


Todos os exemplos utilizados são para fins didáticos e de exemplificação, toda aplicação e uso do ponto de entrada é de responsabilidade do cliente e da regra utilizada com base no propósito do ponto de entrada.



Parâmetros do Ponto de Entrada:

ParâmetroTipoDescriçãoObrigatório
PARAMBIX[1]Não se aplicaNão se aplicaNão


O que o ponto de entrada deve retornar

RetornoTipoDescriçãoObrigatório
aUsrRotinaArrayRetorna as opções de rotinas de usuário desejadas.Sim




If ExistBlock( "PCOA0501" )
		If ValType( aUsRotina := ExecBlock( "PCOA0501", .F., .F. ) ) == "A"
			AEval( aUsRotina, { |x| AAdd( aRotina, x ) } )
		EndIf
EndIf




#Include "PROTHEUS.CH"

User Function PCOA0501()

	Private aUsrRotinas := {}

	aAdd(aUsrRotinas,{"Titulo", 'Processa({|| CTBR080() })', 0, 2}) //Exemplo de uma barra com processa para progresso visual chamando por exemplo um relatório.
	aAdd(aUsrRotinas,{"Titulo 4", "U_Teste", 0, 2})					//Exemplo chamando uma função de usuário que exibe um help.

Return aUsrRotinas


User Function Teste()

	Help(" ",1,"Teste",,"teste ´PE passou",1,0)

Return






05. ASSUNTOS RELACIONADOS




<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;
}

.aui-tabs.horizontal-tabs>.tabs-menu>.menu-item.active-tab a::after { 
	background: #FF9900; !important 
}

.menu-item.active-tab { 
	border-bottom: none !important; 
}

</style>