diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb
index 93a5ecc1b..2ee14cea3 100644
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -9436,8 +9436,6 @@ Partial Class Compras_Compras
                                                             End If
 
 
-                                                            If tipoCambio > 1 Then Concepto += $" TC{tipoCambio} ${ImporteMovimiento.FormatoNumero(2)}"
-
 
 
                                                         End If
diff --git a/Compras/RepPagadoDetalle.aspx b/Compras/RepPagadoDetalle.aspx
index cea78df58..261f6c69b 100644
--- a/Compras/RepPagadoDetalle.aspx
+++ b/Compras/RepPagadoDetalle.aspx
@@ -47,7 +47,7 @@
                                 </asp:DropDownList>
                             </div>
                             <div class="col-md-1">Proveedor:</div>
-                            <div class="col-md-2 ">
+                            <div class="col-md-2 "> 
                                 <ADS:Dropdownlost ID="DdlProveedores" runat="server" CssStyle="width: 100%;" Width="100%" DataTextField="RazonSocial" DataValueField="CveProveedor"></ADS:Dropdownlost>   
                             </div>
                             <div class="col-md-1">Fecha Inicial:</div>
diff --git a/Compras/RepPagadoDetalle.aspx.cs b/Compras/RepPagadoDetalle.aspx.cs
index 1ad46e4ff..098d3662b 100644
--- a/Compras/RepPagadoDetalle.aspx.cs
+++ b/Compras/RepPagadoDetalle.aspx.cs
@@ -89,7 +89,22 @@ public partial class Compras_RepPágadoDetalle : ClsPaginas
         DdlProyecto.SelectedValueExist(Request["CveProyecto"] == null ? "-1" : Request["CveProyecto"].ToString());
         DdlSubProyecto.SelectedValueExist(Request["CveSubProyecto"] == null ? "-1" : Request["CveSubProyecto"].ToString());
         
-        DdlProveedor.SelectedValueExist(Request["CveProveedor"] == null ? "-1" : Request["CveProveedor"].ToString());
+        
+        if (Request["CveProveedor"] != null  && Request["CveProveedor"].ToString().ToEntero() > 0)
+        {
+
+            DataRow DrowProveedor;
+            int CveProveedor = Request["CveProveedor"].ToString().ToEntero();
+
+            DrowProveedor = get_GlobalDTCompProveedores(UsuarioActual.CveEmpresa, CveProveedor).Rows[0];
+
+
+            DdlProveedores.txtText.Value = DrowProveedor["RazonSocial"].ToString();
+            DdlProveedores.txtValue.Value = CveProveedor.ToString();
+        }
+
+
+        
 
         DdlUsuario.SelectedValueExist(Request["CveUsuario"] == null ? "-1" : Request["CveUsuario"].ToString());
         DdlResponsable.SelectedValueExist(Request["CveResponsable"] == null ? "-1" : Request["CveResponsable"].ToString());
@@ -207,7 +222,7 @@ public partial class Compras_RepPágadoDetalle : ClsPaginas
     private void CargaDatos()
     {
         ClsCompras ObjComp = new ClsCompras();
-        if (ObjComp.GetRepPagadoDetalle(txtFechaI.Text.ToDate(), txtFechaF.Text.ToDate(), DdlProveedor.SelectedValue.ToEntero(), DdlProyecto.SelectedValue.ToEntero(),
+        if (ObjComp.GetRepPagadoDetalle(txtFechaI.Text.ToDate(), txtFechaF.Text.ToDate(), DdlProveedores.SelectedValue.ToEntero(), DdlProyecto.SelectedValue.ToEntero(),
             DdlSubProyecto.SelectedValue.ToEntero(), DdlUsuario.SelectedValue.ToEntero(), UsuarioActual.CveEmpresa, DdlGrupo.SelectedValue.ToEntero(),
             DdlResponsable.SelectedValue.ToEntero(), UsuarioActual.CveUsuario, DdlBanco.SelectedValue.ToEntero(), DdlCuentaBancaria.SelectedValue.ToEntero(),
             DdlMoneda.SelectedValue.ToEntero(),ChkMesSeleccionado.Checked,GPO, TxtFechaICompra.Text.ToDate(), TxtFechaFCompra.Text.ToDate(), Tipo, CveTipoProveedor: DdlTipoProveedor.SelectedValue.ToEntero(), 
@@ -263,8 +278,8 @@ public partial class Compras_RepPágadoDetalle : ClsPaginas
             StrFiltro.AppendFormat("&emsp;<b>SubProyecto</b>: {0}", DdlSubProyecto.SelectedItem.Text);
         if (DdlGrupo.SelectedValue != "-1")
             StrFiltro.AppendFormat("&emsp;<b>Grupo</b>: {0}", DdlGrupo.SelectedItem.Text);
-        if (DdlProveedor.SelectedValue != "-1")
-            StrFiltro.AppendFormat("&emsp;<b>Proveedor</b>: {0}", DdlProveedor.SelectedItem.Text);
+        if (DdlProveedores.SelectedValue != "-1")
+            StrFiltro.AppendFormat("&emsp;<b>Proveedor</b>: {0}", DdlProveedores.txtText.Value);
         if (DdlUsuario.SelectedValue != "-1")
             StrFiltro.AppendFormat("&emsp;<b>Registro</b>: {0}", DdlUsuario.SelectedItem.Text);
         if (DdlResponsable.SelectedValue != "-1")
diff --git a/Ventas/RepProductosServicios.aspx b/Ventas/RepProductosServicios.aspx
index bf5486a98..5ab297158 100644
--- a/Ventas/RepProductosServicios.aspx
+++ b/Ventas/RepProductosServicios.aspx
@@ -546,7 +546,7 @@
                     "title": "Ventas"
                 }],
                 "graphs": [{
-                    "balloonText": "[[category]]: <b>[[value]]</b> [[Moneda]]",
+                    "balloonText": "[[Texto]]: <b>[[value]]</b> [[Moneda]]",
                     "colorField": "Color",
                     "fillAlphas": 1,
                     "lineAlpha": 0.1,
@@ -560,7 +560,7 @@
                     "cursorAlpha": 0,
                     "zoomable": false
                 },
-                "categoryField": "Texto",
+                "categoryField": "Categoria",
                 "categoryAxis": {
                     "gridPosition": "start",
                     "labelRotation": 90
@@ -579,7 +579,7 @@
                 "dataProvider":
                     data,
                 "valueField": "Valor",
-                "titleField": "Texto",
+                "titleField": "Categoria",
                 "outlineAlpha": 0.4,
                 "depth3D": 0,
                 "balloonText": "[[title]]<br><span style='font-size:14px'><b>[[value]]</b> ([[percents]]% [[Moneda]])</span>",
diff --git a/Ventas/RepProductosServicios.aspx.vb b/Ventas/RepProductosServicios.aspx.vb
index 4f47796b5..c78862811 100644
--- a/Ventas/RepProductosServicios.aspx.vb
+++ b/Ventas/RepProductosServicios.aspx.vb
@@ -686,7 +686,7 @@ Partial Class Ventas_RepProductosServicios
                         Row("Valor") = Dr("IVA").ToString.FormatoNumero
                     Case 4
                         Row("Valor") = Dr("Cantidad").ToString.FormatoNumero
-                        Row("Texto") = $"{Dr("GPO").ToString} Cantidad"
+                        Row("Texto") = $"{Dr("GPO").ToString}"
                 End Select
 
                 Row("Color") = DtColor.Rows(RowColorIndex)("Color").ToString
@@ -699,10 +699,10 @@ Partial Class Ventas_RepProductosServicios
             End If
         Next
 
-        Dim query = From s In Dt.AsEnumerable() Select New With {.Texto = s("Texto").ToString(), .Valor = s("Valor").ToString().ToDouble(), .Color = s("Color").ToString(), .Moneda = s("Moneda").ToString()}
+        Dim query = From s In Dt.AsEnumerable() Select New With {.Texto = s("Texto").ToString(), .Valor = s("Valor").ToString().ToDouble(), .Color = s("Color").ToString(), .Moneda = s("Moneda").ToString(), .Categoria = s("Texto").ToString()}
 
         If DdlVer.SelectedValue.ToEntero = 4 Then
-            query = From s In Dt.AsEnumerable() Select New With {.Texto = s("Texto").ToString(), .Valor = s("Valor").ToString().ToDouble(), .Color = s("Color").ToString(), .Moneda = ""}
+            query = From s In Dt.AsEnumerable() Select New With {.Texto = s("Texto").ToString() & " Cantidad", .Valor = s("Valor").ToString().ToDouble(), .Color = s("Color").ToString(), .Moneda = "", .Categoria = s("Texto").ToString()}
         End If
 
         Dim json As String = Newtonsoft.Json.JsonConvert.SerializeObject(query)