|
Lines 4468-4474
sub LostItem {
Link Here
|
| 4468 |
borrowernumber => $borrowernumber, |
4468 |
borrowernumber => $borrowernumber, |
| 4469 |
} |
4469 |
} |
| 4470 |
)->next; |
4470 |
)->next; |
| 4471 |
$library_id = branch_for_fee_context( |
4471 |
$library_id = C4::Overdues::branch_for_fee_context( |
| 4472 |
fee_type => 'LOST', |
4472 |
fee_type => 'LOST', |
| 4473 |
patron => $patron, |
4473 |
patron => $patron, |
| 4474 |
item => $item_obj, |
4474 |
item => $item_obj, |
|
Lines 4476-4494
sub LostItem {
Link Here
|
| 4476 |
); |
4476 |
); |
| 4477 |
} |
4477 |
} |
| 4478 |
|
4478 |
|
| 4479 |
Koha::Account->new( { patron_id => $borrowernumber } )->add_debit( |
4479 |
my $amount = 0 + ( $issues->{replacementprice} // 0 ); |
| 4480 |
{ |
|
|
| 4481 |
amount => $issues->{'replacementprice'} + 0, |
| 4482 |
type => 'LOST', |
| 4483 |
description => $desc, |
| 4484 |
interface => $interface, |
| 4485 |
library_id => $library_id, |
| 4486 |
item_id => $itemnumber, |
| 4487 |
( $issues->{issue_id} ? ( issue_id => $issues->{issue_id} ) : () ), |
| 4488 |
} |
| 4489 |
); |
| 4490 |
} |
| 4491 |
|
4480 |
|
|
|
4481 |
if ( $amount > 0 ) { |
| 4482 |
Koha::Account->new( { patron_id => $borrowernumber } )->add_debit( |
| 4483 |
{ |
| 4484 |
amount => $amount, |
| 4485 |
type => 'LOST', |
| 4486 |
description => $desc, |
| 4487 |
interface => $interface, |
| 4488 |
library_id => $library_id, |
| 4489 |
item_id => $itemnumber, |
| 4490 |
( $issues->{issue_id} ? ( issue_id => $issues->{issue_id} ) : () ), |
| 4491 |
} |
| 4492 |
); |
| 4493 |
} |
| 4494 |
} |
| 4492 |
MarkIssueReturned( $borrowernumber, $itemnumber, undef, $patron->privacy, $params ) if $mark_returned; |
4495 |
MarkIssueReturned( $borrowernumber, $itemnumber, undef, $patron->privacy, $params ) if $mark_returned; |
| 4493 |
} |
4496 |
} |
| 4494 |
|
4497 |
|
| 4495 |
- |
|
|