-- parametro de cveusuario para consultar, solo sus subproyectos
This commit is contained in:
@@ -115,7 +115,7 @@ Partial Class Inventarios_RepAnomalias
|
||||
GvGrupos.Columns(15).Visible = UsuarioActual.Procesos(201) 'costo
|
||||
End If
|
||||
|
||||
If Inventario.GetInventarioFisico(CveInventarioFisico, UsuarioActual.CveEmpresa, -1, -1) Then
|
||||
If Inventario.GetInventarioFisico(CveInventarioFisico, UsuarioActual.CveEmpresa, -1, -1, UsuarioActual.CveUsuario) Then
|
||||
lbTitulo.Text = Inventario.InventarioFisico
|
||||
lbObservaciones.Text = Inventario.Observaciones
|
||||
lbSubProyecto.Text = Inventario.SubProyectoInventario
|
||||
@@ -450,7 +450,7 @@ Partial Class Inventarios_RepAnomalias
|
||||
Dim dtS As DataTable = Nothing
|
||||
Dim dtF As DataTable = Nothing
|
||||
|
||||
If Inventario.GetInventarioFisico(CveInventarioFisico, UsuarioActual.CveEmpresa, -1, -1) Then
|
||||
If Inventario.GetInventarioFisico(CveInventarioFisico, UsuarioActual.CveEmpresa, -1, -1, UsuarioActual.CveUsuario) Then
|
||||
params.Add(New ReportParameter("NombreEmpresa", UsuarioActual.Empresa.Empresa))
|
||||
params.Add(New ReportParameter("Titulo", Inventario.InventarioFisico))
|
||||
params.Add(New ReportParameter("Observaciones", Inventario.Observaciones))
|
||||
|
||||
Reference in New Issue
Block a user