diff --git a/Ventas/RepPedidosSTF.aspx.vb b/Ventas/RepPedidosSTF.aspx.vb
index e8fd6f860..c07a59176 100644
--- a/Ventas/RepPedidosSTF.aspx.vb
+++ b/Ventas/RepPedidosSTF.aspx.vb
@@ -49,6 +49,8 @@ Partial Class Ventas_RepPedidosSTF
             ObjVentas.Dispose()
             GvE.DataBind()
         Else
+            FechaInicio = txtFechaI.Text.ToDate
+            FechaFin = txtFechaF.Text.ToDate
             Dim ObjVentas As New ClsVentas
             If ObjVentas.GetRepPedidosSTF(DdlSubProyecto.SelectedValue.ToEntero, DdlVendedor.SelectedValue.ToEntero, UsuarioActual.CveEmpresa, Opcion, FechaInicio, FechaFin) Then
                 GvDatos.DataSource = ObjVentas.DtResultados