From 649e1de1903f241d0fa0cf2ac6d15957a4c3ae46 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 --- acqui/addorderiso2709.pl | 2 ++ 1 file changed, 2 insertions(+) diff --git a/acqui/addorderiso2709.pl b/acqui/addorderiso2709.pl index f77543bfff..e0f9a4753e 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