Árvore de páginas

Ponto de Entrada

Descrição:

Ponto de Entrada para Manutenção do Vetor aCores utilizado para criação ou manutenção de cores na legenda do Browse do Orçamento por Fases. Trabalha em conjunto com o Ponto de Entrada OA011LEG

Localização:

Atualizações / Mov Oficina / Orc por Fases

Eventos:

 aCores := {;

{ 'VS1->VS1_STATUS == "0" .AND. VS1->VS1_TIPORC == "2"','f10_verd'},; // Orcamento Oficina Digitado

{ 'VS1->VS1_STATUS == "0" .AND. VS1->VS1_TIPORC == "1"','BR_VERDE'},; // Orcamento Balcao Digitado

{ 'VS1->VS1_STATUS == "2"','BR_PINK'},; // "Margem Pendente"

{ 'VS1->VS1_STATUS == "3"','BR_BRANCO'},; // "Avaliacao de Credito"

{ 'VS1->VS1_STATUS == "4"','BR_AZUL'},; // "Aguardando Separacao"

{ 'VS1->VS1_STATUS == "5"','BR_MARROM'},; // "Aguardando Lib.Diverg."

{ 'VS1->VS1_STATUS $ "RT"','BR_CINZA'},; // "Aguardando Reserva"

{ 'VS1->VS1_STATUS == "F" .AND. VS1->VS1_TIPORC == "1"','BR_AMARELO'},; // "Liberado p/ Faturamento"

{ 'VS1->VS1_STATUS == "F" .AND. VS1->VS1_TIPORC == "2"','f5_amar'},; // "Liberado p/ Oficina"

{ 'VS1->VS1_STATUS == "P"','f12_azul'},; // "Pendente para O.S."

{ 'VS1->VS1_STATUS == "L"','f5_amar'},; // "Liberado para O.S."

{ 'VS1->VS1_STATUS == "I"','f14_cinz'},; // "Importado para O.S."

{ 'VS1->VS1_STATUS == "C" .AND. VS1->VS1_TIPORC == "2"','f7_verm'},; // Orcamento Oficina Cancelado

{ 'VS1->VS1_STATUS == "C" .AND. VS1->VS1_TIPORC == "1"','BR_VERMELHO'},; // Orcamento Balcao Cancelado

{ 'VS1->VS1_STATUS == "X"','BR_PRETO'} } // "xxxxxxxxx"

If ( ExistBlock("OA011COR") )

ExecBlock("OA011COR",.f.,.f.)

EndIf

Programa Fonte:

OFIXA011.PRW

Função:

OXA011LEG                     

Retorno:

-

 

Exemplo:

/////////////////////////////////////////////////////////////////////////////////////////////////

// Ponto de Entrada para Manutencao do Vetor aCores utilizado no Browse do Orcamento por Fases //

/////////////////////////////////////////////////////////////////////////////////////////////////

User Function OA011COR()

aadd(aCores,{'VS1->VS1_STATUS == "Z"','BR_XXX'})

Return