diff --git a/Ventas/RepVentas.aspx.vb b/Ventas/RepVentas.aspx.vb index c2bcf48ee..f681e842e 100644 --- a/Ventas/RepVentas.aspx.vb +++ b/Ventas/RepVentas.aspx.vb @@ -453,7 +453,21 @@ Partial Class Ventas_RepVentas FechaInicial = New DateTime(Anio, Mes, 1).ToString("dd/MM/yyyy") End If - FechaFinal = New DateTime(Anio, Mes, Dia).ToString("dd/MM/yyyy") + Dim FechaFinalRef = New DateTime(Anio, Mes, Dia) + + 'ASIGNAR LA FECHA FINAL DEL GRUPO, SI ES MENOR A LA FECHA DEL FILTRO + If FechaF <> "-1" Then + If FechaFRef < FechaFinalRef Then + FechaFinal = FechaFRef.ToString("dd/MM/yyyy") + Else + FechaFinal = FechaFinalRef.ToString("dd/MM/yyyy") + End If + Else + FechaFinal = FechaFinalRef.ToString("dd/MM/yyyy") + End If + + + End If Case 3 ' AÑO/MES @@ -479,7 +493,19 @@ Partial Class Ventas_RepVentas FechaInicial = New DateTime(Anio, Mes, 1).ToString("dd/MM/yyyy") End If - FechaFinal = New DateTime(Anio, Mes, Dia).ToString("dd/MM/yyyy") + Dim FechaFinalRef = New DateTime(Anio, Mes, Dia) + + 'ASIGNAR LA FECHA FINAL DEL GRUPO, SI ES MENOR A LA FECHA DEL FILTRO + If FechaF <> "-1" Then + If FechaFRef < FechaFinalRef Then + FechaFinal = FechaFRef.ToString("dd/MM/yyyy") + Else + FechaFinal = FechaFinalRef.ToString("dd/MM/yyyy") + End If + Else + FechaFinal = FechaFinalRef.ToString("dd/MM/yyyy") + End If + End If Case 4 ' FECHA