|
Lines 691-707
sub add {
Link Here
|
| 691 |
); |
691 |
); |
| 692 |
} |
692 |
} |
| 693 |
|
693 |
|
| 694 |
my ( $duplicatebiblionumber, $duplicatetitle ); |
|
|
| 695 |
( $duplicatebiblionumber, $duplicatetitle ) = FindDuplicate($record); |
| 696 |
|
| 697 |
my $confirm_not_duplicate = $headers->header('x-confirm-not-duplicate'); |
694 |
my $confirm_not_duplicate = $headers->header('x-confirm-not-duplicate'); |
| 698 |
|
695 |
|
| 699 |
return $c->render( |
696 |
if ( !$confirm_not_duplicate ) { |
| 700 |
status => 400, |
697 |
my ( $duplicatebiblionumber, $duplicatetitle ) = FindDuplicate($record); |
| 701 |
openapi => { |
698 |
|
| 702 |
error => "Duplicate biblio $duplicatebiblionumber", |
699 |
return $c->render( |
| 703 |
} |
700 |
status => 400, |
| 704 |
) unless !$duplicatebiblionumber || $confirm_not_duplicate; |
701 |
openapi => { |
|
|
702 |
error => "Duplicate biblio $duplicatebiblionumber", |
| 703 |
} |
| 704 |
) if $duplicatebiblionumber; |
| 705 |
} |
| 705 |
|
706 |
|
| 706 |
my ($biblio_id) = C4::Biblio::AddBiblio( $record, $frameworkcode, { record_source_id => $record_source_id } ); |
707 |
my ($biblio_id) = C4::Biblio::AddBiblio( $record, $frameworkcode, { record_source_id => $record_source_id } ); |
| 707 |
|
708 |
|
| 708 |
- |
|
|