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 |
- |
|
|