diff --git a/Inventarios/AjustesSeccionAlmacen.aspx b/Inventarios/AjustesSeccionAlmacen.aspx index 3e8855dea..de7251360 100644 --- a/Inventarios/AjustesSeccionAlmacen.aspx +++ b/Inventarios/AjustesSeccionAlmacen.aspx @@ -58,7 +58,19 @@
-
+
+ +
+ +
+ +
+ +
+ +
+ +
@@ -84,23 +96,23 @@ - + - + - + - +
@@ -114,7 +126,7 @@ - + diff --git a/Inventarios/AjustesSeccionAlmacen.aspx.vb b/Inventarios/AjustesSeccionAlmacen.aspx.vb index 686949acd..d9806259f 100644 --- a/Inventarios/AjustesSeccionAlmacen.aspx.vb +++ b/Inventarios/AjustesSeccionAlmacen.aspx.vb @@ -533,4 +533,21 @@ Partial Class Inventarios_AjustesSeccionAlmacen ' row.FCTextBox("TxtCantidad").Text = ExistenciaBackup 'End If End Sub + + Protected Sub ChkMostrarColumnas(sender As Object, e As EventArgs) + 'Mostrar Lote + GvD.Columns(7).Visible = ChkMostrarLote.Checked + GvD.Columns(8).Visible = ChkMostrarLote.Checked + + 'Mostrar Caducidad + GvD.Columns(9).Visible = ChkMostrarFecha.Checked + GvD.Columns(10).Visible = ChkMostrarFecha.Checked + + 'Mostrar Sección + GvD.Columns(11).Visible = ChkMostrarSeccion.Checked + GvD.Columns(12).Visible = ChkMostrarSeccion.Checked + + UppD.Update() + End Sub + End Class \ No newline at end of file