Lines 199-204
if ($op eq ""){
Link Here
|
199 |
SetImportRecordStatus( $biblio->{'import_record_id'}, 'imported' ); |
199 |
SetImportRecordStatus( $biblio->{'import_record_id'}, 'imported' ); |
200 |
} |
200 |
} |
201 |
|
201 |
|
|
|
202 |
my $dbh = C4::Context->dbh; |
203 |
$dbh->do( |
204 |
q|UPDATE import_biblios SET matched_biblionumber = ? WHERE import_record_id = ?|, |
205 |
undef, $biblionumber, $biblio->{import_record_id} |
206 |
); |
207 |
|
202 |
# Add items from MarcItemFieldsToOrder |
208 |
# Add items from MarcItemFieldsToOrder |
203 |
my @homebranches = $input->multi_param('homebranch_' . $biblio_count); |
209 |
my @homebranches = $input->multi_param('homebranch_' . $biblio_count); |
204 |
my $count = scalar @homebranches; |
210 |
my $count = scalar @homebranches; |