From c9fab262405a08a24f46defb9654fc00a7775d31 Mon Sep 17 00:00:00 2001 From: Petter Goksoyr Asen Date: Fri, 11 Jul 2014 10:54:11 +0200 Subject: [PATCH] Bug 12554: Fix GetMarcPrice for NORMARC When doing aquisitions and ordering from external z3950 targes, the item price is not inferred from the MARC record when the NORMARC framework is set. This patch makes GetMarcPrice treat NORMARC the same as MARC21. Test plan * Setup Koha with NORMARC framework * Add a norwegian z3950 search target (ex: z3950.bibsys.no:2100, database=BIBSYS) * Create a new basket, and add order to basket from external source * Search for a tile (ex: ISBN 8205341834) from the bibsys z3950 server * Click to order the title * Observe that vendor price is not set * Apply patch, repeat search for same book * Order, and observe the vendor price is filled in from the MARC record http://bugs.koha-community.org/show_bug.cgi?id=12554 Signed-off-by: Bernardo Gonzalez Kriegel Works as described. No errors. Tested changing marcflavour syspref to NORMARC, and following test plan, bug exist and is fixed. Changed bug description on patch, too long :) Signed-off-by: Katrin Fischer Patch adds a check for NORMARC to provide the same functionality as for MARC21. No regressions found. Signed-off-by: Tomas Cohen Arazi --- C4/Biblio.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/C4/Biblio.pm b/C4/Biblio.pm index 05b0a9de8a..d465cf6c10 100644 --- a/C4/Biblio.pm +++ b/C4/Biblio.pm @@ -1489,7 +1489,7 @@ sub GetMarcPrice { my @listtags; my $subfield; - if ( $marcflavour eq "MARC21" ) { + if ( $marcflavour eq "MARC21" || $marcflavour eq "NORMARC" ) { @listtags = ('345', '020'); $subfield="c"; } elsif ( $marcflavour eq "UNIMARC" ) { -- 2.39.5