Hola
Te paso a explicar el codigo
Código Delphi
[-]
Datos.IBQ_Select.SQL.Clear;
Datos.IBQ_Select.SQL.Add('Select * From "Orden","Proveedor"');
Datos.IBQ_Select.SQL.Add('Where "Orden"."Pro_Rut"="Proveedor"."Pro_Rut"');
Datos.IBQ_Select.SQL.Add('And "Orden"."Ord_Fecha" Between :Var1 And :Var2');
Datos.IBQ_Select.SQL.Add('And "Pro_Razon" Like'+QuotedStr('%'+vBus.Text+'%'));
Datos.IBQ_Select.SQL.Add('Order By "Ord_Numero"');
Datos.IBQ_Select.Params[0].AsDate := vDes.Date;
Datos.IBQ_Select.Params[1].AsDate := vHas.Date;
Datos.IBQ_Select.Open;
Datos := Formulario de tipo DataModule en donde estan los Datasource y IBQuerys
IBQ_Select := IBQuery en donde realizo sentencias SQL
'and "Order"."Ord_Fecha" := Señalo el campo Ord_Fecha de la tabla Order
Between := Sentencia SQL que seria algo como "Entre"
:Var1 and :Var2 := Variables para asignar parametros
Elimina este codigo, que lo que hace es además filtrar por parte de la Razon Social de un Proveedor
Código Delphi
[-]Datos.IBQ_Select.SQL.Add('And "Pro_Razon" Like'+QuotedStr('%'+vBus.Text+'%'));
Order By "Ord_Numero" := Ordeno los resultados por El Nº de Orden
Código Delphi
[-]
Datos.IBQ_Select.Params[0].AsDate := vDes.Date;
Datos.IBQ_Select.Params[1].AsDate := vHas.Date;
Con el codigo anterior le asigno al parametro 1 (Var1) el valor que tiene el componente DateTimePicker vDes
lo mismo para el parametro 2 (Var2)
Con esto se estaria ejecutando el codigo
Bueno, el codigo anterior tambien esta en Interbase
Salu2