hold targeter reify
authorBill Erickson <berickxx@gmail.com>
Fri, 17 Jun 2016 15:16:22 +0000 (11:16 -0400)
committerBill Erickson <berickxx@gmail.com>
Fri, 17 Jun 2016 15:16:49 +0000 (11:16 -0400)
Signed-off-by: Bill Erickson <berickxx@gmail.com>
Open-ILS/src/perlmods/lib/OpenILS/Utils/HoldTargeter.pm

index d592593..ab9f8e3 100644 (file)
@@ -102,7 +102,7 @@ sub find_holds_to_target {
         [{class => 'ahr', field => 'request_time', direction => 'DESC'}]
         if $self->{newest_first};
 
-    my $holds = $self->editor->json_query($query);
+    my $holds = $self->editor->json_query($query, {substream => 1});
 
     return map {$_->{id}} @$holds;
 }
@@ -188,6 +188,7 @@ use strict;
 use warnings;
 use DateTime;
 use OpenSRF::AppSession;
+use OpenSRF::Utils qw/:datetime/;
 use OpenSRF::Utils::Logger qw(:logger);
 use OpenILS::Application::AppUtils;
 use OpenILS::Utils::CStoreEditor qw/:funcs/;
@@ -497,7 +498,7 @@ sub get_hold_copies {
         };
     }
 
-    my $copies = $e->json_query($query);
+    my $copies = $e->json_query($query, {substream => 1});
     $self->{eligible_copy_count} = scalar(@$copies);
 
     $logger->info("targeter: Hold ".$self->hold_id." has ".