diff --git a/Inventarios/Kardex.aspx b/Inventarios/Kardex.aspx index fa7ad4e6a..fc597ae2b 100644 --- a/Inventarios/Kardex.aspx +++ b/Inventarios/Kardex.aspx @@ -136,7 +136,7 @@ Caducidad de producto
  • - Existecias por capas + Existencias por capas
  • Ayuda @@ -646,6 +646,7 @@ + diff --git a/Inventarios/Kardex.aspx.vb b/Inventarios/Kardex.aspx.vb index de836aa38..201d4f049 100644 --- a/Inventarios/Kardex.aspx.vb +++ b/Inventarios/Kardex.aspx.vb @@ -586,8 +586,13 @@ Partial Class Inventarios_Kardex Dim FechaI As DateTime = If(TxtFechaI.Text <> "" AndAlso TxtFechaI.Text <> "__/__/____", TxtFechaI.Text.ToDateTime(), MinFecha) Dim FechaF As DateTime = If(TxtFechaF.Text <> "" AndAlso TxtFechaF.Text <> "__/__/____", TxtFechaF.Text.ToDateTime(), MaxFecha) + Dim almacenes = ddlAlmacen.GetSelectedValues() + If String.IsNullOrEmpty(almacenes) Then + almacenes = "-1" + End If + Using ObjInv As New ClsInventarios - If ObjInv.GetInvExistenciasCapas(ddlProducto2.SelectedValue.ToEntero(), FechaI, FechaF, UsuarioActual.CveEmpresa, ddlAlmacen.GetSelectedValues()) Then + If ObjInv.GetInvExistenciasCapas(ddlProducto2.SelectedValue.ToEntero(), FechaI, FechaF, UsuarioActual.CveEmpresa, almacenes) Then GvExistenciasCapas.DataSource = ObjInv.DtResultados End If End Using