diff --git a/Compras/PopUpVerFactura.aspx.vb b/Compras/PopUpVerFactura.aspx.vb
index 76933f943..9fcf9bf02 100644
--- a/Compras/PopUpVerFactura.aspx.vb
+++ b/Compras/PopUpVerFactura.aspx.vb
@@ -1592,6 +1592,7 @@ Partial Class PopUpVerFactura
         If UsuarioActual.Empresa.Funcionalidad(109) = "1" OrElse UsuarioActual.CveEmpresa = 197 Then
             If ObjVenta.GetVta_ReporteCortes(UsuarioActual.CveEmpresa, MinFecha, MaxFecha, CveSubProyecto, CveCorte:=CveCorte) Then
                 DtReporteCorte = ObjVenta.DtResultados.FiltraParametros("CveCorte > 0")
+                Fecha = DtReporteCorte.FiltroPrimeroValor("FechaInicial", "")
             End If
 
             If ObjVenta.GetVta_MovimientosCajas(CveCorte, -1) Then