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

Programa Fonte

MATA010.PRW