VX05FILT - Pré-filtrar as tabelas de F&I

Descrição

Este Ponto de Entrada esta localizado na chamada da tela de Financiamento/Leasing do Atendimento modelo 2, tem como finalidade pré-filtrar as tabelas de F&I. É chamado somente na Inclusão ou Alteração da rotina.

Observações

Exemplos

/*
ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ
±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
±±ÉÍÍÍÍÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍËÍÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍËÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍÍÍÍ»±±
±±ºPrograma ³ VX05FILT º Autor ³ Andre Luis Almeida º Data ³ 09/01/14 º±±
±±ÌÍÍÍÍÍÍÍÍÍÍØÍÍÍÍÍÍÍÍÍÍÊÍÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÊÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍ͹±±
±±ºDescricao ³ Filtro na Tela de F&I º±±
±±ÌÍÍÍÍÍÍÍÍÍÍØÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ͹±±
±±ºRetorno ³ aFiltros ( Filtros na Tela de F&I ) º±±
±±º ³ aFiltros1 = Banco º±±
±±º ³ aFiltros2 = Financiamento ou Leasing º±±
±±º ³ aFiltros3 = Qtde de Parcelas º±±
±±º ³ aFiltros4 = Percentual Entrada º±±
±±º ³ aFiltros5 = Valor Entrada º±±
±±ÌÍÍÍÍÍÍÍÍÍÍØÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ͹±±
±±ºUso ³ Atendimento de Veiculos - F&I º±±
±±ÈÍÍÍÍÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ±±
±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß
*/
User Function VX05FILT()
Local aFiltros := {"","",0,0,0}
Local aParambox := {}
Local aRet := {}
AADD(aParamBox,{1,"Banco",space(3),"@!","","VAR","",30,.f.}) // Banco
AADD(aParamBox,{2,"Tipo","",{"","1=Financiamento","2=Leasing"},100,"",.f.}) // Tipo
AADD(aParamBox,{1,"Parcelas",0,"@E 9999","MV_PAR03 >= 0","","",50,.f.}) // Parcelas
AADD(aParamBox,{1,"% Entrada",0,"@E 999.99","MV_PAR04 >= 0 .and. MV_PAR04 <= 100","","",50,.T.}) // % Entrada
AADD(aParamBox,{1,"Vlr.Entrada",0,"@E 999,999.99","MV_PAR05 >= 0","","",50,.f.}) // Vlr.Entrada
While .t.
If ParamBox(aParamBox,"Filtros",@aRet,,,,,,,,.f.) // Filtros
aFiltros := aClone(aRet)
Exit
EndIf
EndDo
Return(aFiltros)

Preview

Veja também

Idioma

Português(Brasil)

Versões

Todas

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Updates

Parâmetros

Retorno

aFiltros ( Filtros na Tela de F&I )
aFiltros1 = Banco
aFiltros2 = Financiamento ou Leasing
aFiltros3 = Qtde de Parcelas
aFiltros4 = Percentual Entrada
aFiltros5 = Valor Entrada

Eventos de chamada do Ponto de Entrada

If nOpc == 3 .or. nOpc == 4 // Inclusao ou Alteracao
If ExistBlock("VX05FILT")
aFiltros := ExecBlock("VX05FILT",.f.,.f.)
If !Empty(aFiltros1)
cBanco := aFiltros1 // Banco
EndIf
If !Empty(aFiltros2)
cComboFI := aFiltros2 // Financiamento ou Leasing
EndIf
If aFiltros3 > 0
nQtdParc := aFiltros3 // Qtde de Parcelas
EndIf
If aFiltros4 > 0
nPerEnt := aFiltros4 // % Entrada
EndIf
If aFiltros5 > 0
nVlrEnt := aFiltros5 // Vlr.Entrada
EndIf
EndIf
EndIf

Variáveis

Programa Fonte

VEIXX005