diff --git a/Inventarios/PaquetesArmadoDesarmado.aspx.vb b/Inventarios/PaquetesArmadoDesarmado.aspx.vb
index d76c06fd0..7e8f78fbe 100644
--- a/Inventarios/PaquetesArmadoDesarmado.aspx.vb
+++ b/Inventarios/PaquetesArmadoDesarmado.aspx.vb
@@ -211,7 +211,7 @@ Partial Class Inventarios_PaquetesArmadoDesarmado
         Dim DtDatos As New DataTable
 
         Dim drP As DataRow = GlobalDTPS(UsuarioActual.CveEmpresa, CvePS:=DdlPaqueteArmado.SelectedValue.ToEntero).FiltroPrimero("")
-        Dim AplicaSerie As Boolean = False
+
         Dim CveUMTemp = drP("CveUM").ToString.ToEntero
         If ObjProductosServicios.GetPaqueteDetalle(DdlPaqueteArmado.SelectedValue.ToEntero, UsuarioActual.CveEmpresa, CveUMTemp, TxtCantidadArmado.Text.ToDouble, DdlAlmacenArmado.SelectedValue.ToEntero, TxtFechaArmado.Text.ToDate, CveVendedor:=CveVendedor, CveCliente:=If(UsuarioActual.Empresa.Funcionalidad(146) = "1", -1, CveCliente)) Then
             DtDatos = ObjProductosServicios.DtResultados.FiltraParametros("CveTipoPS = 2").Copy
@@ -278,8 +278,8 @@ Partial Class Inventarios_PaquetesArmadoDesarmado
         GvDatosArmado.DataSource = DtDatos
         GvDatosArmado.DataBind()
 
+        GvDatosArmado.Columns(4).Visible = DtDatos.MAX("AplicaSerie", "") = "True"
         GvDatosArmado.Columns(5).Visible = DtDatos.MAX("AplicaSeccion") = "True"
-        'GvDatosArmado.Columns(6).Visible = DtDatos.MAX("Serie", "") <> ""
         GvDatosArmado.Columns(6).Visible = False 'DtDatos.MAX("Lote", "") <> ""
         GvDatosArmado.Columns(7).Visible = False 'DtDatos.MAX("FechaCaducidad", "FechaCaducidad is not null").ToDate > MinFecha
 
@@ -758,10 +758,10 @@ Partial Class Inventarios_PaquetesArmadoDesarmado
                 'Dim Contador = DtDatosDetalle.FiltraParametros(String.Format("ConsecId = {0}", e.Row.DBCampo("Consec"))).Rows.Count
                 'e.Row.FCTextBox("TbCantidadF").Text = Contador.ToString
 
-                If AplicaSerie Then
-                    e.Row.FCLinkButton("BtnSeriePaquete").Visible = True
+                'If AplicaSerie Then
+                e.Row.FCLinkButton("BtnSeriePaquete").Visible = True
                     e.Row.FCLinkButton("BtnSeriePaquete").Attributes.Add("data-toggle", "tooltip")
-                End If
+                'End If
 
             Else
                 e.Row.FCButton("BtnSerie").Visible = False