@@ -, +, @@ Changed the die statment to a warn allowing the import to continue. --- misc/migration_tools/bulkmarcimport.pl | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) --- a/misc/migration_tools/bulkmarcimport.pl +++ a/misc/migration_tools/bulkmarcimport.pl @@ -269,7 +269,11 @@ RECORD: while ( ) { my $server = ( $authorities ? 'authorityserver' : 'biblioserver' ); $debug && warn $query; my ( $error, $results, $totalhits ) = C4::Search::SimpleSearch( $query, 0, 3, [$server] ); - die "unable to search the database for duplicates : $error" if ( defined $error ); + # changed to warn so able to continue with one broken record + if ( defined $error ) { + warn "unable to search the database for duplicates : $error"; + next; + } $debug && warn "$query $server : $totalhits"; if ( $results && scalar(@$results) == 1 ) { my $marcrecord = C4::Search::new_record_from_zebra( $server, $results->[0] ); --