|
Lines 413-418
sub last_checkout {
Link Here
|
| 413 |
return Koha::Old::Checkout->_new_from_dbic( $checkout_rs ); |
413 |
return Koha::Old::Checkout->_new_from_dbic( $checkout_rs ); |
| 414 |
} |
414 |
} |
| 415 |
|
415 |
|
|
|
416 |
=head3 loss_checkout |
| 417 |
|
| 418 |
my $loss_checkout = $item->loss_checkout; |
| 419 |
|
| 420 |
Return the old checkout from which this item was marked as lost |
| 421 |
|
| 422 |
=cut |
| 423 |
|
| 424 |
sub loss_checkout { |
| 425 |
my ( $self ) = @_; |
| 426 |
my $items_lost_issue_rs = $self->_result->items_lost_issue; |
| 427 |
return unless $items_lost_issue_rs; |
| 428 |
my $issue_rs = $items_lost_issue_rs->issue; |
| 429 |
return unless $issue_rs; |
| 430 |
return Koha::Old::Checkout->_new_from_dbic( $issue_rs ); |
| 431 |
} |
| 432 |
|
| 416 |
=head3 holds |
433 |
=head3 holds |
| 417 |
|
434 |
|
| 418 |
my $holds = $item->holds(); |
435 |
my $holds = $item->holds(); |
|
Lines 1051-1057
Internal function, not exported, called only by Koha::Item->store.
Link Here
|
| 1051 |
sub _set_found_trigger { |
1068 |
sub _set_found_trigger { |
| 1052 |
my ( $self, $pre_mod_item ) = @_; |
1069 |
my ( $self, $pre_mod_item ) = @_; |
| 1053 |
|
1070 |
|
| 1054 |
## If item was lost, it has now been found, reverse any list item charges if necessary. |
1071 |
# If item was lost, it has now been found |
|
|
1072 |
$self->_result->items_lost_issue->delete; |
| 1073 |
|
| 1074 |
# Reverse any lost item charges if necessary. |
| 1055 |
my $no_refund_after_days = |
1075 |
my $no_refund_after_days = |
| 1056 |
C4::Context->preference('NoRefundOnLostReturnedItemsAge'); |
1076 |
C4::Context->preference('NoRefundOnLostReturnedItemsAge'); |
| 1057 |
if ($no_refund_after_days) { |
1077 |
if ($no_refund_after_days) { |