-- corrección manejo de lote/cad por sucursal

Inventarios/RecepcionAlmacen.aspx.vb

@@ -28,14 +28,6 @@ Partial Class Inventarios_RecepcionAlmacen
         End Set
     End Property
 
-    Private Property ValidaLoteCaducidad As Boolean
-        Get
-            Return CType(ViewState("ValidaLoteCaducidad"), Boolean)
-        End Get
-        Set(value As Boolean)
-            ViewState("ValidaLoteCaducidad") = value
-        End Set
-    End Property
     Private Property CveTipoAlmacen As Integer
         Get
             Return CType(ViewState("CveTipoAlmacen"), Integer)
@@ -1537,8 +1529,7 @@ Partial Class Inventarios_RecepcionAlmacen
                 e.Row.FCDropDownList("DdlSeccionAlmacen").Visible = False
             End If
 
-            If (ValidaLoteCaducidad) OrElse (UsuarioActual.CveEmpresa <> 119) Then
-                If CBool(e.Row.DBCampo("AplicaCaducidad")) Then
+            If CBool(e.Row.DBCampo("AplicaCaducidad")) Then
                     e.Row.FCTextBox("TxtCaducidad").Visible = True
                     e.Row.FCLinkButton("LnkCaducidad").Visible = True
                     e.Row.FCTextBox("TxtCaducidad").Text = Now.ToShortDateString
@@ -1548,12 +1539,10 @@ Partial Class Inventarios_RecepcionAlmacen
                     e.Row.FCLinkButton("LnkCaducidad").Visible = False
                 End If
 
-                If CBool(e.Row.DBCampo("AplicaLote")) Then
-                    e.Row.FCTextBox("TxtLote").Visible = True
-                Else
-                    e.Row.FCTextBox("TxtLote").Visible = False
-                End If
-
+            If CBool(e.Row.DBCampo("AplicaLote")) Then
+                e.Row.FCTextBox("TxtLote").Visible = True
+            Else
+                e.Row.FCTextBox("TxtLote").Visible = False
             End If
 
             e.Row.FCButton("BtnDividir").Attributes.Add("onclick", String.Format("Dividir('{0}');", e.Row.FCTextBox("TxtDividir").ClientID))
@@ -2271,12 +2260,6 @@ Partial Class Inventarios_RecepcionAlmacen
             Index += 1
         Next
 
-        If (Not ValidaLoteCaducidad) OrElse (UsuarioActual.CveEmpresa <> 119) Then
-            ValidaSeccion = False
-            ValidaCaducidad = False
-            ValidaLote = False
-        End If
-
         If ValidaSeccion Then
             Alert("La sección de almacen no ha sido especificada en todos los productos.", TipoMensaje.MsgAdvertencia)
             Return False