Lines 121-129
if($op eq 'delete_confirm'){
Link Here
|
121 |
if($query->param('delitems') eq "Yes"){ |
121 |
if($query->param('delitems') eq "Yes"){ |
122 |
foreach my $serialid (@serialsid){ |
122 |
foreach my $serialid (@serialsid){ |
123 |
my @itemnumbers = Koha::Serial::Items->search({serialid => $serialid})->get_column('itemnumber'); |
123 |
my @itemnumbers = Koha::Serial::Items->search({serialid => $serialid})->get_column('itemnumber'); |
124 |
foreach my $itemnumber (@itemnumbers){ |
124 |
for my $itemnumber (@itemnumbers) { |
125 |
my $delcheck = C4::Items::DelItemCheck($biblionumber, $itemnumber); |
125 |
my $items = Koha::Items->search({ itemnumber => $itemnumber }); |
126 |
$template->param(error_delitem => 1) if $delcheck != 1; |
126 |
while ( my $item = $items->next ) { |
|
|
127 |
my $deleted_item = eval { $item->safe_delete }; |
128 |
$template->param(error_delitem => 1) |
129 |
if !ref($deleted_item) or $@; |
130 |
} |
127 |
} |
131 |
} |
128 |
} |
132 |
} |
129 |
} |
133 |
} |
130 |
- |
|
|