This commit is contained in:
2021-06-09 17:18:53 -07:00
4 changed files with 432 additions and 177 deletions

View File

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