[Koha-cvs] CVS: koha/C4 Acquisition.pm,1.6,1.7

[Paul POULAIN]

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

Modified Files:
        Acquisition.pm 
Log Message:
Adding possibility to order the basket by :
* publishercode
OR
* budget then publishercode

Index: Acquisition.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Acquisition.pm,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -r1.6 -r1.7
*** Acquisition.pm      4 Oct 2004 20:03:23 -0000       1.6
--- Acquisition.pm      5 Oct 2004 09:22:16 -0000       1.7
***************
*** 103,107 ****
  #'
  sub getbasketcontent {
!       my ($basketno,$supplier)address@hidden;
        my $dbh = C4::Context->dbh;
        my $query="Select *,biblio.title from aqorders,biblio,biblioitems
--- 103,107 ----
  #'
  sub getbasketcontent {
!       my ($basketno,$supplier,$orderby)address@hidden;
        my $dbh = C4::Context->dbh;
        my $query="Select *,biblio.title from aqorders,biblio,biblioitems
***************
*** 115,119 ****
                $query.=" and aqorders.booksellerid='$supplier'";
        }
!       $query.=" order by biblioitems.publishercode";
        my $sth=$dbh->prepare($query);
        $sth->execute;
--- 115,121 ----
                $query.=" and aqorders.booksellerid='$supplier'";
        }
!       
!       $orderby="biblioitems.publishercode" unless $orderby;
!       $query.=" order by $orderby";
        my $sth=$dbh->prepare($query);
        $sth->execute;