Ponto de Entrada – MA410LEG

Exemplo do Ponto de Entrada MA410LEG.

Exemplo do Ponto de Entrada:

//Bibliotecas
#Include "Protheus.ch"

/*-------------------------------------------------------------------------------------------------------*
 | P.E.:  MA410LEG                                                                                       |
 | Desc:  Adiciona cores no browse de legenda                                                            |
 | Links: http://tdn.totvs.com/display/public/mp/MA410LEG+-+Alterar+textos+da+legenda+de+status+do+pedido|
 *-------------------------------------------------------------------------------------------------------*/

User Function MA410LEG()
	Local aArea  := GetArea()
	Local aCores := ParamIXB
	
	aAdd(aCores, {'BR_VIOLETA', 'Pedido situação X'})
	aAdd(aCores, {'BR_VERDE_ESCURO', 'Pedido situação Y'})
	
	RestArea(aArea)
Return aCores

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