From e1496f6c4ec96df93310ced7dad88ae1535b2dc2 Mon Sep 17 00:00:00 2001
From: Jonathan Druart <jonathan.druart@biblibre.com>
Date: Thu, 3 May 2012 14:58:25 +0200
Subject: [PATCH 1/1] Bug 7991: Add itemcallnumber into the serial collection
 tab

This patch adds a new column containing the itemcallnumber value into
the serial collection tab (opac detail).
---
 koha-tmpl/opac-tmpl/prog/en/modules/opac-detail.tt |    6 ++++--
 opac/opac-detail.pl                                |    7 ++++++-
 2 files changed, 10 insertions(+), 3 deletions(-)

diff --git a/koha-tmpl/opac-tmpl/prog/en/modules/opac-detail.tt b/koha-tmpl/opac-tmpl/prog/en/modules/opac-detail.tt
index cc59fb2..9bb8dd3 100644
--- a/koha-tmpl/opac-tmpl/prog/en/modules/opac-detail.tt
+++ b/koha-tmpl/opac-tmpl/prog/en/modules/opac-detail.tt
@@ -685,8 +685,9 @@ YAHOO.util.Event.onContentReady("furtherm", function () {
     <table id="serialcollectiont">
 	<thead>
 	    <tr>
-		<th id="serial_library">Library</th>
-		<th id="seral_collection">Serial collection</th>
+            <th id="serial_library">Library</th>
+            <th id="serial_collection">Serial collection</th>
+            <th id="serial_itemcallnumber">Item callnumber</th>
 	    </tr>
 	</thead>
 	<tbody>
@@ -694,6 +695,7 @@ YAHOO.util.Event.onContentReady("furtherm", function () {
 	    <tr>
 		<td>[% serialcollection.branch %]</td>
 		<td>[% serialcollection.text %]</td>
+        <td>[% serialcollection.itemcallnumber %]</td>
 	    </tr>
 	[% END %]
 	</tbody>
diff --git a/opac/opac-detail.pl b/opac/opac-detail.pl
index afc9498..80e48e4 100755
--- a/opac/opac-detail.pl
+++ b/opac/opac-detail.pl
@@ -693,6 +693,7 @@ if (C4::Context->preference("OPACFRBRizeEditions")==1) {
 
 # Serial Collection
 my @sc_fields = $record->field(955);
+my @lc_fields = $record->field(930);
 my @serialcollections = ();
 
 foreach my $sc_field (@sc_fields) {
@@ -700,9 +701,13 @@ foreach my $sc_field (@sc_fields) {
 
     $row_data{text}    = $sc_field->subfield('r');
     $row_data{branch}  = $sc_field->subfield('9');
+    foreach my $lc_field (@lc_fields) {
+        $row_data{itemcallnumber} = $lc_field->subfield('a')
+            if ($sc_field->subfield('5') eq $lc_field->subfield('5'));
+    }
 
     if ($row_data{text} && $row_data{branch}) { 
-	push (@serialcollections, \%row_data);
+        push (@serialcollections, \%row_data);
     }
 }
 
-- 
1.7.7.3