Histórico da Página
MA410COR Alterar cores do cadastro do status do pedido
Características do Requisito
Linha de Produto: | Microsiga Protheus® |
Segmento: | Serviços |
Módulo: | Faturamento |
Ponto de Entrada
Descrição: | Este ponto de entrada pertence à rotina de Pedidos de Venda, MATA410(). Usado, em conjunto com o ponto MA410LEG, para alterar cores do “browse” do cadastro, que representam o “status” do pedido. | ||||||||
Sintaxe: | MA410COR - Alterar cores do cadastro do status do pedido ( < aCores> ) --> aNovCor | ||||||||
Retorno: | aNovCor
| ||||||||
Programa Fonte: | .prw | ||||||||
Parâmetros |
| ||||||||
Dados Esperados: | Formato do item do array de cores {“condição”, “cor”, “Descrição”}. | ||||||||
Exemplos: | 1) Alterando Cores User Function MA410COR(aCores) Default aCores := {} aCores := { {"Empty(C5_LIBEROK).And.Empty(C5_NOTA)" ,"BR_MARROM","Pedido em Aberto" },; //Pedido em Aberto {"!Empty(C5_NOTA).Or.C5_LIBEROK=='E'" ,"BR_VERDE" ,"Pedido Encerrado" },; //Pedido Encerrado {"!Empty(C5_LIBEROK).And.Empty(C5_NOTA)","BR_AZUL", "Pedido Liberado"} } //Pedido Liberado Return ( aCores )
2) Incluíndo Novas Cores User Function MA410COR(aCores) Default aCores := {} aAdd( aCores, {"Empty(C5_LIBEROK) .And.Empty(C5_NOTA) .And. !Empty(C5_XNOTA1)" ,"BR_PRETO" , "Pedido Customizado 1 em Aberto" } ) aAdd( aCores, {"!Empty(C5_NOTA) .Or. C5_LIBEROK=='E' .And. !Empty(C5_XNOTA1)" ,"BR_MARROM" , "Pedido Customizado 1 Encerrado" } ) aAdd( aCores, {"!Empty(C5_LIBEROK) .And. Empty(C5_NOTA) .And. !Empty(C5_XNOTA1)" ,"BR_VIOLETA", "Pedido Customizado 1 Liberado" } ) Return ( aCores ) |