Merge branch 'master' of http://jperez@192.168.10.111:8383/SIG.git

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)
@@ -606,21 +598,11 @@ Partial Class Inventarios_RecepcionAlmacen
 
             Dim drr As DataRow = GlobalDTAlmacen(UsuarioActual.CveEmpresa, CveAlmacen:=DdlAlmacen.SelectedValue.ToEntero).FiltroPrimero("")
             If drr IsNot Nothing Then
-                '("CveSubProyecto").ToEntero
-                Dim CveSubProyecto As Integer = drr("CveSubProyecto").ToString.ToEntero
-                'RMF condición temporal
-                If UsuarioActual.CveEmpresa = 119 AndAlso CveSubProyecto.ToString.Contiene(UsuarioActual.Empresa.Funcionalidad(347).Split(","c)) Then
-                    ValidaLoteCaducidad = True
-                Else
-                    ValidaLoteCaducidad = False
-                End If
 
                 CveTipoAlmacen = drr("CveTipoAlmacen").ToString.ToEntero
 
             End If
 
-
-
             CargaGVInv()
             'For Each Gvr As GridViewRow In GvInv.Rows
             '    If Gvr.FCDropDownList("DdlSeccionAlmacen").SelectedValue = "-1" Then
@@ -1551,8 +1533,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
@@ -1562,12 +1543,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))
@@ -2285,12 +2264,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