From c3eb04343b32dafa2dc6eaae27eab128e5b0c528 Mon Sep 17 00:00:00 2001
From: Jonathan Alexis Perez Morales <jonathan.perez@adssistemas.mx>
Date: Wed, 9 Jun 2021 15:06:45 -0700
Subject: [PATCH] Correcion al cargar bci en recepcion de usados

---
 Inventarios/RecepcionUsados.aspx.vb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Inventarios/RecepcionUsados.aspx.vb b/Inventarios/RecepcionUsados.aspx.vb
index ff91f38ce..a50ab4f25 100644
--- a/Inventarios/RecepcionUsados.aspx.vb
+++ b/Inventarios/RecepcionUsados.aspx.vb
@@ -2761,7 +2761,7 @@ Partial Class Inventarios_RecepcionUsados
                 CveClasificacion = drPS("CveClasificacion").ToString.ToEntero
 
                 Dim Arr = PS.Split("-"c)
-                If Arr.Count > 0 Then
+                If Arr.Count > 1 Then
                     If (DdlBCIAjuste.Items.FindByText(Arr(1).ToString) IsNot Nothing) Then
                         DdlBCIAjuste.SelectedValueExist(DdlBCIAjuste.Items.FindByText(Arr(1).ToString).Value)
                     End If