Boa tarde
Eu tenho um E3Browser para fazer uma busca inicial já pré configurada (retorna todas as motobombas) na consulta1 que vem com o E3Browser.
SQL inicial:
Só que eu adicionei algumas opções como filtrar por elevatória e por data. Assim, ao clicar no botão ele chema uma nova consulta (consulta2) e daí devolve o resultado para o E3Browser. Contudo não está retornando nada, mas nas configurações do SQL da consulta2, ele retorna só os registro que eu preciso na visualização.
Segundo SQL:
O que pode estar de errado?
Segue o código do botão:
if Parent.Item("ComboBox1").Value = "" Then
Msgbox "Escolha uma elevatória!"
Exit Sub
end if
On Error Resume Next
set browser = Parent.Item("E3Browser1")
browser.ClearFields()
browser.Item("Consulta2").SetVariableValue "ponto" , Parent.Item("ComboBox1").Value
'if Parent.Item("dtInicial").Value <> "" and Parent.Item("dtInicial").Value <> "" then
browser.Item("Consulta2").SetVariableValue "data_inicial" , Parent.Item("dtInicial").Value
browser.Item("Consulta2").SetVariableValue "data_fim" , Parent.Item("dtFim").Value
'end if
browser.RetrieveE3QueryFields()
'browser.Fields.Item("elevatoria").Width = 150
'browser.Fields.Item("NIVEL").Width = 150
browser.SourceQuery = "Consulta2"
'If Err.Number <> 5 then
browser.Requery()
'else
' msgbox "Ocorreu algum erro na hora de buscar os dados!"
'end if
Página inicial:
Página após o Filtro:
