Lines 250-255
sub AddBiblio {
Link Here
|
250 |
my $dbh = C4::Context->dbh; |
250 |
my $dbh = C4::Context->dbh; |
251 |
|
251 |
|
252 |
# transform the data into koha-table style data |
252 |
# transform the data into koha-table style data |
|
|
253 |
SetUTF8Flag($record); |
253 |
my $olddata = TransformMarcToKoha( $dbh, $record, $frameworkcode ); |
254 |
my $olddata = TransformMarcToKoha( $dbh, $record, $frameworkcode ); |
254 |
( $biblionumber, $error ) = _koha_add_biblio( $dbh, $olddata, $frameworkcode ); |
255 |
( $biblionumber, $error ) = _koha_add_biblio( $dbh, $olddata, $frameworkcode ); |
255 |
$olddata->{'biblionumber'} = $biblionumber; |
256 |
$olddata->{'biblionumber'} = $biblionumber; |
Lines 294-299
sub ModBiblio {
Link Here
|
294 |
logaction( "CATALOGUING", "MODIFY", $biblionumber, "BEFORE=>" . $newrecord->as_formatted ); |
295 |
logaction( "CATALOGUING", "MODIFY", $biblionumber, "BEFORE=>" . $newrecord->as_formatted ); |
295 |
} |
296 |
} |
296 |
|
297 |
|
|
|
298 |
SetUTF8Flag($record); |
297 |
my $dbh = C4::Context->dbh; |
299 |
my $dbh = C4::Context->dbh; |
298 |
|
300 |
|
299 |
$frameworkcode = "" unless $frameworkcode; |
301 |
$frameworkcode = "" unless $frameworkcode; |
300 |
- |
|
|