-- cambio en globalDT
This commit is contained in:
@@ -2933,11 +2933,10 @@ Partial Class Inventarios_TraspasoAlmacen
|
||||
Dim RowsNoCargados As Integer = 0
|
||||
Dim NoPSConSerie As Integer = 0
|
||||
Try
|
||||
Dim DtPS As DataTable = GlobalDTPS(UsuarioActual.CveEmpresa)
|
||||
Dim DtPS As DataTable = GlobalDTPSSimplificado(UsuarioActual.CveEmpresa)
|
||||
For Each RowExcel As DataRow In dt.Rows
|
||||
If RowExcel("Codigo").ToString() <> "" Then
|
||||
|
||||
|
||||
Dim RowPS As DataRow = DtPS.FiltroPrimero(String.Format("Codigo='{0}'", RowExcel("Codigo").ToString()))
|
||||
|
||||
Dim CveProducto As Integer = RowPS("CvePS").ToString().ToEntero()
|
||||
@@ -2954,7 +2953,7 @@ Partial Class Inventarios_TraspasoAlmacen
|
||||
Dim Valido As Boolean = True
|
||||
Dim ValidarLote As Boolean = True
|
||||
|
||||
If GlobalDTAlmacen(UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveTipoAlmacen", $"CveAlmacen = {DdlAlmacenOrigen.SelectedValue}").ToEntero = 6 Then
|
||||
If GlobalDTAlmacen(UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveTipoAlmacen", $"CveAlmacen = {DdlAlmacenOrigen.SelectedValue}") = "6" Then
|
||||
ValidarLote = False
|
||||
End If
|
||||
|
||||
|
||||
Reference in New Issue
Block a user