-- E119- se quitó la fucnionalidad para limitar el uso de lote/cad por sucursal

This commit is contained in:
2022-08-16 22:05:48 -07:00
parent 985becc70d
commit 79691a0747
4 changed files with 2 additions and 48 deletions

View File

@@ -665,17 +665,6 @@ Partial Class Inventarios_EntregaAlmacen
End If
End If
If UsuarioActual.CveEmpresa = 119 Then
Dim CveSubProyectoAlmacen As Integer = GlobalDTAlmacen(UsuarioActual.CveEmpresa, CveAlmacen:=CveAlmacen).FiltroPrimeroValor("CveSubProyecto", "").ToEntero
If CveSubProyectoAlmacen.ToString.Contiene(UsuarioActual.Empresa.Funcionalidad(347).Split(","c)) Then
ValidaLoteCaducidad = True
Else
ValidaLoteCaducidad = False
End If
End If
If Not DtDatos.Columns.Contains("Serie") Then DtDatos.Columns.Add("Serie", GetType(String))
If Not DtDatos.Columns.Contains("Lote") Then DtDatos.Columns.Add("Lote", GetType(String))