Histórico da Página

||Descrição|| Ponto de Entrada para adicionar legenda de cores na tela Cadastro de Produtos.  
||Observações|| Para adicionar a Tabela de legendas de cores é preciso utilizar o Ponto de Entrada MT010BRW para retornar a opção "Legenda" nas "ações relacionadas".   
||Exemplos||USER FUNCTION MT010COR ()
//Ponto de entrada que adiciona legenda de cores na tela de Cadastro de Produtos
Local aCores:=\{\}

aAdd(aCores,\{'B1_TIPO == "AI"','BR_VERMELHO'\})           //As cores vão se diferenciar dependendo do tipo do produto
aAdd(aCores,\{'B1_TIPO == "BN"','BR_PRETO'\})	
aAdd(aCores,\{'B1_TIPO == "PA"','BR_VERDE'\})	
aAdd(aCores,\{'B1_TIPO == "MP"','BR_AZUL'\})	
aAdd(aCores,\{'B1_TIPO == "GG"','BR_AMARELO'\})
aAdd(aCores,\{'B1_TIPO == "MC"','BR_CINZA'\})		
aAdd(aCores,\{'B1_TIPO == "ME"','BR_PINK'\})	
aAdd(aCores,\{'B1_TIPO == "MO"','BR_LARANJA'\})

RETURN aCores


//abaixo segue exemplos dos 2 fontes necessários para criar a opção e chamar a Tabela de Legenda
USER FUNCTION MT010BRW ()

Local aTeste:=\{\}

aAdd(aTeste,\{"Legenda","U_MT010LEG", 0, 3, 0, Nil \})  //ao clicar no botão legenda vai chamar o fonte MT010LEG

RETURN aTeste



USER FUNCTION MT010LEG()
//Esse fonte serve para criar a Tabela de legenda e chamar a função que mostra a tabela
Local aLegenda	 := \{\}


	aAdd(aLegenda,\{'BR_VERMELHO'	,"AI"\})
	aAdd(aLegenda,\{'BR_PRETO'		,"BN"\})
	aAdd(aLegenda,\{'BR_VERDE'		,"PA"\})
	aAdd(aLegenda,\{'BR_AZUL'		,"MP"\})
	aAdd(aLegenda,\{'BR_AMARELO'		,"GG"\})
	aAdd(aLegenda,\{'BR_CINZA'		,"MC"\})
	aAdd(aLegenda,\{'BR_PINK'		,"ME"\})
	aAdd(aLegenda,\{'BR_LARANJA'	    ,"MO"\})


BrwLegenda("Legendas","Legenda de acordo com o Tipo", aLegenda ) 

Return
||Preview||  
||Idioma|| Português(Brasil)
||Versões|| Todas
||Sistemas Operacionais Suportados||Todos
||Compatível com as Bases de Dados||Todas 
||Retorno|| aCores        |      Array      |     Serve para indicar a condição da cor da legenda. 
||Programa Fonte|| MATA010.PRW