Lines 3815-3826
sub ReturnLostItem{
Link Here
|
3815 |
|
3815 |
|
3816 |
=head2 LostItem |
3816 |
=head2 LostItem |
3817 |
|
3817 |
|
3818 |
LostItem( $itemnumber, $mark_lost_from, $force_mark_returned ); |
3818 |
LostItem( $itemnumber, $mark_lost_from, $force_mark_returned, [$params] ); |
|
|
3819 |
|
3820 |
The final optional parameter, C<$params>, expected to contain |
3821 |
'skip_record_index' key, which relayed down to Koha::Item/store, |
3822 |
there it prevents calling of ModZebra index_records, |
3823 |
which takes most of the time in batch adds/deletes: index_records better |
3824 |
to be called later in C<additem.pl> after the whole loop. |
3825 |
|
3826 |
$params: |
3827 |
skip_record_index => 1|0 |
3819 |
|
3828 |
|
3820 |
=cut |
3829 |
=cut |
3821 |
|
3830 |
|
3822 |
sub LostItem{ |
3831 |
sub LostItem{ |
3823 |
my ($itemnumber, $mark_lost_from, $force_mark_returned) = @_; |
3832 |
my ($itemnumber, $mark_lost_from, $force_mark_returned, $params) = @_; |
3824 |
|
3833 |
|
3825 |
unless ( $mark_lost_from ) { |
3834 |
unless ( $mark_lost_from ) { |
3826 |
# Temporary check to avoid regressions |
3835 |
# Temporary check to avoid regressions |
Lines 3866-3872
sub LostItem{
Link Here
|
3866 |
#warn " $issues->{'borrowernumber'} / $itemnumber "; |
3875 |
#warn " $issues->{'borrowernumber'} / $itemnumber "; |
3867 |
} |
3876 |
} |
3868 |
|
3877 |
|
3869 |
MarkIssueReturned($borrowernumber,$itemnumber,undef,$patron->privacy) if $mark_returned; |
3878 |
MarkIssueReturned($borrowernumber,$itemnumber,undef,$patron->privacy,$params) if $mark_returned; |
3870 |
} |
3879 |
} |
3871 |
|
3880 |
|
3872 |
# When an item is marked as lost, we should automatically cancel its outstanding transfers. |
3881 |
# When an item is marked as lost, we should automatically cancel its outstanding transfers. |
3873 |
- |
|
|