Attachment 154912 Details for Bug 34645 – Bug 34645: Add support for discount, sort1 and sort2 to MarcItemFieldsToOrder

[patch] Bug 34645: Add support for discount, sort1 and sort2 to MarcItemFieldsToOrder

Bug-34645-Add-support-for-discount-sort1-and-sort2.patch (text/plain), 2.96 KB, created by Kyle M Hall (khall) on 2023-08-29 17:42:46 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Kyle M Hall (khall)

Created: 2023-08-29 17:42:46 UTC

Size: 2.96 KB

patch

obsolete

>From 6f4fa9a61c25676329590ee306d75a0b07e463ee Mon Sep 17 00:00:00 2001
>From: Kyle M Hall <kyle@bywatersolutions.com>
>Date: Tue, 29 Aug 2023 13:35:53 -0400
>Subject: [PATCH] Bug 34645: Add support for discount, sort1 and sort2 to
> MarcItemFieldsToOrder
>
>MarcItemFieldsToOrder supersedes MarcFieldsToOrder, so the fields discount, sort1, and sort2 won't be populated if using the latter - We should add these fields in to allow the orders to be created correctly
>
>Test Plan:
>1) Set up MarcItemFields to order
>2) Map the new keys discount, sor1 and sort2 to fields in the order
>   record
>3) Import an order record into a basket
>4) Note those fields were imported!
>---
> acqui/addorderiso2709.pl | 8 +++++++-
> 1 file changed, 7 insertions(+), 1 deletion(-)
>
>diff --git a/acqui/addorderiso2709.pl b/acqui/addorderiso2709.pl
>index fb31a8bcee4..eb6f8024d53 100755
>--- a/acqui/addorderiso2709.pl
>+++ b/acqui/addorderiso2709.pl
>@@ -513,7 +513,7 @@ sub import_biblios_list {
>         # Items
>         my @itemlist = ();
>         my $all_items_quantity = 0;
>-        my $alliteminfos = get_infos_syspref_on_item('MarcItemFieldsToOrder', $marcrecord, ['homebranch', 'holdingbranch', 'itype', 'nonpublic_note', 'public_note', 'loc', 'ccode', 'notforloan', 'uri', 'copyno', 'price', 'replacementprice', 'itemcallnumber', 'quantity', 'budget_code']);
>+        my $alliteminfos = get_infos_syspref_on_item('MarcItemFieldsToOrder', $marcrecord, ['homebranch', 'holdingbranch', 'itype', 'nonpublic_note', 'public_note', 'loc', 'ccode', 'notforloan', 'uri', 'copyno', 'price', 'replacementprice', 'itemcallnumber', 'quantity', 'budget_code', 'discount', 'sort1', 'sort2']);
>         if ($alliteminfos != -1) {
>             foreach my $iteminfos (@$alliteminfos) {
>                 my $item_homebranch = $iteminfos->{homebranch};
>@@ -528,6 +528,9 @@ sub import_biblios_list {
>                 my $item_copyno = $iteminfos->{copyno};
>                 my $item_quantity = $iteminfos->{quantity} || 1;
>                 my $item_budget_code = $iteminfos->{budget_code};
>+                my $item_discount = $iteminfos->{discount};
>+                my $item_sort1 = $iteminfos->{sort1};
>+                my $item_sort2 = $iteminfos->{sort2};
>                 my $item_budget_id;
>                 if ( $iteminfos->{budget_code} ) {
>                     my $item_budget = GetBudgetByCode( $iteminfos->{budget_code} );
>@@ -556,6 +559,9 @@ sub import_biblios_list {
>                         'copyno' => $item_copyno,
>                         'quantity' => $item_quantity,
>                         'budget_id' => $item_budget_id || $budget_id,
>+                        'discount' => $item_discount || $discount,
>+                        'sort1' => $item_sort1 || $sort1,
>+                        'sort2' => $item_sort2 || $sort2,
>                         'itemprice' => $item_price || $price,
>                         'replacementprice' => $item_replacement_price || $replacementprice,
>                         'itemcallnumber' => $item_callnumber,
>-- 
>2.30.2

Actions: View | Diff | Splinter Review

Attachments on bug 34645: 154912 | 155338 | 155564 | 155852 | 156156 | 156194 | 156195 | 156211 | 156212