| Produto: | |
|---|---|
| Linha de Produto: | |
| Segmento: | |
| Módulo: | |
| Função: | PCOA440 |
| País: | Brasil |
| Ticket: | Interno |
| Requisito/Story/Issue | DSERCTR1-46030 |
O ponto de entrada PCOA4401 oferece uma maneira de customizar o menu da tela de lançamentos, permitindo a adição de funcionalidades desenvolvidas especificamente para atender às necessidades do usuário. Através desse ponto de entrada, é possível ampliar o menu funcional, adicionando rotinas customizadas ao processo.
If ExistBlock( "PCOA4401" )
//P_EÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
//P_E³ Ponto de entrada utilizado para inclusao de funcoes de usuarios no ³
//P_E³ browse da tela de lançamentos ³
//P_E³ Parametros : Nenhum ³
//P_E³ Retorno : Array contendo as rotinas a serem adicionados na enchoice ³
//P_E³ Ex. : User Function PCOA4401 ³
//P_E³ Return {{"Titulo", {|| U_Teste() } }} ³
//P_EÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
If ValType( aUsRotina := ExecBlock( "PCOA4401", .F., .F. ) ) == "A"
AEval( aUsRotina, { |x| AAdd( aRotina, x ) } )
EndIf
EndIf |
User Function PCOA4401()
Local aRotinas := {}
// Adiciona uma opção chamada "Visualizar Detalhes" ao menu de lançamentos
AAdd(aRotinas, {"Visualizar Detalhes", {|| U_VisualizarDetalhes() }, "VIEWICON", "Exibe detalhes do lançamento"})
// Adiciona uma opção chamada "Excluir Lançamento" ao menu de lançamentos
AAdd(aRotinas, {"Excluir Lançamento", {|| U_ExcluirLancamento() }, "EXCLUIRICON", "Remove o lançamento selecionado"})
// Retorna o array com as rotinas adicionadas
Return aRotinas
|
|