From: erickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Thu, 12 Nov 2009 22:11:29 +0000 (+0000)
Subject: added flag to mark claims returned which tells the code to use the circ due date... 
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=27b4a16dddc98d0937432af06d78b88a5f932c02;p=evergreen%2Fbjwebb.git

added flag to mark claims returned which tells the code to use the circ due date as the claims returned date.  good for batch processing of claims return items

git-svn-id: svn://svn.open-ils.org/ILS/trunk@14887 dcc99617-32d9-48b4-a31d-7c20da2025e4
---

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
index df95ffd5a..163ce377b 100644
--- a/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
@@ -303,9 +303,6 @@ sub set_circ_claims_returned {
     my $barcode = $$args{barcode};
     my $backdate = $$args{backdate};
 
-    $logger->info("marking circ for item $barcode as claims returned".
-        (($backdate) ? " with backdate $backdate" : ''));
-
     my $copy = $e->search_asset_copy({barcode=>$barcode, deleted=>'f'})->[0] 
         or return $e->die_event;
 
@@ -313,6 +310,11 @@ sub set_circ_claims_returned {
         {checkin_time => undef, target_copy => $copy->id})->[0]
             or return $e->die_event;
 
+    $backdate = $circ->due_date if $$args{use_due_date};
+
+    $logger->info("marking circ for item $barcode as claims returned".
+        (($backdate) ? " with backdate $backdate" : ''));
+
     my $patron = $e->retrieve_actor_user($circ->usr);
     my $max_count = $U->ou_ancestor_setting_value(
         $circ->circ_lib, 'circ.max_patron_claim_return_count', $e);