From a3afa8498912ad61b2c0e8298b1deb5c2c106394 Mon Sep 17 00:00:00 2001
From: Antonio Gonzalez <jose_antony11@hotmail.com>
Date: Mon, 20 Jan 2020 10:22:11 -0700
Subject: [PATCH] al recibir una remision de usado se muestra el cliente en el
 ddlCliente

---
 Inventarios/RecepcionUsados.aspx    | 2 +-
 Inventarios/RecepcionUsados.aspx.vb | 8 +++++---
 2 files changed, 6 insertions(+), 4 deletions(-)

diff --git a/Inventarios/RecepcionUsados.aspx b/Inventarios/RecepcionUsados.aspx
index 71ed5c269..631f1dc2d 100644
--- a/Inventarios/RecepcionUsados.aspx
+++ b/Inventarios/RecepcionUsados.aspx
@@ -314,7 +314,7 @@
                                     </div>
                                 </div>
                                 <div class="portlet-body">
-                                    <asp:GridView ID="GVPendientes" runat="server" DataKeyNames="CveVenta" EmptyDataText="Aun no hay registros." AutoGenerateColumns="False" ShowHeader="true" ShowHeaderWhenEmpty="True" HeaderStyle-CssClass="Titulos" CssClass="table table-striped table-hover Widthall ScrollAD" data-height="200" data-freezerows="1" GridLines="None">
+                                    <asp:GridView ID="GVPendientes" runat="server" DataKeyNames="CveVenta,NombreComercial" EmptyDataText="Aun no hay registros." AutoGenerateColumns="False" ShowHeader="true" ShowHeaderWhenEmpty="True" HeaderStyle-CssClass="Titulos" CssClass="table table-striped table-hover Widthall ScrollAD" data-height="200" data-freezerows="1" GridLines="None">
                                         <Columns>
                                             <asp:TemplateField HeaderText="Serie-Folio" ItemStyle-Width="20%">
                                                 <ItemTemplate>
diff --git a/Inventarios/RecepcionUsados.aspx.vb b/Inventarios/RecepcionUsados.aspx.vb
index e85f433a3..e8b3f8f97 100644
--- a/Inventarios/RecepcionUsados.aspx.vb
+++ b/Inventarios/RecepcionUsados.aspx.vb
@@ -1010,7 +1010,6 @@ Partial Class Inventarios_RecepcionUsados
     End Sub
 
     Protected Sub BtnGuardar_Click(sender As Object, e As EventArgs) Handles BtnGuardar.Click
-
         If DdlClientes.SelectedValue.ToEntero <= 0 Then
             Alert("No se ha especificado el cliente", TipoMensaje.MsgError)
             Exit Sub
@@ -1934,6 +1933,10 @@ Partial Class Inventarios_RecepcionUsados
         If ObjVentas.GetVenta(CveRemisionRecibida, UsuarioActual.CveEmpresa) AndAlso ObjVentas.DtResultados.Rows.Count > 0 Then
             EsDistribuidor = CBool(ObjVentas.DtResultados.Rows(0)("EsDistribuidor").ToString())
             CveCliente = ObjVentas.DtResultados.Rows(0)("CveCliente").ToString().ToEntero()
+
+            DdlClientes.DataSource = GlobalDTCliente(UsuarioActual.CveEmpresa).FiltraParametros(String.Format("CveCliente = {0}", CveCliente))
+            DdlClientes.DataBind()
+            DdlClientes.SelectedValueExist(CveCliente)
         End If
 
         'SI ES DISTRIBUIDOR VAMOS A GENERAR LA REMISION DE NOTA DE CREDITO
@@ -1959,10 +1962,9 @@ Partial Class Inventarios_RecepcionUsados
                 DivTotal.Visible = True
             End If
         Else
-            DivCliente.Visible = False
+            'DivCliente.Visible = False
             'DivFactura.Visible = False
         End If
-
         If ObjVentas.GetVentasUsadosDetalle(CveRemisionRecibida) Then
             DtUsados = ObjVentas.DtResultados.Copy()
         End If