[Koha-cvs] CVS: koha/acqui histsearch.pl,1.1.2.2,1.1.2.3

[Paul POULAIN]

Update of /cvsroot/koha/koha/acqui
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv17202/acqui

Modified Files:
      Tag: rel_2_2
        histsearch.pl 
Log Message:
adding total (qty & price) in historysearch

Index: histsearch.pl
===================================================================
RCS file: /cvsroot/koha/koha/acqui/histsearch.pl,v
retrieving revision 1.1.2.2
retrieving revision 1.1.2.3
diff -C2 -r1.1.2.2 -r1.1.2.3
*** histsearch.pl       28 Jun 2005 10:21:29 -0000      1.1.2.2
--- histsearch.pl       23 Sep 2005 08:55:57 -0000      1.1.2.3
***************
*** 25,30 ****
                             debug => 1,
                             });
! my $order_loop= 
&histsearch($title,$author,$name,$from_placed_on,$to_placed_on);
  $template->param(suggestions_loop => $order_loop,
                                numresults => scalar(@$order_loop),
                                title => $title,
--- 25,32 ----
                             debug => 1,
                             });
! my ($order_loop,$total_qty,$total_price)= 
&histsearch($title,$author,$name,$from_placed_on,$to_placed_on);
  $template->param(suggestions_loop => $order_loop,
+                               total_qty => $total_qty,
+                               total_price => sprintf  ("%.2f",$total_price),
                                numresults => scalar(@$order_loop),
                                title => $title,