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 @@
- + 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