Exemplo do Ponto de Entrada GP011MEN.
Exemplo do Ponto de Entrada:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 | //Bibliotecas#Include "Protheus.ch"/*---------------------------------------------------------------------* | P.E.: GP011MEN | | Desc: Adição de opções no menu do cadastro de Gestão Funcionário | | Link: http://tdn.totvs.com/pages/releaseview.actionçpageId=6079100 | *---------------------------------------------------------------------*/User Function GP011MEN() Local aArea := GetArea() Local aAux := aClone(aFuncion) //Adicionando opção aAdd(aAux, { "Teste", "Alert", 0, 7} ) RestArea(aArea)Return aAux |
Observações:
– Caso tenha dúvidas ou problemas com os exemplos, entre em contato;
– Se tiver sugestões de rotinas, pode entrar em contato;