From 3873511edd21ff785ac49ba6b3805617ed3bc099 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 --- acqui/addorderiso2709.pl | 2 ++ 1 file changed, 2 insertions(+) diff --git a/acqui/addorderiso2709.pl b/acqui/addorderiso2709.pl index 5a751f0e5f3..1db085613d3 100755 --- a/acqui/addorderiso2709.pl +++ b/acqui/addorderiso2709.pl @@ -536,6 +536,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.30.2