From b0454b305bf5c5d36e237d0abe8108648fa6c04c Mon Sep 17 00:00:00 2001 From: Kyle M Hall Date: Wed, 24 Aug 2016 11:13:48 +0000 Subject: [PATCH] Bug 14736 - AllowRenewalIfOtherItemsAvailable slows circulation down in case of a record with many items and many holds If the AllowRenewalIfOtherItemsAvailable sys pref is set to allow, and a borrower has an item checked out that has many items {30+} AND many holds {70+) on it, loading the checkouts table for this borrower takes FOREVER to load. The load time takes forever, because of the factoring that happens to determine if an item is truly available for renewal. This patch swaps the use of GetMemberDetails for GetMember and reorders the subroutine calls to check each items' renewability from fastest to slowest. In a test case, the results of pre patch were: Start of loop: 2016-08-24T11:05:14 End of loop: 2016-08-24T11:05:29 Resulting in 15 seconds being spent in the loop Post patch results were: Start of loop: 2016-08-24T11:08:43 End of loop: 2016-08-24T11:08:48 Resulting in only 5 seconds being spent in the loop! Test Plan: 1) Apply this patch 2) Note there are no changes in functionality for the renewals column of the patron checkouts table. If you wish to go further and test the performance benefit: 1) Create a record with 50 items and 100 holds ( 50 waiting, 50 unfilled ) 2) Check out one of the waiting holds to a patron 3) Time the amount of time it takes for the checkouts table to load 4) Apply this patch 5) Repeat step 3, you should see an improvement in load time --- C4/Circulation.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/C4/Circulation.pm b/C4/Circulation.pm index 1304d11..7786eb1 100644 --- a/C4/Circulation.pm +++ b/C4/Circulation.pm @@ -2836,12 +2836,12 @@ sub CanBookBeRenewed { # by pushing all the elements onto an array and removing the duplicates. my @reservable; foreach my $b (@borrowernumbers) { - my ($borr) = C4::Members::GetMemberDetails($b); + my ($borr) = C4::Members::GetMember( borrowernumber => $b); foreach my $i (@itemnumbers) { my $item = GetItem($i); - if ( IsAvailableForItemLevelRequest( $item, $borr ) - && CanItemBeReserved( $b, $i ) - && !IsItemOnHoldAndFound($i) ) + if ( !IsItemOnHoldAndFound($i) + && IsAvailableForItemLevelRequest( $item, $borr ) + && CanItemBeReserved( $b, $i ) ) { push( @reservable, $i ); } -- 2.1.4