From 06b73c20a317e6046532e919d8eb4cc45b0cb34d Mon Sep 17 00:00:00 2001 From: Nick Clemens Date: Tue, 10 Mar 2020 09:37:56 -0400 Subject: [PATCH] Bug 24839: Return hold info to transfer script and set borrowernumber To test: 1 - Place a hold on an item 2 - Go to Circulation->Transfers 3 - Attempt to transfer item to a branch it is not expected at 4 - No warning 5 - Apply patches 6 - Repeate 7 - You get a notice that there is a hold and must deal with the hold (or ignore) Signed-off-by: David Nind --- C4/Circulation.pm | 3 +-- circ/branchtransfers.pl | 1 + 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/C4/Circulation.pm b/C4/Circulation.pm index 8037101086..d506e72a14 100644 --- a/C4/Circulation.pm +++ b/C4/Circulation.pm @@ -354,8 +354,7 @@ sub transferbook { CheckReserves( $itemnumber ); if ( $resfound and not $ignoreRs ) { $resrec->{'ResFound'} = $resfound; - - # $messages->{'ResFound'} = $resrec; + $messages->{'ResFound'} = $resrec; $dotransfer = 1; } diff --git a/circ/branchtransfers.pl b/circ/branchtransfers.pl index a8637ceba8..ddca4f5e4d 100755 --- a/circ/branchtransfers.pl +++ b/circ/branchtransfers.pl @@ -185,6 +185,7 @@ my $biblionumber; if ($found) { my $res = $messages->{'ResFound'}; $itemnumber = $res->{'itemnumber'}; + $borrowernumber = $res->{'borrowernumber'}; if ( $res->{'ResFound'} eq "Waiting" ) { $waiting = 1; -- 2.11.0