Lines 24-29
use Carp;
Link Here
|
24 |
use DateTime; |
24 |
use DateTime; |
25 |
use Try::Tiny; |
25 |
use Try::Tiny; |
26 |
|
26 |
|
|
|
27 |
use C4::Circulation qw(MarkIssueReturned); |
27 |
use Koha::Checkouts::ReturnClaims; |
28 |
use Koha::Checkouts::ReturnClaims; |
28 |
use Koha::Database; |
29 |
use Koha::Database; |
29 |
use Koha::DateUtils; |
30 |
use Koha::DateUtils; |
Lines 145-151
sub claim_returned {
Link Here
|
145 |
$ClaimReturnedChargeFee eq 'charge' ? 1 |
146 |
$ClaimReturnedChargeFee eq 'charge' ? 1 |
146 |
: $ClaimReturnedChargeFee eq 'no_charge' ? 0 |
147 |
: $ClaimReturnedChargeFee eq 'no_charge' ? 0 |
147 |
: $charge_lost_fee; # $ClaimReturnedChargeFee eq 'ask' |
148 |
: $charge_lost_fee; # $ClaimReturnedChargeFee eq 'ask' |
148 |
C4::Circulation::LostItem( $self->itemnumber, 'claim_returned' ) if $charge_lost_fee; |
149 |
|
|
|
150 |
if ( $charge_lost_fee ) { |
151 |
C4::Circulation::LostItem( $self->itemnumber, 'claim_returned' ); |
152 |
} |
153 |
elsif ( C4::Context->preference( 'MarkLostItemsAsReturned' ) =~ m/claim_returned/ ) { |
154 |
C4::Circulation::MarkIssueReturned( $self->borrowernumber, $self->itemnumber, undef, $self->patron->privacy ); |
155 |
} |
149 |
|
156 |
|
150 |
return $claim; |
157 |
return $claim; |
151 |
} |
158 |
} |
152 |
- |
|
|