Bugzilla – Attachment 91901 Details for
Bug 23352
Define serial's collection in the subscription
Home
|
New
|
Browse
|
Search
|
[?]
|
Reports
|
Help
|
New Account
|
Log In
[x]
|
Forgot Password
Login:
[x]
[patch]
Bug 23352: Display Acquisition unitprice and replacementprice by default in serials/serials-edit.pl
Bug-23352-Display-Acquisition-unitprice-and-replac.patch (text/plain), 1.67 KB, created by
Alex Buckley
on 2019-08-01 00:30:38 UTC
(
hide
)
Description:
Bug 23352: Display Acquisition unitprice and replacementprice by default in serials/serials-edit.pl
Filename:
MIME Type:
Creator:
Alex Buckley
Created:
2019-08-01 00:30:38 UTC
Size:
1.67 KB
patch
obsolete
>From fa9129cf44304e15b86b4c557e5050b6ac2d9204 Mon Sep 17 00:00:00 2001 >From: Alex Buckley <alexbuckley@catalyst.net.nz> >Date: Tue, 30 Jul 2019 07:46:41 +0000 >Subject: [PATCH] Bug 23352: Display Acquisition unitprice and replacementprice > by default in serials/serials-edit.pl > >Sponsored-By: Brimbank Library, Australia >--- > C4/Items.pm | 14 ++++++++++++++ > 1 file changed, 14 insertions(+) > >diff --git a/C4/Items.pm b/C4/Items.pm >index 1f52fa2..2ca1f69 100644 >--- a/C4/Items.pm >+++ b/C4/Items.pm >@@ -2352,6 +2352,14 @@ sub PrepareItemrecordDisplay { > } > my @loop_data; > >+ my $unitprice; >+ my $replacementprice; >+ my @orders = C4::Acquisition::GetOrdersByBiblionumber($bibnum); >+ foreach my $order (@orders) { >+ $unitprice = $order->{'unitprice'}; >+ $replacementprice = $order->{'replacementprice'}; >+ } >+ > my $branch_limit = C4::Context->userenv ? C4::Context->userenv->{"branch"} : ""; > my $query = qq{ > SELECT authorised_value,lib FROM authorised_values >@@ -2441,6 +2449,12 @@ sub PrepareItemrecordDisplay { > $defaultvalue = $defaultvalues->{location}; > } > } >+ if ( $unitprice && $tagslib->{$tag}->{$subfield}->{kohafield} eq 'items.price' ) { >+ $defaultvalue = $unitprice; >+ } >+ if ( $replacementprice && $tagslib->{$tag}->{$subfield}->{kohafield} eq 'items.replacementprice' ) { >+ $defaultvalue = $replacementprice; >+ } > if ( $tagslib->{$tag}->{$subfield}->{authorised_value} ) { > my @authorised_values; > my %authorised_lib; >-- >2.1.4
You cannot view the attachment while viewing its details because your browser does not support IFRAMEs.
View the attachment on a separate page
.
View Attachment As Diff
View Attachment As Raw
Actions:
View
|
Diff
|
Splinter Review
Attachments on
bug 23352
:
91678
|
91679
|
91901
|
91985
|
91986
|
92149
|
92165
|
92166
|
95662
|
101913
|
101914
|
101916
|
129123
|
129124
|
129125
|
129225
|
129226
|
129227
|
129228
|
131426
|
131427
|
131435
|
131437
|
131438
|
131439
|
132920
|
133679
|
133680
|
133681
|
133682
|
133683
|
133786
|
133787
|
133788
|
133789
|
133790
|
163965