gitea
/
Koha-clms
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Bug 24469: Record biblionumber in import_biblio when adding to basket via file 

The column import_biblios.matched_biblionumber was not populated when an
order is created from a staged file.

Test plan:
A/ Create a new order from a stage file.
Use the "Save" button at the bottom of the "Add orders from" page
Then note the matched_biblionumber value. It should be populated correctly

B/ Import again the same record, this time you will have to use the "Add
order" link in the list of order (ie. not the "Save" button)
Note the matched_biblionumber value. It should be populated correctly

Signed-off-by: Andrew Fuerste-Henry <andrew@bywatersolutions.com>

Signed-off-by: Sarah Daviau <sdaviau@arlingtonva.us>

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
This commit is contained in:
Jonathan Druart 2020-02-12 16:22:02 +01:00
parent 740331c39e
commit 7bc460e005
2 changed files with 12 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
acqui/addorderiso2709.pl
View File

@ -199,6 +199,12 @@ if ($op eq ""){
SetImportRecordStatus( $biblio->{'import_record_id'}, 'imported' );
}
my $dbh = C4::Context->dbh;
$dbh->do(
q|UPDATE import_biblios SET matched_biblionumber = ? WHERE import_record_id = ?|,
undef, $biblionumber, $biblio->{import_record_id}
);
# Add items from MarcItemFieldsToOrder
my @homebranches = $input->multi_param('homebranch_' . $biblio_count);
my $count = scalar @homebranches;

6
acqui/neworderempty.pl
View File

@ -179,6 +179,12 @@ if ( $ordernumber eq '' and defined $params->{'breedingid'}){
# get the price if there is one.
$listprice = GetMarcPrice($marcrecord, $marcflavour);
SetImportRecordStatus($params->{'breedingid'}, 'imported');
my $dbh = C4::Context->dbh;
$dbh->do(
q|UPDATE import_biblios SET matched_biblionumber = ? WHERE import_record_id = ?|,
undef, $biblionumber, $params->{breedingid}
);
}