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

Paul POULAIN tipaul at users.sourceforge.net
Fri Sep 23 10:55:59 CEST 2005


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,





More information about the Koha-cvs mailing list