Lines 611-616
sub DelItem {
Link Here
|
611 |
# If there is no biblionumber for the given itemnumber, there is nothing to delete |
611 |
# If there is no biblionumber for the given itemnumber, there is nothing to delete |
612 |
return 0 unless $biblionumber; |
612 |
return 0 unless $biblionumber; |
613 |
|
613 |
|
|
|
614 |
# Find the volume_item now, it will be deleted when the item is deleted |
615 |
my $volume_id; |
616 |
if ( C4::Context->preference('EnableVolumes') ) { |
617 |
my $volume_item = Koha::Biblio::Volume::Items->find({ itemnumber => $itemnumber }); |
618 |
$volume_id = $volume_item ? $volume_item->volume_id : undef; |
619 |
} |
620 |
|
614 |
# FIXME check the item has no current issues |
621 |
# FIXME check the item has no current issues |
615 |
my $deleted = _koha_delete_item( $itemnumber ); |
622 |
my $deleted = _koha_delete_item( $itemnumber ); |
616 |
|
623 |
|
Lines 618-623
sub DelItem {
Link Here
|
618 |
|
625 |
|
619 |
_after_item_action_hooks({ action => 'delete', item_id => $itemnumber }); |
626 |
_after_item_action_hooks({ action => 'delete', item_id => $itemnumber }); |
620 |
|
627 |
|
|
|
628 |
# If this item is the last item on a volume, delete the volume as well |
629 |
if ( $volume_id ) { |
630 |
my $volume = Koha::Biblio::Volumes->find( $volume_id ); |
631 |
my @volume_items = $volume->items(); |
632 |
$volume->delete unless @volume_items; |
633 |
} |
634 |
|
621 |
#search item field code |
635 |
#search item field code |
622 |
logaction("CATALOGUING", "DELETE", $itemnumber, "item") if C4::Context->preference("CataloguingLog"); |
636 |
logaction("CATALOGUING", "DELETE", $itemnumber, "item") if C4::Context->preference("CataloguingLog"); |
623 |
return $deleted; |
637 |
return $deleted; |
624 |
- |
|
|