Histórico da Página
Ponto de Entrada
Descrição: | Este ponto de entrada está localizado na rotina de Pedido Máquinas JD (VEIVM190) e possibilita manipular as Cores/Status referente a legendas personalizadas dos registros de Pedidos de Maquinas (VQ0_STATUS). Este ponto de entrada trabalha em conjunto com os pontos de entrada VM190COR e VM190LEG. | ||||||
Localização: | Atualizações \ Máquinas JD \ Pedido Máquinas JD (VEIVM190) | ||||||
Eventos: | If lVQ0_STATUS // Ponto de Entrada utilizado para manipular as cores do Status do Pedido ( VQ0_STATUS ) If ExistBlock("VM190STA") aCoresVQ0 := ExecBlock("VM190STA",.f.,.f.) Else // Cores Padrao - VQ0_STATUS aAdd(aCoresVQ0,{ "1" , LoadBitmap( GetResources() , "BR_VERDE" ) , "BR_VERDE" }) // Confirmado aAdd(aCoresVQ0,{ "2" , LoadBitmap( GetResources() , "BR_AZUL" ) , "BR_AZUL" }) // Faturado aAdd(aCoresVQ0,{ "3" , LoadBitmap( GetResources() , "BR_VERMELHO" ) , "BR_VERMELHO" }) // Cancelado EndIf EndIf aAdd(aCoresVQ0,{ " " , LoadBitmap( GetResources() , "BR_BRANCO" ) , "BR_BRANCO" }) // Status não definido | ||||||
Programa Fonte: | VEIVM190.PRW | ||||||
Função: | VEIVM190() | ||||||
Retorno: |
|
Exemplo:
//////////////////////////////////////////////////////////////////
// Ponto de Entrada na rotina de Pedidos de Maquinas (VEIVM190) //
// utilizado para manipular as Cores/Status dos Pedidos //
//////////////////////////////////////////////////////////////////
User Function VM190STA()
Local aCorCust := {}
// { VQ0_STATUS , ObjetoCor , NomeCor }
aAdd(aCorCust,{ "1" , LoadBitmap( GetResources() , "BR_AMARELO" ) , "BR_AMARELO" }) // Confirmado
aAdd(aCorCust,{ "2" , LoadBitmap( GetResources() , "BR_PRETO" ) , "BR_PRETO" }) // Faturado
aAdd(aCorCust,{ "3" , LoadBitmap( GetResources() , "BR_LARANJA" ) , "BR_LARANJA" }) // Cancelado
Return aClone(aCorCust)