Linha Microsiga Protheus

Árvore de páginas

01. DADOS GERAIS


Linha de Produto:Microsiga Protheus®
Segmento:Logística
Módulo:SIGATMS - Gestão de Transportes 


02. DESCRIÇÃO

Este ponto de entrada está localizado na rotina Solicitação de Coleta (TMSA460), é responsável por alterar a cor da legenda.

É executado quando a tela é criada e quando acionado o botão Legenda.

PARÂMETROS

aCores - Array que contém todo o conteúdo da legenda para o caso de alteração na cor da legenda do grid

aLegenda - Array que contém o conteúdo da legenda para alteração na cor da legenda do botão "Legenda".

EVENTOS DE CHAMADA DO PONTO DE ENTRADA

Ao executar a função de chamada da tela ou acionar o botão Legenda.

03. EXEMPLO DE UTILIZAÇÃO

TM460LEG 
Programa Fonte
TMSA460.PRW

Retorno
aRet - Array contendo todo o conteúdo da legenda

Exemplos

User Function TM460LEG()
Local nAcao:= PARAMIXB[1]
Local aRet := PARAMIXB[2]
Local nPos := 0

If nAcao == 1
	Pos := aScan(aRet, {|x| x[2] == "BR_VERMELHO"})
	If nPos > 0
		aRet[nPos, 2] := 'BR_PINK'
	EndIf
		Else
			nPos := aScan(aRet, {|x| x[1] == "BR_VERMELHO" })
	If nPos > 0
		aRet[nPos, 1] := 'BR_PINK'
	EndIf	
EndIf

Return aRet

04. DEMAIS INFORMAÇÕES

  • Não há.

05. ASSUNTOS RELACIONADOS

  • Não há.