Histórico da Página

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