From 6a69b1e65301fa301aecce0424c515a58d838cd4 Mon Sep 17 00:00:00 2001
From: Jonathan Druart <jonathan.druart@biblibre.com>
Date: Thu, 16 Apr 2015 17:23:37 +0200
Subject: [PATCH] Bug 10706: Search reports by id

This patch adds the ability to search reports by their id.

Test plan:
1/ Go on the saved report list (reports/guided_reports.pl?phase=Use saved)
2/ Search for a report id (refer to the ID column in the table)
3/ The result should be consistent

That the filters are not kept, already existed.

Signed-off-by: Nick Clemens <nick@quecheelibrary.org>
Signed-off-by: Katrin Fischer <katrin.fischer@bsz-bw.de>
Signed-off-by: Tomas Cohen Arazi <tomascohen@gmail.com>
---
 C4/Reports/Guided.pm | 14 ++++++++------
 1 file changed, 8 insertions(+), 6 deletions(-)

diff --git a/C4/Reports/Guided.pm b/C4/Reports/Guided.pm
index 133b1fdbd0..1b27e9cd65 100644
--- a/C4/Reports/Guided.pm
+++ b/C4/Reports/Guided.pm
@@ -678,12 +678,14 @@ sub get_saved_reports {
             push @args, $author, $author;
         }
         if (my $keyword = $filter->{keyword}) {
-            $keyword = "%$keyword%";
-            push @cond, "report LIKE ? OR
-                         report_name LIKE ? OR
-                         notes LIKE ? OR
-                         savedsql LIKE ?";
-            push @args, $keyword, $keyword, $keyword, $keyword;
+            push @cond, q|
+                       report LIKE ?
+                    OR report_name LIKE ?
+                    OR notes LIKE ?
+                    OR savedsql LIKE ?
+                    OR s.id = ?
+            |;
+            push @args, "%$keyword%", "%$keyword%", "%$keyword%", "%$keyword%", $keyword;
         }
         if ($filter->{group}) {
             push @cond, "report_group = ?";
-- 
2.39.5