Exemplo do Ponto de Entrada QD150BUT.
Exemplo do Ponto de Entrada:
//Bibliotecas
#Include "Protheus.ch"
/*------------------------------------------------------------------------------------------------------*
| P.E.: QD150BUT |
| Desc: Adição de botões na rotina de Agenda Auditoria |
| Links: http://tdn.totvs.com/pages/releaseview.action?pageId=6801545 |
*------------------------------------------------------------------------------------------------------*/
User Function QD150BUT()
Local aBotoes := {}
Local aArea := GetArea()
//Adicionando os botões
aAdd(aBotoes,{"", {|| Alert('') }, "* Teste"})
RestArea(aArea)
Return (aBotoes)
Observações:
– Caso tenha dúvidas ou problemas com os exemplos, entre em contato;
– Se tiver sugestões de rotinas, pode entrar em contato;