View | Details | Raw Unified | Return to bug 11471
Collapse All | Expand All

(-)a/C4/Acquisition.pm (-5 / +12 lines)
Lines 815-824 Returns a reference to all baskets that belong to basketgroup $basketgroupid. Link Here
815
sub GetBasketsByBasketgroup {
815
sub GetBasketsByBasketgroup {
816
    my $basketgroupid = shift;
816
    my $basketgroupid = shift;
817
    my $query = qq{
817
    my $query = qq{
818
        SELECT *, aqbasket.booksellerid as booksellerid
818
                   SELECT aqbasket.*, aqcontract.contractnumber,
819
        FROM aqbasket
819
                          aqcontract.contractstartdate,
820
        LEFT JOIN aqcontract USING(contractnumber) WHERE basketgroupid=?
820
                          aqcontract.contractenddate,
821
    };
821
                          aqcontract.contractname,
822
                          aqcontract.contractdescription,
823
                          aqbooksellers.invoiceprice
824
                   FROM aqbasket
825
                   LEFT JOIN aqbooksellers
826
                        ON aqbasket.booksellerid=aqbooksellers.id
827
                   LEFT JOIN aqcontract USING(contractnumber)
828
                   WHERE basketgroupid=?
829
                };
822
    my $dbh = C4::Context->dbh;
830
    my $dbh = C4::Context->dbh;
823
    my $sth = $dbh->prepare($query);
831
    my $sth = $dbh->prepare($query);
824
    $sth->execute($basketgroupid);
832
    $sth->execute($basketgroupid);
825
- 

Return to bug 11471