diff --git a/Ventas/RepProductosServicios.aspx b/Ventas/RepProductosServicios.aspx
index d066b5adc..c782af171 100644
--- a/Ventas/RepProductosServicios.aspx
+++ b/Ventas/RepProductosServicios.aspx
@@ -389,13 +389,13 @@
                             <asp:Literal ID="LtlCantidad" runat="server" Text='<%# Eval("Cantidad", "{0:N0}") %>'></asp:Literal>
                         </ItemTemplate>
                     </asp:TemplateField>
-                    <asp:BoundField HeaderText="Sub Total" DataField="SubTotal" ItemStyle-Width="10%" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" />
+                    <asp:BoundField HeaderText="Sub Total" DataField="SubTotal" ItemStyle-Width="10%" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" />
                     <asp:BoundField HeaderText="Descuento" DataField="Descuento" ItemStyle-Width="10%" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" />
                     <%--<asp:BoundField HeaderText="Amortización" DataField="Amortizacion" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" />--%>
                     <asp:BoundField HeaderText="IVA" DataField="IVA" ItemStyle-Width="10%" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" />
                     <%--<asp:BoundField HeaderText="Ret. IVA" DataField="RetIVA" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" />--%>
                     <%--<asp:BoundField HeaderText="Ret. ISR" DataField="RetISR" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" />--%>
-                    <asp:BoundField HeaderText="Total" DataField="Total" ItemStyle-Width="10%" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" />
+                    <asp:BoundField HeaderText="Total" DataField="Total" ItemStyle-Width="10%" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" />
                     <asp:BoundField HeaderText="Sub. Máximo" DataField="MAX_SubTotal" ItemStyle-Width="10%" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" Visible="false" />
                     <asp:BoundField HeaderText="Sub. Promedio" DataField="AVG_SubTotal" ItemStyle-Width="10%" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" Visible="false" />
                     <asp:BoundField HeaderText="Sub. Mínimo" DataField="MIN_SubTotal" ItemStyle-Width="10%" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" Visible="false" />
diff --git a/Ventas/RepProductosServiciosDetalle.aspx b/Ventas/RepProductosServiciosDetalle.aspx
index 02cb489fd..45c299c7d 100644
--- a/Ventas/RepProductosServiciosDetalle.aspx
+++ b/Ventas/RepProductosServiciosDetalle.aspx
@@ -399,13 +399,13 @@
                     <%--3--%>
                     <asp:BoundField HeaderText="Suc. Cob." DataField="SubProyectoCobranza" ItemStyle-Width="5%" ItemStyle-HorizontalAlign="Left" Visible="false" />
                     <%--4--%>
-                    <asp:BoundField HeaderText="Código" DataField="Codigo" ItemStyle-Width="5%" ItemStyle-HorizontalAlign="Left" />
+                    <asp:BoundField HeaderText="Código" DataField="Codigo" ItemStyle-Width="2.5%" ItemStyle-HorizontalAlign="Left" />
                     <%--5--%>
                     <asp:BoundField HeaderText="Cliente" DataField="Nombre" ItemStyle-Width="15%" ItemStyle-HorizontalAlign="Left" />
                     <%--6--%>
-                    <asp:BoundField HeaderText="Cantidad" DataField="Cantidad" DataFormatString="{0:###,###,###,###.##}" ItemStyle-Width="5%" ItemStyle-HorizontalAlign="Right" />
+                    <asp:BoundField HeaderText="Cantidad" DataField="Cantidad" DataFormatString="{0:###,###,###,###.##}" ItemStyle-Width="2.5%" ItemStyle-HorizontalAlign="Right" />
                     <%--7--%>
-                    <asp:BoundField HeaderText="Código" DataField="CodigoProducto" ItemStyle-Width="15%" ItemStyle-HorizontalAlign="Left" />
+                    <asp:BoundField HeaderText="Código" DataField="CodigoProducto" ItemStyle-Width="2.5%" ItemStyle-HorizontalAlign="Left" />
                     <%--8--%>
                     <asp:BoundField HeaderText="Producto/Servicio" DataField="PS" ItemStyle-Width="25%" ItemStyle-HorizontalAlign="Left" />
                     <%--9--%>
@@ -413,13 +413,13 @@
                     <%--10--%>
                     <asp:BoundField HeaderText="PU" DataField="PU" DataFormatString="{0:###,###,###,###.##}" ItemStyle-Width="5%" ItemStyle-HorizontalAlign="Right" />
                     <%--11--%>
-                    <asp:BoundField HeaderText="SubTotal" DataField="SubTotal" DataFormatString="{0:###,###,###,###.##}" ItemStyle-Width="7.5%" ItemStyle-HorizontalAlign="Right" />
+                    <asp:BoundField HeaderText="SubTotal" DataField="SubTotal" DataFormatString="{0:N2}" ItemStyle-Width="7.5%" ItemStyle-HorizontalAlign="Right" />
                     <%--12--%>
                     <asp:BoundField HeaderText="Desc" DataField="Descuento" DataFormatString="{0:###,###,###,###.##}" ItemStyle-Width="5%" ItemStyle-HorizontalAlign="Right" />
                     <%--13--%>
                     <asp:BoundField HeaderText="IVA" DataField="IVA" DataFormatString="{0:###,###,###,###.##}" ItemStyle-Width="5%" ItemStyle-HorizontalAlign="Right" />
                     <%--14--%>
-                    <asp:BoundField HeaderText="Total" DataField="Total" DataFormatString="{0:###,###,###,###.##}" ItemStyle-Width="7.5%" ItemStyle-HorizontalAlign="Right" />
+                    <asp:BoundField HeaderText="Total" DataField="Total" DataFormatString="{0:N2}" ItemStyle-Width="7.5%" ItemStyle-HorizontalAlign="Right" />
                     <%--15--%>
                     <asp:BoundField HeaderText="RFC" DataField="RFC" ItemStyle-Width="5%" Visible="false" />
                     <%--16--%>
diff --git a/Ventas/RepVentas.aspx b/Ventas/RepVentas.aspx
index fecc3ef63..a0d7ae3f0 100644
--- a/Ventas/RepVentas.aspx
+++ b/Ventas/RepVentas.aspx
@@ -366,13 +366,13 @@
                         </ItemTemplate>
                     </asp:TemplateField>
                     <%--2--%>
-                    <asp:BoundField HeaderText="Sub Total" DataField="SubTotal" ItemStyle-Width="7.5%" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" />
+                    <asp:BoundField HeaderText="Sub Total" DataField="SubTotal" ItemStyle-Width="7.5%" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" />
                     <%--3--%>
                     <asp:BoundField HeaderText="Descuento" DataField="Descuento" ItemStyle-Width="7.5%" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" />
                     <%--4--%>
                     <asp:BoundField HeaderText="Amortización" DataField="Amortizacion" Visible="false" ItemStyle-Width="7.5%" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" />
                     <%--5--%>
-                    <asp:BoundField HeaderText="Sub Total 2" DataField="SubTotal2" ItemStyle-Width="7.5%" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" />
+                    <asp:BoundField HeaderText="Sub Total 2" DataField="SubTotal2" ItemStyle-Width="7.5%" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" />
                     <%--6--%>
                     <asp:BoundField HeaderText="IVA" DataField="IVA" ItemStyle-Width="7.5%" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" />
                     <%--7--%>
@@ -384,7 +384,7 @@
                     <%--10--%>
                     <asp:BoundField HeaderText="Imp. Locales" DataField="TotalImpuestos" ItemStyle-Width="10%" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" />
                     <%--11--%>
-                    <asp:BoundField HeaderText="Total" DataField="Total" ItemStyle-Width="10%" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" />
+                    <asp:BoundField HeaderText="Total" DataField="Total" ItemStyle-Width="10%" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" />
                     <%--12--%>
                     <asp:BoundField HeaderText="Sub. Máximo" DataField="MAX_SubTotal" ItemStyle-Width="5%" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" />
                     <%--13--%>
diff --git a/Ventas/RepVentas.aspx.vb b/Ventas/RepVentas.aspx.vb
index 64d428b75..66a52fd02 100644
--- a/Ventas/RepVentas.aspx.vb
+++ b/Ventas/RepVentas.aspx.vb
@@ -390,7 +390,7 @@ Partial Class Ventas_RepVentas
                 CveMoneda = e.Row.DBCampo("CveMoneda").ToString.ToEntero
             End If
 
-            Dim CveSubProyecto = "-1", CveProyecto = "-1"
+            Dim CveSubProyecto As String = "-1", CveProyecto As String = "-1"
             If DdlGrupo.SelectedValue.ToEntero = 19 Then
                 CveSubProyecto = e.Row.DBCampo("CveCentroCosto")
                 CveProyecto = e.Row.DBCampo("CveCentroCostoProyecto")
@@ -411,7 +411,7 @@ Partial Class Ventas_RepVentas
                         If e.Row.DBCampo("Mes").ToEntero() > 0 Then
                             Dim Anio As Integer = FechaFRef.Year
                             Dim Mes As Integer = e.Row.DBCampo("Mes").ToEntero()
-                            Dim lastDayOfMonth = DateTime.DaysInMonth(Anio, Mes)
+                            Dim lastDayOfMonth As Integer = DateTime.DaysInMonth(Anio, Mes)
 
                             Dim Dia As Integer = FechaFRef.Day
 
@@ -423,7 +423,7 @@ Partial Class Ventas_RepVentas
                                 FechaInicial = New DateTime(Anio, Mes, 1).ToString("dd/MM/yyyy")
                             End If
 
-                            Dim FechaFinalRef = New DateTime(Anio, Mes, Dia)
+                            Dim FechaFinalRef As New DateTime(Anio, Mes, Dia)
 
                             'ASIGNAR LA FECHA FINAL DEL GRUPO, SI ES MENOR A LA FECHA DEL FILTRO 
                             If FechaF <> "-1" Then
@@ -435,9 +435,6 @@ Partial Class Ventas_RepVentas
                             Else
                                 FechaFinal = FechaFinalRef.ToString("dd/MM/yyyy")
                             End If
-
-
-
                         End If
 
                     Case 3 ' AÑO/MES
@@ -445,13 +442,13 @@ Partial Class Ventas_RepVentas
                         Dim FechaFRef As DateTime = FechaF.ToDateTime()
 
                         Dim separator As Char = "/".ToCharArray().FirstOrDefault()
-                        Dim AnioMes = e.Row.DBCampo("AnioMes").Split(separator)
+                        Dim AnioMes As String() = e.Row.DBCampo("AnioMes").Split(separator)
 
                         Dim Anio As Integer = AnioMes(0).ToEntero()
                         Dim Mes As Integer = AnioMes(1).ToEntero()
 
                         If Anio > 0 AndAlso Mes > 0 Then
-                            Dim lastDayOfMonth = DateTime.DaysInMonth(Anio, Mes)
+                            Dim lastDayOfMonth As Integer = DateTime.DaysInMonth(Anio, Mes)
 
                             Dim DiaFinal As Integer = FechaFRef.Day
 
@@ -469,8 +466,7 @@ Partial Class Ventas_RepVentas
                                 End If
                             End If
 
-                            Dim FechaFinalRef = New DateTime(Anio, Mes, DiaFinal)
-
+                            Dim FechaFinalRef As New DateTime(Anio, Mes, DiaFinal)
                             'ASIGNAR LA FECHA FINAL DEL GRUPO, SI ES MENOR A LA FECHA DEL FILTRO 
                             If FechaF <> "-1" Then
                                 If FechaFRef < FechaFinalRef Then
@@ -504,7 +500,6 @@ Partial Class Ventas_RepVentas
                 e.Row.Attributes.Add("style", "background:#CCCCCC !important")
             End If
 
-
             If DdlGrupo.SelectedValue.ToEntero = 21 Then
                 If e.Row.DBCampo("GPO").Contains("Total") Then
                     e.Row.CssClass = "Totales"
@@ -517,8 +512,6 @@ Partial Class Ventas_RepVentas
                         e.Row.Cells(6).BackColor = Drawing.Color.Transparent
                     End If
                 End If
-
-
             End If
         End If
     End Sub
@@ -818,9 +811,8 @@ Partial Class Ventas_RepVentas
             If DdlClienteClasificacion.SelectedValue <> "-1" Then StrFiltro.AppendFormat("&emsp;<b>Clasificación Cliente</b>: {0}", DdlClienteClasificacion.SelectedItem.Text)
             If DdlCondicionesPago.SelectedValue <> "-1" Then StrFiltro.AppendFormat("&emsp;<b>Condiciones Pago</b>: {0}", DdlCondicionesPago.SelectedItem.Text)
 
-
             Dim Imagen As New System.IO.FileInfo($"{UsuarioActual.Empresa.Ruta}/Logo.png")
-            Dim logouri = String.Format("{0}://{1}:{2}/Empresas/{3}/Logo.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa)
+            Dim logouri As String = String.Format("{0}://{1}:{2}/Empresas/{3}/Logo.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa)
             Dim dt As DataTable = DtVentas '.FiltraParametros("", "Orden") '.FiltraParametros("Total > 0", DistinctColumns:={"GPO", "Cantidad", "SubTotal", "Descuento", "Amortizacion", "IVA", "Total"})
             Dim FechaI, FechaF As String
             FechaI = If(txtFechaI.Text = "" Or txtFechaI.Text = "__/__/____", "-1", txtFechaI.Text)
@@ -964,7 +956,7 @@ Partial Class Ventas_RepVentas
     End Sub
 
     Private Sub CalcularIntervaloRepHP()
-        Dim PrevMondayDate = DateTime.Today.AddDays(-Weekday(Today.AddDays(-1), Microsoft.VisualBasic.FirstDayOfWeek.Monday))
+        Dim PrevMondayDate As Date = DateTime.Today.AddDays(-Weekday(Today.AddDays(-1), Microsoft.VisualBasic.FirstDayOfWeek.Monday))
         Dim Sunday As DateTime = PrevMondayDate.AddDays(6)
 
         txtFechaIHP.Text = PrevMondayDate.ToString("dd/MM/yyyy")