Exemplo do Ponto de Entrada A410CONS.
Exemplo do Ponto de Entrada:
//Bibliotecas
#Include 'RwMake.ch'
#Include 'Protheus.ch'
/*------------------------------------------------------------------------------------------------------*
| P.E.: A410Cons |
| Desc: Adiciona botão para visualizar cliente do pedido destino (São Paulo) |
| Links: http://tdn.totvs.com/pages/releaseview.action?pageId=6784033 |
*------------------------------------------------------------------------------------------------------*/
User Function A410Cons()
Local aArea := GetArea()
Local aBotoes := {}
//Se não for inclusão
If ! INCLUI
aAdd(aBotoes,{'RELATORIO', {||Alert(SC5->C5_NUM)}, "Teste","* Teste"} )
Endif
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;