| Produto: |
TOTVS Backoffice
|
|---|---|
| Linha de Produto: | Linha Protheus |
| Segmento: | Serviços |
| Módulo: | TOTVS Backoffice (Linha Protheus) - Planejamento e Controle Orçamentário (SIGAPCO)
|
| Função: | PCOA160 |
| País: | Brasil |
| Ticket: | Interno |
| Requisito/Story/Issue | DSERCTR1-46748 |
O ponto de entrada PCOA1602 é utilizado para a inclusão de botões com respectivas rotinas customizadas, que serão adicionados na barra de ferramentas da tela de Cadastro de Configuração de Parâmetros para Montagem das Consultas de Visão Gerencial (enchoiceBar). Este ponto possibilita personalizar a interface, adicionando funcionalidades específicas à tela mencionada.
If ExistBlock( "PCOA1602" )
//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 PCOA1602 ³
//P_E³ Return { 'PEDIDO', {|| MyFun() },"Exemplo de Botao" } ³
//P_EÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
If ValType( aUsButtons := ExecBlock( "PCOA1602", .F., .F. ) ) == "A"
AEval( aUsButtons, { |x| AAdd( aButtons, x ) } )
EndIf
EndIf
User Function PCOA1602
Return( { 'PEDIDO', {|| MyFun() },"Exemplo de Botao" } )
Importante !!