From 05367fda527edc0c1c2ed6c48d10b8d701b2fe8c Mon Sep 17 00:00:00 2001
From: Antonio Gonzalez <jose_antony11@hotmail.com>
Date: Mon, 24 Feb 2020 13:05:19 -0700
Subject: [PATCH] se pueden seleccionar a todos los clientes en vez de solo a
 los distribuidores

---
 Inventarios/RecepcionUsados.aspx    | 12 ++++++++----
 Inventarios/RecepcionUsados.aspx.vb | 14 +++++++++-----
 2 files changed, 17 insertions(+), 9 deletions(-)

diff --git a/Inventarios/RecepcionUsados.aspx b/Inventarios/RecepcionUsados.aspx
index 353a1cc8d..2a14c8eac 100644
--- a/Inventarios/RecepcionUsados.aspx
+++ b/Inventarios/RecepcionUsados.aspx
@@ -130,7 +130,11 @@
                                             <div id="DivCliente" runat="server" visible="true">
                                                 <label class="col-md-1 truncate" style="width: 110px">Cliente:</label>
                                                 <div class="col-md-2">
-                                                    <asp:DropDownList ID="DdlClientes" AutoPostBack="true" OnSelectedIndexChanged="DdlClientes_SelectedIndexChanged" AppendDataBoundItems="true" runat="server" CssClass="form-control input-sm select2me" Style="max-width: 200px" DataTextField="NombreComercial" DataValueField="CveCliente"></asp:DropDownList>
+                                                    <asp:DropDownList ID="DdlClientes" AutoPostBack="False" OnSelectedIndexChanged="DdlClientes_SelectedIndexChanged" AppendDataBoundItems="true" runat="server" CssClass="form-control input-sm select2me" Style="max-width: 200px" DataTextField="NombreComercial" DataValueField="CveCliente"></asp:DropDownList>
+                                                </div>
+                                                <div class="col-md-2">
+                                                    <label class="col-md-1 truncate" style="width: 125px">Todos los clientes:</label>
+                                                    <asp:CheckBox runat="server" ID="ChkClientesTodos" data-size="small" Checked="False" AutoPostBack="true" OnCheckedChanged="SeleccionarTipoDeClientes" />
                                                 </div>
                                             </div>
 
@@ -139,7 +143,7 @@
                                                 <div class="col-md-2 " id="DivDdlClienteSucursal" runat="server">
                                                     <asp:DropDownList ID="DdlClientesSucursales" AutoPostBack="true" AppendDataBoundItems="true" runat="server" CssClass="form-control input-sm select2me" Style="max-width: 200px" DataTextField="SucursalCliente" DataValueField="CveClienteSucursal">
                                                         <asp:ListItem Selected="True" Text="-" Value="-1"></asp:ListItem>
-                                                    </asp:DropDownList>                                                  
+                                                    </asp:DropDownList>
                                                 </div>
                                             </div>
                                         </div>
@@ -968,7 +972,7 @@
 
                         <div class="form-group form-md-line-input ">
                             <div class="row">
-                                <div class="col-md-2" style="width:50%">
+                                <div class="col-md-2" style="width: 50%">
                                     <label for='<%= txtCantidad.ClientID %>'>Cantidad:</label>
                                     <asp:TextBox ID="txtCantidad" CssClass="form-control input-sm" Width="100%" MaxLength="15" runat="server" ValidationGroup="GprAgregarUsado"></asp:TextBox>
                                     <ajax:FilteredTextBoxExtender ID="SoloNumerosCantidad" runat="server" TargetControlID="txtCantidad" FilterType="  Numbers" />
@@ -977,7 +981,7 @@
                                     <asp:CustomValidator ID="CVCantidad" runat="server" ClientValidationFunction="ValidaDecimal6digits" ControlToValidate="TxtCantidad" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cantidad''</b> no tiene el formato correcto (6 decimales). Por favor rectifique y vuelva a intentar." ValidateEmptyText="True" ValidationGroup="GprAgregarUsado"></asp:CustomValidator>
                                     <ajax:ValidatorCalloutExtender ID="VCECantidad" runat="server" HighlightCssClass="vco" TargetControlID="CVCantidad" Width="300px"></ajax:ValidatorCalloutExtender>
                                 </div>
-                                <div class="col-md-2" style="width:50%">
+                                <div class="col-md-2" style="width: 50%">
                                     <asp:CheckBox runat="server" ID="ChkSeguirAgregando" />
                                     <label for="ChkSeguirAgregando">Seguir Registrando</label>
                                 </div>
diff --git a/Inventarios/RecepcionUsados.aspx.vb b/Inventarios/RecepcionUsados.aspx.vb
index c9dafd4a1..cef5c28f6 100644
--- a/Inventarios/RecepcionUsados.aspx.vb
+++ b/Inventarios/RecepcionUsados.aspx.vb
@@ -317,7 +317,6 @@ Partial Class Inventarios_RecepcionUsados
             ViewState("DtPorcentajeMarcas") = value
         End Set
     End Property
-
 #End Region
 
     Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load
@@ -346,7 +345,7 @@ Partial Class Inventarios_RecepcionUsados
         TxtFecha.Text = Now.ToShortDateString
         TxtFechaPendientes.Text = Now.ToShortDateString
         RVFecha.MaximumValue = Now.ToShortDateString
-        InicializaClientes()
+        InicializaClientes(False)
 
         'si viene una parámetro para cargar un movimiento lo hacemos dentro del procedimiento cargadatos
         Select Case UsuarioActual.Empresa.Funcionalidad(103)
@@ -1148,7 +1147,7 @@ Partial Class Inventarios_RecepcionUsados
                             'si es selectedvalue = 42, es entrada ,3 -salida
                             Dim CveConceptoUsados As Integer = If(RBLOpcion.SelectedValue.ToEntero = 42, 1, 2)
 
-                            If RBLOpcion.SelectedValue.ToEntero = 42 AndAlso EsDistribuidor AndAlso Dr("CveTamaño").ToString.ToEntero > 0 Then
+                            If EsDistribuidor AndAlso RBLOpcion.SelectedValue.ToEntero = 42 AndAlso Dr("CveTamaño").ToString.ToEntero > 0 Then
 
                                 If Not ObjAcum.DistribuidorMovtosAdd(DdlClientes.SelectedValue.ToEntero, Dr("Cantidad").ToString.ToEntero(), Dr("CveTamaño").ToString.ToEntero, CveConceptoUsados, CveVenta, UsuarioActual.CveUsuario,
                                                 UsuarioActual.CveEmpresa, 0, Dr("Observaciones").ToString, CveMovimiento:=CveMovimiento) Then
@@ -1706,9 +1705,9 @@ Partial Class Inventarios_RecepcionUsados
 
 
 #Region "DDL CLIENTE / CLIENTE SUCURSAL - SELECTED INDEX CHANGED"
-    Private Sub InicializaClientes()
+    Private Sub InicializaClientes(Todos As Boolean)
 
-        DdlClientes.DataSource = GlobalDTCliente(UsuarioActual.CveEmpresa).FiltraParametros("EsDistribuidor = 1")
+        DdlClientes.DataSource = GlobalDTCliente(UsuarioActual.CveEmpresa).FiltraParametros(If(Todos, "", "EsDistribuidor = 1"))
         DdlClientes.DataBind()
         DdlClientes.Items.Insert(0, New ListItem("Seleccione", "-1"))
         DdlClientes.SelectedValue = "-1"
@@ -2781,4 +2780,9 @@ Partial Class Inventarios_RecepcionUsados
     End Sub
 #End Region
 
+    Protected Sub SeleccionarTipoDeClientes(sender As Object, e As EventArgs)
+        DdlClientes.Items.Clear()
+        InicializaClientes(ChkClientesTodos.Checked)
+    End Sub
+
 End Class