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