Attachment 56851 Details for Bug 15503 – Bug 15503 [Followup] - Add replacementprice and itemcallnumber

[patch] Bug 15503 [Followup] - Add replacementprice and itemcallnumber

Bug-15503-Followup---Add-replacementprice-and-item.patch (text/plain), 5.60 KB, created by Matthias Meusburger on 2016-10-26 09:45:31 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Matthias Meusburger

Created: 2016-10-26 09:45:31 UTC

Size: 5.60 KB

patch

obsolete

>From 355f2814453bd60fea61103b2effe8cabe0e6c80 Mon Sep 17 00:00:00 2001
>From: Matthias Meusburger <matthias.meusburger@biblibre.com>
>Date: Thu, 20 Oct 2016 11:47:27 +0200
>Subject: [PATCH] Bug 15503 [Followup] - Add replacementprice and
> itemcallnumber
>
>---
> acqui/addorderiso2709.pl                                     |   10 +++++++++-
> .../intranet-tmpl/prog/en/modules/acqui/addorderiso2709.tt   |    2 ++
> .../prog/en/modules/admin/preferences/acquisitions.pref      |    2 +-
> 3 files changed, 12 insertions(+), 2 deletions(-)
>
>diff --git a/acqui/addorderiso2709.pl b/acqui/addorderiso2709.pl
>index d645d4f..dcc89ef 100755
>--- a/acqui/addorderiso2709.pl
>+++ b/acqui/addorderiso2709.pl
>@@ -200,6 +200,8 @@ if ($op eq ""){
>         my @copynos = $input->multi_param('copyno_' . $biblio_count);
>         my @budget_codes = $input->multi_param('budget_code_' . $biblio_count);
>         my @itemprices = $input->multi_param('itemprice_' . $biblio_count);
>+        my @replacementprices = $input->multi_param('replacementprice_' . $biblio_count);
>+        my @itemcallnumbers = $input->multi_param('itemcallnumber_' . $biblio_count);
>         my $itemcreation = 0;
>         for (my $i = 0; $i < $count; $i++) {
>             $itemcreation = 1;
>@@ -214,6 +216,8 @@ if ($op eq ""){
>                 uri => $uris[$i],
>                 copynumber => $copynos[$i],
>                 price => $itemprices[$i],
>+                replacementprice => $replacementprices[$i],
>+                itemcallnumber => $itemcallnumbers[$i],
>             }, $biblionumber);
>         }
>         if ($itemcreation == 1) {
>@@ -495,7 +499,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', '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']);
>         if ($alliteminfos != -1) {
>             foreach my $iteminfos (@$alliteminfos) {
>                 my $item_homebranch = $iteminfos->{homebranch};
>@@ -511,6 +515,8 @@ sub import_biblios_list {
>                 my $item_quantity = $iteminfos->{quantity} || 1;
>                 my $item_budget_code = $iteminfos->{budget_code};
>                 my $item_price = $iteminfos->{price};
>+                my $item_replacement_price = $iteminfos->{replacementprice};
>+                my $item_callnumber = $iteminfos->{itemcallnumber};
> 
>                 for (my $i = 0; $i < $item_quantity; $i++) {
> 
>@@ -530,6 +536,8 @@ sub import_biblios_list {
>                         'quantity' => $item_quantity,
>                         'budget_code' => $item_budget_code || $budget_code,
>                         'itemprice' => $item_price || $price,
>+                        'replacementprice' => $item_replacement_price,
>+                        'itemcallnumber' => $item_callnumber,
>                     );
>                     $all_items_quantity++;
>                     push @itemlist, \%itemrecord;
>diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/acqui/addorderiso2709.tt b/koha-tmpl/intranet-tmpl/prog/en/modules/acqui/addorderiso2709.tt
>index 20565c2..39e54e6 100644
>--- a/koha-tmpl/intranet-tmpl/prog/en/modules/acqui/addorderiso2709.tt
>+++ b/koha-tmpl/intranet-tmpl/prog/en/modules/acqui/addorderiso2709.tt
>@@ -355,6 +355,8 @@
>                         </select>
>                         </li>
>                         <li><label for="price_item_[% item.item_id %]">price</label><input type="text" id="price_item_[% item.item_id %]" name="itemprice_[% item.biblio_count %]" value="[% item.itemprice %]"></li>
>+                        <li><label for="replacementprice_item_[% item.item_id %]">replacement price</label><input type="text" id="replacementprice_item_[% item.item_id %]" name="replacementprice_[% item.biblio_count %]" value="[% item.replacementprice %]"></li>
>+                        <li><label for="callnumber_item_[% item.item_id %]">callnumber</label><input type="text" id="callnumber_item_[% item.item_id %]" name="itemcallnumber_[% item.biblio_count %]" value="[% item.itemcallnumber %]"></li>
>                         </ol>
>                         </fieldset>
>                         [% END %]
>diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/acquisitions.pref b/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/acquisitions.pref
>index 8cb0373..4c32b9e 100644
>--- a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/acquisitions.pref
>+++ b/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/acquisitions.pref
>@@ -65,7 +65,7 @@ Acquisitions:
>             - Set the mapping values for new item records created from a MARC record in a staged file.
>             - pref: MarcItemFieldsToOrder
>               type: textarea
>-            - "You can use the following fields: homebranch, holdingbranch, itype, nonpublic_note, public_note, loc, ccode, notforloan, uri, copyno and price. Special fields: quantity and budget_code"
>+            - "You can use the following fields: homebranch, holdingbranch, itype, nonpublic_note, public_note, loc, ccode, notforloan, uri, copyno, price, replacementprice and itemcallnumber. Special fields: quantity and budget_code"
>             - "<br/>For example:<br/>holdingbranch: 975$b<br/>itype: 975$9|975$z"
>         -
>             - pref: ClaimsBccCopy
>-- 
>1.7.10.4

Actions: View | Diff | Splinter Review

Attachments on bug 15503: 53493 | 54480 | 54660 | 55057 | 55616 | 55617 | 55926 | 55927 | 55928 | 56851 | 56852 | 57123 | 57124 | 57125 | 57715 | 58103 | 58132 | 58164 | 58165 | 58166 | 58376 | 58377 | 59093 | 59097 | 59415 | 59416 | 59417 | 59418 | 59419 | 59420 | 59421 | 59515 | 60025 | 60026 | 60027 | 60028 | 60029 | 60030 | 60031 | 60032 | 60203 | 60204 | 60205 | 60206 | 60207 | 60208 | 60209 | 60210 | 60211