Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Produto:

Protheus ADVPL

Versões:

P12

Ocorrência:

Houve Mudança com Ponto de Entrada MA410COR na versão P12 ?

Ambiente:

P12

Passo a passo:

Na Versão P12 o ponto de entrada MA410COR traz por paramixb 5 itens no array, sendo assim é necessário verificar o conteúdo da legenda para pode adicionar um novo item

Segue exemplo de customização na P12

#Include 'Protheus.ch'

User Function MA410COR()

Local aCores := {} // PARAMIXB traz a estrutura do array padrão

Alert("MA410COR")

aAdd(aCores, {"C5_TESTE == 'C'", "BLACKBR_PRETO", "Teste 01"})// Nova condição
aAdd(aCores, {"Empty(C5_LIBEROK).And.Empty(C5_NOTA) .And. Empty(C5_BLQ)", "ENABLE", "Pedido em Aberto"})
aAdd(aCores, {"!Empty(C5_NOTA).Or.C5_LIBEROK=='E' .And. Empty(C5_BLQ)", "ENABLE", "Pedido em AbertoEncerrado"})
aAdd(aCores, {"!Empty(C5_LIBEROK).And.Empty(C5_NOTA).And. Empty(C5_BLQ)", "BR_AMARELO", "Pedido Liberado"})
aAdd(aCores, {"C5_BLQ == '1'", "BR_AZUL", "Pedido Bloqueado por Regra"})
aAdd(aCores, {"C5_BLQ == '2'", "BR_LARANJA", "Pedido Bloqueado por Verba"})

Return aCores

OBS.: Caso persista é necessário o debug do ponto, a nova condição deverá está na primeira posição.

 

Observações: