| Produto: | |
|---|---|
| Linha de Produto: | |
| Segmento: | |
| Módulo: | |
| Função: | PCOA240 |
| País: | Brasil |
| Ticket: | Interno |
| Requisito/Story/Issue | DSERCTR1-46030 |
O ponto de entrada PCOA2402 permite que o usuário adicione botões personalizados à tela de configuração de lançamentos de relatórios pré-configurados, possibilitando a inclusão de novas funcionalidades no sistema através de ações específicas configuradas pelo usuário.
If ExistBlock( "PCOA2402" )
//P_EÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
//P_E³ Ponto de entrada utilizado para inclusao de botoes de usuarios ³
//P_E³ na tela de configuracao dos lancamentos ³
//P_E³ Parametros : Nenhum ³
//P_E³ Retorno : Array contendo as rotinas a serem adicionados na enchoice ³
//P_E³ Ex. : User Function PCOA2402 ³
//P_E³ Return { 'PEDIDO', {|| MyFun() },"Exemplo de Botao" } ³
//P_EÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
If ValType( aUsButtons := ExecBlock( "PCOA2402", .F., .F. ) ) == "A"
aButtons := {}
AEval( aUsButtons, { |x| AAdd( aButtons, x ) } )
EndIf
EndIf |
User Function PCOA2402()
// Exemplo de implementação customizada
Local aRet := { }
AAdd(aRet, {"Cancelar Pedido", {|| CancelaPedido() }, "Cancelar uma solicitação"})
AAdd(aRet, {"Gerar Relatório", {|| GeraRelatorio() }, "Gera um relatório de lançamentos"})
Return aRet |
|