From 0bce4e7b6d4a3377adca27467c405b368a61e850 Mon Sep 17 00:00:00 2001 From: Kyle M Hall Date: Wed, 27 May 2020 10:28:01 -0400 Subject: [PATCH] Bug 15985: Remove Koha::Old::Checkout::claim_returned --- Koha/Old/Checkout.pm | 50 -------------------------------------------- 1 file changed, 50 deletions(-) diff --git a/Koha/Old/Checkout.pm b/Koha/Old/Checkout.pm index cf6d9a9b22..b1f5c8f050 100644 --- a/Koha/Old/Checkout.pm +++ b/Koha/Old/Checkout.pm @@ -80,56 +80,6 @@ sub to_api_mapping { }; } -=head3 claim_returned - -my $return_claim = $checkout->claim_returned(); - -=cut - -sub claim_returned { - my ( $self, $params ) = @_; - - my $charge_lost_fee = $params->{charge_lost_fee}; - - try { - $self->_result->result_source->schema->txn_do( - sub { - my $claim = Koha::Checkouts::ReturnClaim->new( - { - issue_id => $self->id, - itemnumber => $self->itemnumber, - borrowernumber => $self->borrowernumber, - notes => $params->{notes}, - created_by => $params->{created_by}, - created_on => dt_from_string, - } - )->store(); - - my $ClaimReturnedLostValue = C4::Context->preference('ClaimReturnedLostValue'); - C4::Items::ModItem( { itemlost => $ClaimReturnedLostValue }, undef, $self->itemnumber ); - - my $ClaimReturnedChargeFee = C4::Context->preference('ClaimReturnedChargeFee'); - $charge_lost_fee = - $ClaimReturnedChargeFee eq 'charge' ? 1 - : $ClaimReturnedChargeFee eq 'no_charge' ? 0 - : $charge_lost_fee; # $ClaimReturnedChargeFee eq 'ask' - C4::Circulation::LostItem( $self->itemnumber, 'claim_returned' ) if $charge_lost_fee; - - return $claim; - } - ); - } - catch { - if ( $_->isa('Koha::Exceptions::Exception') ) { - $_->rethrow(); - } - else { - # ? - Koha::Exceptions::Exception->throw( "Unhandled exception" ); - } - }; -} - =head3 library my $library = $checkout->library; -- 2.24.1 (Apple Git-126)