# Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place,
# Suite 330, Boston, MA 02111-1307 USA
-# $Id$
use strict;
require Exporter;
$bi = $biblionumber unless $bi;
my $data=GetBiblioItemData($bi);
my $dewey = $data->{'dewey'};
+
# FIXME Dewey is a string, not a number, & we should use a function
# $dewey =~ s/0+$//;
# if ($dewey eq "000.") { $dewey = "";};
$results[0]=$data;
foreach my $item (@$items){
+ $item->{itemlostloop}= GetAuthorisedValues('ITEMLOST');
+ $item->{itemdamagedloop}= GetAuthorisedValues('DAMAGED');
$item->{'replacementprice'}=sprintf("%.2f", $item->{'replacementprice'});
$item->{'datelastborrowed'}= format_date($item->{'datelastborrowed'});
$item->{'dateaccessioned'} = format_date($item->{'dateaccessioned'});
$template->param(BIBITEM_DATA => \@results);
$template->param(ITEM_DATA => $items);
$template->param(loggedinuser => $loggedinuser);
+$template->param(biblionumber => $biblionumber);
output_html_with_http_headers $query, $cookie, $template->output;