Lines 1268-1274
sub GetMarcBiblio {
Link Here
|
1268 |
} |
1268 |
} |
1269 |
|
1269 |
|
1270 |
my $dbh = C4::Context->dbh; |
1270 |
my $dbh = C4::Context->dbh; |
1271 |
my $sth = $dbh->prepare("SELECT marcxml FROM biblioitems WHERE biblionumber=? "); |
1271 |
my $sth = $dbh->prepare("SELECT * FROM biblioitems WHERE biblionumber=? "); |
1272 |
$sth->execute($biblionumber); |
1272 |
$sth->execute($biblionumber); |
1273 |
my $row = $sth->fetchrow_hashref; |
1273 |
my $row = $sth->fetchrow_hashref; |
1274 |
my $marcxml = StripNonXmlChars( $row->{'marcxml'} ); |
1274 |
my $marcxml = StripNonXmlChars( $row->{'marcxml'} ); |
Lines 1280-1287
sub GetMarcBiblio {
Link Here
|
1280 |
if ($@) { warn " problem with :$biblionumber : $@ \n$marcxml"; } |
1280 |
if ($@) { warn " problem with :$biblionumber : $@ \n$marcxml"; } |
1281 |
return unless $record; |
1281 |
return unless $record; |
1282 |
|
1282 |
|
1283 |
C4::Biblio::_koha_marc_update_bib_ids($record, '', $biblionumber, $biblionumber); |
1283 |
C4::Biblio::_koha_marc_update_bib_ids($record, '', $biblionumber, $row->{biblioitemnumber}); |
1284 |
C4::Biblio::EmbedItemsInMarcBiblio($record, $biblionumber) if ($embeditems); |
1284 |
C4::Biblio::EmbedItemsInMarcBiblio($record, $biblionumber) if ($embeditems); |
1285 |
|
1285 |
|
1286 |
return $record; |
1286 |
return $record; |
1287 |
} else { |
1287 |
} else { |
1288 |
- |
|
|