Patch from Joe Atzberger to remove $Id$ and $Log$ from scripts
[koha_ffzg] / catalogue / moredetail.pl
index 3c504c6..6f3542c 100755 (executable)
@@ -17,7 +17,6 @@
 # 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;
@@ -53,6 +52,7 @@ my $bi=$query->param('bi');
 $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 = "";};
@@ -76,6 +76,8 @@ my $order = GetOrder($ordernum);
 $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'});
@@ -94,6 +96,7 @@ foreach my $item (@$items){
 $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;