|
Lines 34-39
BEGIN {
Link Here
|
| 34 |
eval { require "$FindBin::Bin/../kohalib.pl" }; |
34 |
eval { require "$FindBin::Bin/../kohalib.pl" }; |
| 35 |
} |
35 |
} |
| 36 |
|
36 |
|
|
|
37 |
use C4::Biblio; |
| 37 |
use C4::Context; |
38 |
use C4::Context; |
| 38 |
use C4::Search; |
39 |
use C4::Search; |
| 39 |
use C4::Search::History; |
40 |
use C4::Search::History; |
|
Lines 531-536
sub FixCorruptedData {
Link Here
|
| 531 |
$dbh->do( q|UPDATE tmp_holdsqueue SET biblionumber = ? WHERE biblionumber = ?|, undef, $max, $old_id ); |
532 |
$dbh->do( q|UPDATE tmp_holdsqueue SET biblionumber = ? WHERE biblionumber = ?|, undef, $max, $old_id ); |
| 532 |
$dbh->do( q|UPDATE suggestions SET biblionumber = ? WHERE biblionumber = ?|, undef, $max, $old_id ); |
533 |
$dbh->do( q|UPDATE suggestions SET biblionumber = ? WHERE biblionumber = ?|, undef, $max, $old_id ); |
| 533 |
$dbh->do( q|UPDATE linktracker SET biblionumber = ? WHERE biblionumber = ?|, undef, $max, $old_id ); |
534 |
$dbh->do( q|UPDATE linktracker SET biblionumber = ? WHERE biblionumber = ?|, undef, $max, $old_id ); |
|
|
535 |
# Delete old record from index |
| 536 |
C4::Biblio::ModZebra( $old_id, 'recordDelete', 'biblioserver' ); |
| 537 |
# Add/Update new record |
| 538 |
C4::Biblio::ModZebra( $max, 'specialUpdate', 'biblioserver' ); |
| 534 |
} elsif ( $table eq 'items' ) { |
539 |
} elsif ( $table eq 'items' ) { |
| 535 |
$dbh->do( q|UPDATE collections_tracking SET itemnumber = ? WHERE itemnumber = ?|, undef, $max, $old_id ); |
540 |
$dbh->do( q|UPDATE collections_tracking SET itemnumber = ? WHERE itemnumber = ?|, undef, $max, $old_id ); |
| 536 |
$dbh->do( q|UPDATE import_items SET itemnumber = ? WHERE itemnumber = ?|, undef, $max, $old_id ); |
541 |
$dbh->do( q|UPDATE import_items SET itemnumber = ? WHERE itemnumber = ?|, undef, $max, $old_id ); |
| 537 |
- |
|
|