From 6e714ce442c3f09f61685c8fc3d6bb14ecd89dd8 Mon Sep 17 00:00:00 2001
From: Chris Nighswonger <chris.nighswonger@liblime.com>
Date: Thu, 7 Aug 2008 16:05:41 -0500
Subject: [PATCH] kohabug 2427 Correcting C4::Items:: _koha_new_item to
 populate items.copynumber

The INSERT was missing the copynumber parameter. moredetail.pl was also not setting
the copyvol template variable. This patch corrects these issues so that the copynumber
is both inserted when a new item is created (including during a bulkmarcimport.pl run)
and displayed properly on moredetail.pl

Signed-off-by: Joshua Ferraro <jmf@liblime.com>
---
 C4/Items.pm             | 8 +++++---
 catalogue/moredetail.pl | 7 ++++---
 2 files changed, 9 insertions(+), 6 deletions(-)

diff --git a/C4/Items.pm b/C4/Items.pm
index f9edacfa6e..a0d2a4bac4 100644
--- a/C4/Items.pm
+++ b/C4/Items.pm
@@ -1790,9 +1790,10 @@ sub _koha_new_item {
             ccode               = ?,
             itype               = ?,
             materials           = ?,
-			uri                 = ?,
+            uri = ?,
             enumchron           = ?,
-			more_subfields_xml  = ?
+            more_subfields_xml  = ?,
+            copynumber          = ?
           ";
     my $sth = $dbh->prepare($query);
    $sth->execute(
@@ -1827,7 +1828,8 @@ sub _koha_new_item {
             $item->{'materials'},
             $item->{'uri'},
             $item->{'enumchron'},
-			$item->{'more_subfields_xml'},
+            $item->{'more_subfields_xml'},
+            $item->{'copynumber'},
     );
     my $itemnumber = $dbh->{'mysql_insertid'};
     if ( defined $sth->errstr ) {
diff --git a/catalogue/moredetail.pl b/catalogue/moredetail.pl
index 76ec022eb6..5d0908775f 100755
--- a/catalogue/moredetail.pl
+++ b/catalogue/moredetail.pl
@@ -94,9 +94,10 @@ foreach my $item (@items){
     $item->{'datelastseen'} = format_date($item->{'datelastseen'});
     $item->{'ordernumber'} = $ordernum;
     $item->{'booksellerinvoicenumber'} = $order->{'booksellerinvoicenumber'};
-	if ($item->{notforloantext} or $item->{itemlost} or $item->{damaged} or $item->{wthdrawn}) {
-		$item->{status_advisory} = 1;
-	}
+    $item->{'copyvol'} = $item->{'copynumber'};
+    if ($item->{notforloantext} or $item->{itemlost} or $item->{damaged} or $item->{wthdrawn}) {
+        $item->{status_advisory} = 1;
+    }
 
     if (C4::Context->preference("IndependantBranches")) {
         #verifying rights
-- 
2.39.5