From f8c6728d87e9c1d3c388393eec1b58ec835e249e Mon Sep 17 00:00:00 2001
From: Henri-Damien LAURENT <henridamien@koha-fr.org>
Date: Thu, 11 Oct 2007 15:52:17 -0500
Subject: [PATCH] Filtering cancelled orders on History Search.

Signed-off-by: Chris Cormack <crc@liblime.com>
Signed-off-by: Joshua Ferraro <jmf@liblime.com>
---
 C4/Acquisition.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/C4/Acquisition.pm b/C4/Acquisition.pm
index 743a8a076c..22928db5fe 100644
--- a/C4/Acquisition.pm
+++ b/C4/Acquisition.pm
@@ -1096,6 +1096,7 @@ sub GetHistory {
 
         $query .= " AND creationdate<" . $dbh->quote($to_placed_on)
           if $to_placed_on;
+        $query .= " AND (datecancellationprinted is NULL or datecancellationprinted='0000-00-00')";
 
         if ( C4::Context->preference("IndependantBranches") ) {
             my $userenv = C4::Context->userenv;
-- 
2.39.5