diff --git a/Inventarios/Apartados.aspx.vb b/Inventarios/Apartados.aspx.vb
index f10ca6247..f48ad283d 100644
--- a/Inventarios/Apartados.aspx.vb
+++ b/Inventarios/Apartados.aspx.vb
@@ -132,9 +132,6 @@ Partial Class Inventarios_Apartados
TipoSeccionAlmacen = 0
- GvDatos.Columns(5).Visible = UsuarioActual.Empresa.Funcionalidad(563) = "1"
- GvDatosDesapartado.Columns(6).Visible = UsuarioActual.Empresa.Funcionalidad(563) = "1"
-
End Sub
Private Sub CargaCombos()
@@ -631,12 +628,6 @@ Partial Class Inventarios_Apartados
Next
Dim TotalCantidad As Double = DtMovimientos.SUMD("Cantidad")
- 'If UsuarioActual.Empresa.Funcionalidad(563) = "1" Then
- ' If TotalCantidad <> DtSeccionAlmacen.FiltraParametros("TipoSeccionAlmacen = 1").SUMD("CantidadSeccionAlmacen") Then
- ' Alert("La seccion de almacen no ha sido agregada completamente.", TipoMensaje.MsgAdvertencia)
- ' Exit Sub
- ' End If
- 'End If
Dim ObjInventario As New ClsInventarios
@@ -909,13 +900,6 @@ Partial Class Inventarios_Apartados
End If
Next
- 'If UsuarioActual.Empresa.Funcionalidad(563) = "1" Then
- ' If TotalCantidad <> DtSeccionAlmacen.FiltraParametros("TipoSeccionAlmacen = 2").SUMD("CantidadSeccionAlmacen") Then
- ' Alert("La seccion de almacen no ha sido agregada completamente.", TipoMensaje.MsgAdvertencia)
- ' Exit Sub
- ' End If
- 'End If
-
'VALIDA SI HUBO CAMBIOS EN LA EXISTENCIA
Dim CantidadGV = GvDatosDesapartado.Rows.Cast(Of GridViewRow)().Sum(Function(gvr) gvr.DataKey("Cantidad").ToDouble)
'Alert($"Cantidad GV {CantidadGV}
Cantidad DT {GetExistenciasDT().SUM("Cantidad")}")
diff --git a/Inventarios/RepAnomalias.aspx b/Inventarios/RepAnomalias.aspx
index a067252e2..284ea3c83 100644
--- a/Inventarios/RepAnomalias.aspx
+++ b/Inventarios/RepAnomalias.aspx
@@ -234,7 +234,7 @@
-
+
diff --git a/Inventarios/ResguardoMaterial.aspx.vb b/Inventarios/ResguardoMaterial.aspx.vb
index 621037f48..c706e4f5c 100644
--- a/Inventarios/ResguardoMaterial.aspx.vb
+++ b/Inventarios/ResguardoMaterial.aspx.vb
@@ -152,8 +152,6 @@ Partial Class Inventarios_ResguardoMaterial
CargaCombos()
TxtFecha.Text = Now.ToShortDateString
TxtFechaLiberacion.Text = Now.ToShortDateString
- GvM.Columns(6).Visible = UsuarioActual.Empresa.Funcionalidad(563) = "1"
- GvMLiberacion.Columns(7).Visible = UsuarioActual.Empresa.Funcionalidad(563) = "1"
GvM.DataBind()
diff --git a/Inventarios/TraspasoAlmacen.aspx.vb b/Inventarios/TraspasoAlmacen.aspx.vb
index 9cb9ddc3a..09ed1a802 100644
--- a/Inventarios/TraspasoAlmacen.aspx.vb
+++ b/Inventarios/TraspasoAlmacen.aspx.vb
@@ -195,10 +195,6 @@ Partial Class Inventarios_TraspasoAlmacen
If Request("CveEntrada") IsNot Nothing AndAlso Request("CveEntrada").ToString.ToEntero > 0 Then
CargaMovimiento(Request("CveEntrada").ToString.ToEntero)
- Else
- GvDatos.Columns(7).Visible = UsuarioActual.Empresa.Funcionalidad(563) = "1"
- GvDatosRecepcion.Columns(7).Visible = UsuarioActual.Empresa.Funcionalidad(563) = "1"
- ThSeccionAlmacen.Visible = UsuarioActual.Empresa.Funcionalidad(563) = "1"
End If
If UsuarioActual.Empresa.Funcionalidad(132) = "1" Then