@@ -, +, @@ --- Koha/Item.pm | 19 ++++++++++++++++++- 1 file changed, 18 insertions(+), 1 deletion(-) --- a/Koha/Item.pm +++ a/Koha/Item.pm @@ -762,12 +762,29 @@ sub renewal_branchcode { return $branchcode; } +=head3 set_found + + my $lost_item_refunded; + if ( $item->itemlost ) { + $lost_item_refunded = $item->set_found; + } + +Function to set a previously lost item to found. + +The action will update the item details and trigger +any refunds that may result from the items return. + +Returns a boolean denoting whether the action triggered +a refund or not. + +=cut + sub set_found { my ($self, $params) = @_; my $holdingbranch = $params->{holdingbranch} || $self->holdingbranch; - ## If item was lost, it has now been found, reverse any list item charges if necessary. + ## If item was lost, it has now been found, reverse any lost item charges if necessary. my $refund = 1; my $no_refund_after_days = C4::Context->preference('NoRefundOnLostReturnedItemsAge'); --