From e154184b7a8af8ebaca1848284848775674db291 Mon Sep 17 00:00:00 2001 From: Nick Clemens Date: Thu, 25 Jan 2024 19:56:31 +0000 Subject: [PATCH] Bug 35913: Restore price fall back to MarcFieldsToOrder if not set by MarcItemFieldsToOrder To test: Setup -- Set systempreferences below MarcFieldsToOrder: price: 949$g quantity: 949$k budget_code: 949$l discount: 949$m sort1: 949$n sort2: 949$q MarcItemFieldsToOrder: homebranch: 949$a holdingbranch: 949$b itype: 949$y nonpublic_note: 949$x public_note: 949$z loc: 949$c ccode: 949$8 notforloan: 949$7 uri: 949$u copyno: 949$t price: 949$g replacementprice: 949$v itemcallnumber: 949$o quantity: 949$k budget_code: 949$l Stage the attached bib-303.marcxml file Add to basket from the staged file Select the biblio Note items have prices Cancel Remove 'price' mapping from MarcItemFieldsToOrder Apply patch Add to basket from file again Note item prices, and other fields, come through as expected Signed-off-by: Andrew Fuerste-Henry Signed-off-by: Victor Grousset/tuxayo Signed-off-by: Katrin Fischer (cherry picked from commit 649e1de1903f241d0fa0cf2ac6d15957a4c3ae46) Signed-off-by: Fridolin Somers --- acqui/addorderiso2709.pl | 2 ++ 1 file changed, 2 insertions(+) diff --git a/acqui/addorderiso2709.pl b/acqui/addorderiso2709.pl index e79a0ae447..cf9fb2f732 100755 --- a/acqui/addorderiso2709.pl +++ b/acqui/addorderiso2709.pl @@ -537,6 +537,8 @@ sub import_biblios_list { $iteminfos->{budget_id} = $item_budget->{budget_id} || $budget_id; } + $iteminfos->{price} ||= $price; # Fallback to order price if no item price was defined + # Clone the item data for the needed quantity # Add the incremented item id for each item in that quantity for (my $i = 0; $i < $quantity; $i++) { -- 2.39.5