|
Lines 644-656
sub BatchRevertItems {
Link Here
|
| 644 |
$sth->bind_param(1, $import_record_id); |
644 |
$sth->bind_param(1, $import_record_id); |
| 645 |
$sth->execute(); |
645 |
$sth->execute(); |
| 646 |
while (my $row = $sth->fetchrow_hashref()) { |
646 |
while (my $row = $sth->fetchrow_hashref()) { |
| 647 |
DelItem($dbh, $biblionumber, $row->{'itemnumber'}); |
647 |
my $error = DelItemCheck($dbh, $biblionumber, $row->{'itemnumber'}); |
| 648 |
my $updsth = $dbh->prepare("UPDATE import_items SET status = ? WHERE import_items_id = ?"); |
648 |
if ($error == 1){ |
| 649 |
$updsth->bind_param(1, 'reverted'); |
649 |
my $updsth = $dbh->prepare("UPDATE import_items SET status = ? WHERE import_items_id = ?"); |
| 650 |
$updsth->bind_param(2, $row->{'import_items_id'}); |
650 |
$updsth->bind_param(1, 'reverted'); |
| 651 |
$updsth->execute(); |
651 |
$updsth->bind_param(2, $row->{'import_items_id'}); |
| 652 |
$updsth->finish(); |
652 |
$updsth->execute(); |
| 653 |
$num_items_deleted++; |
653 |
$updsth->finish(); |
|
|
654 |
$num_items_deleted++; |
| 655 |
} |
| 656 |
else { |
| 657 |
next; |
| 658 |
} |
| 654 |
} |
659 |
} |
| 655 |
$sth->finish(); |
660 |
$sth->finish(); |
| 656 |
return $num_items_deleted; |
661 |
return $num_items_deleted; |
| 657 |
- |
|
|