From 31adf4ef83595c83f16ea46826ea05cfe5c07a13 Mon Sep 17 00:00:00 2001 From: Mason James Date: Tue, 10 Feb 2009 14:48:26 +1300 Subject: [PATCH] patch for feature 2952 - v3 Signed-off-by: Galen Charlton --- C4/ImportBatch.pm | 2 +- .../en/modules/tools/manage-marc-import.tmpl | 4 ++++ tools/manage-marc-import.pl | 21 ++++++++++--------- 3 files changed, 16 insertions(+), 11 deletions(-) diff --git a/C4/ImportBatch.pm b/C4/ImportBatch.pm index 03ef8197fa..fd6dcabbe2 100644 --- a/C4/ImportBatch.pm +++ b/C4/ImportBatch.pm @@ -813,7 +813,7 @@ sub GetImportBibliosRange { my $dbh = C4::Context->dbh; my $sth = $dbh->prepare_cached("SELECT title, author, isbn, issn, import_record_id, record_sequence, - status, overlay_status + matched_biblionumber, status, overlay_status FROM import_records JOIN import_biblios USING (import_record_id) WHERE import_batch_id = ? diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/tools/manage-marc-import.tmpl b/koha-tmpl/intranet-tmpl/prog/en/modules/tools/manage-marc-import.tmpl index 115592ae1c..3280c7d35d 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/modules/tools/manage-marc-import.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/modules/tools/manage-marc-import.tmpl @@ -242,6 +242,8 @@ Page Citation Status Match? + Bib + @@ -249,6 +251,8 @@ Page + ++ diff --git a/tools/manage-marc-import.pl b/tools/manage-marc-import.pl index 97ac568892..7acf058a5f 100755 --- a/tools/manage-marc-import.pl +++ b/tools/manage-marc-import.pl @@ -324,16 +324,17 @@ sub import_biblios_list { $citation .= $biblio->{'issn'} if $biblio->{'issn'}; $citation .= ")" if $biblio->{'issn'} or $biblio->{'isbn'}; my $match = GetImportRecordMatches($biblio->{'import_record_id'}, 1); - push @list, { - import_record_id => $biblio->{'import_record_id'}, - citation => $citation, - status => $biblio->{'status'}, - record_sequence => $biblio->{'record_sequence'}, - overlay_status => $biblio->{'overlay_status'}, - match_biblionumber => $#$match > -1 ? $match->[0]->{'biblionumber'} : 0, - match_citation => $#$match > -1 ? $match->[0]->{'title'} . ' ' . $match->[0]->{'author'} : '', - match_score => $#$match > -1 ? $match->[0]->{'score'} : 0, - }; + push @list, + { import_record_id => $biblio->{'import_record_id'}, + final_match_biblionumber => $biblio->{'matched_biblionumber'}, + citation => $citation, + status => $biblio->{'status'}, + record_sequence => $biblio->{'record_sequence'}, + overlay_status => $biblio->{'overlay_status'}, + match_biblionumber => $#$match > -1 ? $match->[0]->{'biblionumber'} : 0, + match_citation => $#$match > -1 ? $match->[0]->{'title'} . ' ' . $match->[0]->{'author'} : '', + match_score => $#$match > -1 ? $match->[0]->{'score'} : 0, + }; } my $num_biblios = $batch->{'num_biblios'}; $template->param(biblio_list => \@list); -- 2.39.5