01. DADOS GERAIS

Produto:

Linha de Produto:

Segmento:

Módulo:

Função:PCOA035
País:Brasil
Ticket:Interno
Requisito/Story/IssueDSERCTR1-46030

02. DESCRIÇÃO

Este ponto de entrada permite que os usuários adicionem botões personalizados na tela de inclusão, alteração, exclusão ou visualização de processos dentro da rotina do módulo SIGAPCO (código 57). Ele é chamado ao inicializar a tela e busca rotinas definidas pelo usuário para serem exibidas como opções adicionais.

03. DEMAIS INFORMAÇÕES


If ExistBlock( "PCOA0352" )
	//P_EÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
	//P_E³ Ponto de entrada utilizado para inclusao de botoes de usuarios         ³
	//P_E³ na tela de processos                                                   ³
	//P_E³ Parametros : Nenhum                                                    ³
	//P_E³ Retorno    : Array contendo as rotinas a serem adicionados na enchoice ³
	//P_E³  Ex. :  User Function PCOA0352                                         ³
	//P_E³         Return { 'PEDIDO', {|| MyFun() },"Exemplo de Botao" }          ³
	//P_EÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ

	If ValType( aUsButtons := ExecBlock( "PCOA0352", .F., .F. ) ) == "A"
		aButtons := {}
		AEval( aUsButtons, { |x| AAdd( aButtons, x ) } )
	EndIf
EndIf
User Function PCOA0352()

	Local aBotoes := {}

   	// Adiciona um botão chamado "PEDIDO"
   	AAdd(aBotoes, {"PEDIDO", {|| U_Teste() }, "Exemplo de Botão"})
   
   // Retorna o array com o botão adicionado
Return aBotoes
  • Observa-se que a utilização do PE e os impactos dele no sistema são de responsabilidade do cliente.
  • Os exemplos utilizados nessa documentação são apenas para fins de demonstração, cada cliente deve verificar qual comportamento deseja realizar de acordo com o escopo do ponto de entrada.

04. ASSUNTOS RELACIONADOS