Lines 1306-1312
sub GetImportRecordMatches {
Link Here
|
1306 |
$sth->execute(); |
1306 |
$sth->execute(); |
1307 |
while (my $row = $sth->fetchrow_hashref) { |
1307 |
while (my $row = $sth->fetchrow_hashref) { |
1308 |
if ($row->{'record_type'} eq 'auth') { |
1308 |
if ($row->{'record_type'} eq 'auth') { |
1309 |
$row->{'authorized_heading'} = GetAuthorizedHeading( { authid => $row->{'candidate_match_id'} } ); |
1309 |
$row->{'authorized_heading'} = C4::AuthoritiesMarc::GetAuthorizedHeading( { authid => $row->{'candidate_match_id'} } ); |
1310 |
} |
1310 |
} |
1311 |
next if ($row->{'record_type'} eq 'biblio' && not $row->{'biblionumber'}); |
1311 |
next if ($row->{'record_type'} eq 'biblio' && not $row->{'biblionumber'}); |
1312 |
push @$results, $row; |
1312 |
push @$results, $row; |
Lines 1375-1381
sub _add_auth_fields {
Link Here
|
1375 |
if ($marc_record->field('001')) { |
1375 |
if ($marc_record->field('001')) { |
1376 |
$controlnumber = $marc_record->field('001')->data(); |
1376 |
$controlnumber = $marc_record->field('001')->data(); |
1377 |
} |
1377 |
} |
1378 |
my $authorized_heading = GetAuthorizedHeading({ record => $marc_record }); |
1378 |
my $authorized_heading = C4::AuthoritiesMarc::GetAuthorizedHeading({ record => $marc_record }); |
1379 |
my $dbh = C4::Context->dbh; |
1379 |
my $dbh = C4::Context->dbh; |
1380 |
my $sth = $dbh->prepare("INSERT INTO import_auths (import_record_id, control_number, authorized_heading) VALUES (?, ?, ?)"); |
1380 |
my $sth = $dbh->prepare("INSERT INTO import_auths (import_record_id, control_number, authorized_heading) VALUES (?, ?, ?)"); |
1381 |
$sth->execute($import_record_id, $controlnumber, $authorized_heading); |
1381 |
$sth->execute($import_record_id, $controlnumber, $authorized_heading); |
1382 |
- |
|
|