From a45dc1d031f4be380f0aeae3db3d4b231fa4ddab Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Tue, 19 Nov 2024 16:28:54 -0700
Subject: [PATCH] -- BDH- funcionalidad para encargados de almacen

---
 Inventarios/RepAnomalias.aspx.vb | 27 ++++++++++++++++++++-------
 1 file changed, 20 insertions(+), 7 deletions(-)

diff --git a/Inventarios/RepAnomalias.aspx.vb b/Inventarios/RepAnomalias.aspx.vb
index 3d3765a79..d49077465 100644
--- a/Inventarios/RepAnomalias.aspx.vb
+++ b/Inventarios/RepAnomalias.aspx.vb
@@ -449,8 +449,21 @@ Partial Class Inventarios_RepAnomalias
         Dim params As New List(Of ReportParameter)
         Dim lrds As New List(Of ReportDataSource)
         Dim Inventario As New ClsInventarios
-
-
+        Dim Firma1 As String = ""
+        Dim Firma2 As String = ""
+
+        If UsuarioActual.Empresa.Funcionalidad(208) <> "" Then
+            Dim temp As String = UsuarioActual.Empresa.Funcionalidad(208)
+            Dim arr As String() = temp.Split(","c)
+            For Each ar As String In arr
+                If ar.Contains(lbSubProyecto.Text) Then
+                    Dim temp2 As String = ar.Split(":"c)(1)
+                    Firma1 = temp2.Split("|"c)(0)
+                    Firma2 = temp2.Split("|"c)(1)
+                End If
+            Next
+        End If
+
         Dim dtS As DataTable = Nothing
         Dim dtF As DataTable = Nothing
 
@@ -464,6 +477,8 @@ Partial Class Inventarios_RepAnomalias
             params.Add(New ReportParameter("FechaFin", Inventario.FechaF))
             params.Add(New ReportParameter("UsuarioImprimio", UsuarioActual.Nombre))
             params.Add(New ReportParameter("FechaImpresion", NowADS().ToDateTime.ToString))
+            params.Add(New ReportParameter("Firma1", Firma1))
+            params.Add(New ReportParameter("Firma2", Firma2))
 
             params.Add(New ReportParameter("LogoPath", If(Imagen.Exists, $"file://{Imagen.FullName}", "")))
 
@@ -1066,11 +1081,9 @@ Partial Class Inventarios_RepAnomalias
                         End If
                         contadorS += 1
                     Next
-                End If
-
-
-
-
+                End If
+
+
                 contadorF += 1
 
             Next