From 881d89fa35ba8adeba1a7c73dddcbb8eec657c57 Mon Sep 17 00:00:00 2001 From: Lucas Gass Date: Thu, 29 Feb 2024 20:48:25 +0000 Subject: [PATCH] Bug 35950: Move AddReturn call into circulation.pl --- C4/Circulation.pm | 11 +---------- circ/circulation.pl | 16 +++++++++++++++- 2 files changed, 16 insertions(+), 11 deletions(-) diff --git a/C4/Circulation.pm b/C4/Circulation.pm index 08de40f85e..2b50847a48 100644 --- a/C4/Circulation.pm +++ b/C4/Circulation.pm @@ -835,18 +835,9 @@ sub CanBookBeIssued { } ); my $block_lost_return = C4::Context->preference("BlockReturnOfLostItems") ? 1 : 0; - my ( $stats_return, $stats_messages, $stats_iteminformation, $stats_borrower ) = - AddReturn( $item_object->barcode, C4::Context->userenv->{'branch'}, undef, undef, 1 ) if $item_object->onloan; ModDateLastSeen( $item_object->itemnumber, $block_lost_return ); # FIXME Move to Koha::Item return ( - { - STATS => 1, - CHECKEDIN => $stats_return, - MESSAGES => $stats_messages, - ITEM => $stats_iteminformation, - BORROWER => $stats_borrower, - }, - {} + { STATS => 1, }, {} ); } diff --git a/circ/circulation.pl b/circ/circulation.pl index 9296d9e642..a55179fb81 100755 --- a/circ/circulation.pl +++ b/circ/circulation.pl @@ -34,7 +34,7 @@ use Try::Tiny; use C4::Output qw( output_and_exit_if_error output_and_exit output_html_with_http_headers ); use C4::Auth qw( get_session get_template_and_user ); use C4::Koha; -use C4::Circulation qw( barcodedecode CanBookBeIssued AddIssue ); +use C4::Circulation qw( barcodedecode CanBookBeIssued AddIssue AddReturn ); use C4::Members; use C4::Biblio qw( TransformMarcToKoha ); use C4::Search qw( new_record_from_zebra ); @@ -354,6 +354,20 @@ if (@$barcodes) { $biblio = $item->biblio; } + if ( $issuingimpossible->{'STATS'} ) { + my ( $stats_return, $stats_messages, $stats_iteminformation, $stats_borrower ) = + AddReturn( $item->barcode, C4::Context->userenv->{'branch'}, undef, undef, 1 ) + if $item->onloan; + + $template->param( + STATS => 1, + CHECKEDIN => $stats_return, + MESSAGES => $stats_messages, + ITEM => $stats_iteminformation, + BORROWER => $stats_borrower, + ); + }; + # Fix for bug 7494: optional checkout-time fallback search for a book if ( $issuingimpossible->{'UNKNOWN_BARCODE'} -- 2.30.2