Ponto de Entrada – A410CONS

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;

Links:

Pesquisa no TDN

Etiquetas

Receba novidades

Seja VIP e receba novidades exclusivas por e-Mail gratuitamente.