AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

--Visualizar OC en kardex

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2024-08-19 10:54:37 -07:00
parent 7593d87248
commit 0a68328bdc
2 changed files with 8 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
Inventarios/Kardex.aspx.vb
View File

@@ -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