[Koha-cvs] koha/acqui booksellers.pl [rel_3_0]

paul poulain paul at koha-fr.org
Thu Jan 25 10:33:38 CET 2007


CVSROOT:	/sources/koha
Module name:	koha
Branch:		rel_3_0
Changes by:	paul poulain <tipaul>	07/01/25 09:33:38

Modified files:
	acqui          : booksellers.pl 

Log message:
	adding a "grouped" option to GetPendingOrders, to group or not group the result list basket by basket

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/acqui/booksellers.pl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.2.2.5&r2=1.2.2.6

Patches:
Index: booksellers.pl
===================================================================
RCS file: /sources/koha/koha/acqui/booksellers.pl,v
retrieving revision 1.2.2.5
retrieving revision 1.2.2.6
diff -u -b -r1.2.2.5 -r1.2.2.6
--- booksellers.pl	22 Dec 2006 15:02:56 -0000	1.2.2.5
+++ booksellers.pl	25 Jan 2007 09:33:38 -0000	1.2.2.6
@@ -20,7 +20,7 @@
 # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place,
 # Suite 330, Boston, MA  02111-1307 USA
 
-# $Id: booksellers.pl,v 1.2.2.5 2006/12/22 15:02:56 toins Exp $
+# $Id: booksellers.pl,v 1.2.2.6 2007/01/25 09:33:38 tipaul Exp $
 
 =head1 NAME
 
@@ -94,7 +94,7 @@
 my $toggle = 0;
 my @loop_suppliers;
 for ( my $i = 0 ; $i < $count ; $i++ ) {
-    my $orders  = GetPendingOrders( $suppliers[$i]->{'id'} );
+    my $orders  = GetPendingOrders( $suppliers[$i]->{'id'}, "grouped" );
     my $ordcount = scalar @$orders;
     my %line;
     if ( $toggle == 0 ) {





More information about the Koha-cvs mailing list