|
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 |
- |
|
|