Produto: | |
---|---|
Linha de Produto: | |
Segmento: | |
Módulo: | |
Função: | PCOA450 |
País: | Brasil |
Ticket: | Interno |
Requisito/Story/Issue | DSERCTR1-46030 |
O ponto de entrada PCOA4501
é utilizado para adicionar funções de usuários no browse da tela de Classes Orçamentárias no módulo SIGAPCO. Ele permite que funções específicas sejam executadas a partir da interface de visualização de dados, oferecendo flexibilidade na personalização das opções do menu para a execução de tarefas adicionais.
If ExistBlock( "PCOA4501" ) //P_EÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ //P_E³ Ponto de entrada utilizado para inclusao de funcoes de usuarios no ³ //P_E³ browse da tela de Classes Orcamentarias ³ //P_E³ Parametros : Nenhum ³ //P_E³ Retorno : Array contendo as rotinas a serem adicionados na enchoice ³ //P_E³ Ex. : User Function PCOA4501 ³ //P_E³ Return {{"Titulo", {|| U_Teste() } }} ³ //P_EÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ If ValType( aUsRotina := ExecBlock( "PCOA4501", .F., .F. ) ) == "A" AEval( aUsRotina, { |x| AAdd( aRotina, x ) } ) EndIf EndIf |
User Function PCOA4501() // Exemplo de implementação customizada Local aRotinas := {} AAdd(aRotinas, {"Minha Funcao", {|| MsgInfo("Executando Função Customizada")}}) Return aRotinas |
|