From b1a8cc77aa8bd35a8497be9386931ee7fc080ecd 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 --- acqui/addorderiso2709.pl | 2 ++ 1 file changed, 2 insertions(+) diff --git a/acqui/addorderiso2709.pl b/acqui/addorderiso2709.pl index e79a0ae447..68fd5caa22 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.30.2