X-Git-Url: http://git.equinoxoli.org/?p=migration-tools.git;a=blobdiff_plain;f=mig-bin%2Fmig-loadbibs;h=119a1ec3445e56fe05f05153a814b14438027412;hp=8c49a7631d2a312df8637d936f992d6496456092;hb=5cdb58b1351a3f490a1ec21de7e893b52be945a8;hpb=46bd95616923cd2de0b1ed6b7a0fd8ffd0b103e2

diff --git a/mig-bin/mig-loadbibs b/mig-bin/mig-loadbibs
index 8c49a76..119a1ec 100755
--- a/mig-bin/mig-loadbibs
+++ b/mig-bin/mig-loadbibs
@@ -126,7 +126,9 @@ if ($file_is_xml) {
 } 
 $batch->strict_off();
 
-while ( my $record = $batch->next() ) {
+my $record;
+#while ( my $record = $batch->next() ) {
+while ( eval {$record = $batch->next()} or do { if (!$record and !$@) { last; } else { next; }} ) {
 	my $xml = $record->as_xml_record();
     $xml = marc8_to_utf8($xml);
 	$i++;
@@ -137,7 +139,7 @@ while ( my $record = $batch->next() ) {
 	if (@warnings) { $warning_string = "'" . join(':',@warnings) . "'"; } else { $warning_string = "'none'"; }
 	my $sql = "INSERT INTO $MIGSCHEMA.$stage_table (marc,x_source,x_warnings) VALUES ($xml,'$source',$warning_string);";
     my $sth = $dbh->prepare($sql);
-    $sth->execute();
+    eval { $sth->execute() };
 	report_progress("Records staged", $i) if 0 != $i % 100;
 }