Attachment #170631 for bug #35466

View | Details | Raw Unified | Return to bug 35466
Collapse All | Expand All




                    if ($@) {
                        warn "ERROR: Update authority $matched_record_id failed: $@\n";
                        printlog( { id => $matched_record_id, op => "update", status => "ERROR" } ) if ($logfile);
                        next RECORD;
                    } else {
                        printlog( { id => $authid, op => "update", status => "ok" } ) if ($logfile);
                    }

                if ($@) {
                    warn "ERROR: Insert authority $originalid failed: $@\n";
                    printlog( { id => $originalid, op => "insert", status => "ERROR" } ) if ($logfile);
                    next RECORD;
                } else {
                    printlog( { id => $authid, op => "insert", status => "ok" } ) if ($logfile);
                }

                printlog(
                    {
                        id     => $originalid, op => "insert",
                        status => "warning : authority not in database and option -insert not enabled, skipping..."
                    }
                ) if ($logfile);
            }

                    1    #@FIXME: Really always updated?
                );
            }
            push @search_engine_record_ids, $authid;
            push @search_engine_records,    $record;
        } else {
            my ( $biblioitemnumber, $itemnumbers_ref, $errors_ref, $record_id );

- 

Return to bug 35466

Lines 478-483 RECORD: foreach my $record ( @{$marc_records} ) { Link Here

(-)a/misc/migration_tools/bulkmarcimport.pl (-2 / +5 lines)
478	if ($@) {	478	if ($@) {
479	warn "ERROR: Update authority $matched_record_id failed: $@\n";	479	warn "ERROR: Update authority $matched_record_id failed: $@\n";
480	printlog( { id => $matched_record_id, op => "update", status => "ERROR" } ) if ($logfile);	480	printlog( { id => $matched_record_id, op => "update", status => "ERROR" } ) if ($logfile);
		481	next RECORD;
481	} else {	482	} else {
482	printlog( { id => $authid, op => "update", status => "ok" } ) if ($logfile);	483	printlog( { id => $authid, op => "update", status => "ok" } ) if ($logfile);
483	}	484	}
Lines 498-503 RECORD: foreach my $record ( @{$marc_records} ) { Link Here
498	if ($@) {	499	if ($@) {
499	warn "ERROR: Insert authority $originalid failed: $@\n";	500	warn "ERROR: Insert authority $originalid failed: $@\n";
500	printlog( { id => $originalid, op => "insert", status => "ERROR" } ) if ($logfile);	501	printlog( { id => $originalid, op => "insert", status => "ERROR" } ) if ($logfile);
		502	next RECORD;
501	} else {	503	} else {
502	printlog( { id => $authid, op => "insert", status => "ok" } ) if ($logfile);	504	printlog( { id => $authid, op => "insert", status => "ok" } ) if ($logfile);
503	}	505	}
Lines 506-512 RECORD: foreach my $record ( @{$marc_records} ) { Link Here
506	printlog(	508	printlog(
507	{	509	{
508	id => $originalid, op => "insert",	510	id => $originalid, op => "insert",
509	status => "warning : biblio not in database and option -insert not enabled, skipping..."	511	status => "warning : authority not in database and option -insert not enabled, skipping..."
510	}	512	}
511	) if ($logfile);	513	) if ($logfile);
512	}	514	}
Lines 518-523 RECORD: foreach my $record ( @{$marc_records} ) { Link Here
518	1 #@FIXME: Really always updated?	520	1 #@FIXME: Really always updated?
519	);	521	);
520	}	522	}
		523	push @search_engine_record_ids, $authid;
		524	push @search_engine_records, $record;
521	} else {	525	} else {
522	my ( $biblioitemnumber, $itemnumbers_ref, $errors_ref, $record_id );	526	my ( $biblioitemnumber, $itemnumbers_ref, $errors_ref, $record_id );
523		527
524	-