Linha Microsiga Protheus

Árvore de páginas

Ponto de entrada MT110COR

Linha de Produto:

Microsiga Protheus

Segmento:

Serviços

Módulo:

Compras (SIGACOM)

Rotina:

Rotina

Nome Técnico

Solicitação de Compras

MATA110

Ponto de Entrada:

MT110COR

País(es):

Brasil

Banco(s) de Dados:

Todos

Tabelas utilizadas:

SC1

Sistema(s) operacional(is):

Windows/Linux

Ponto de Entrada

Descrição:

O Ponto de Entrada MT110COR permite manipular array com as regras de apresentar as cores dos status na MBrowse

Localização:

Antes da execução da MBrowse da Solicitação de Compras

Eventos:

O Ponto de entrada é executado antes da abertura da tela da solicitação de compras

Programa Fonte:

MATA110

Função:

MATA110

Parâmetros:

Nome

Tipo

Descrição

Obrigatório

PARAMIXB

Array

Array contendo as regras para a apresentação das cores do status da solicitação de compras na mbrowse

X

 Retorno:

Nome

Tipo

Descrição

Obrigatório

aNewCoresArrayArray de retorno contendo as regras para a apresentação das cores do status da solicitação de compras na mbrowse já manipuladas pelo usuário X
Observação:

Após atualização do array aCores, o sistema ira validar regra das cores conforme ordenação do array. Caso queira que sua regra seja avaliada primeiro pode-se utilizar a função aSort, assim alterando a ordenação do array aCores.

aSort: ASORT()

Ponto de entrada MT110COR, deve-se ser utilizado junto ao MT110LEG (Esse ponto de entrada é responsável pela legenda, descrevendo o significado do status da solicitação de compras)

MT110LEG: MT110LEG - Adiciona legendas na dialog

Exemplos:

#Include 'Protheus.ch'

User Function MT110COR()

Local aNewCores := aClone(PARAMIXB[1])  

// aCores
aAdd(aNewCores,{ 'C1_APROV=='B'.And.C1_QUJE < C1_QUANT' , 'BR_AZUL'}) //-- Bloqueado
aAdd(aNewCores,{ 'C1_QUJE>=C1_QUANT' , 'DISABLE'})  //-- Atendido

Return (aNewCores)

#Include 'Protheus.ch'

User Function MT110COR()

Local aNewCores := aClone(PARAMIXB[1])

AAdd(aNewCores, { "C1_ZTIPOPR=='S'", "BR_PINK"})
ASORT(aNewCores,,, { |x, y| x > y } ) 

Return (aNewCores)