|
Lines 77-83
WHERE
Link Here
|
| 77 |
(quantity > quantityreceived OR quantityreceived IS NULL) |
77 |
(quantity > quantityreceived OR quantityreceived IS NULL) |
| 78 |
GROUP BY aqorders.biblionumber, aqorders.basketno, aqorders.ordernumber, |
78 |
GROUP BY aqorders.biblionumber, aqorders.basketno, aqorders.ordernumber, |
| 79 |
tleft, |
79 |
tleft, |
| 80 |
ecost, budgetdate, entrydate, |
80 |
ecost_tax_included, budgetdate, entrydate, |
| 81 |
aqbasket.booksellerid, |
81 |
aqbasket.booksellerid, |
| 82 |
aqbooksellers.name, |
82 |
aqbooksellers.name, |
| 83 |
itype, |
83 |
itype, |
|
Lines 107-113
while ( my $data = $sth->fetchrow_hashref ) {
Link Here
|
| 107 |
} |
107 |
} |
| 108 |
} |
108 |
} |
| 109 |
|
109 |
|
| 110 |
my $adjustments = Koha::Acquisition::Invoice::Adjustments->search({budget_id => $fund_id, closedate => undef, encumber_open => 1 }, { join => 'invoiceid' } ); |
110 |
my $adjustments = Koha::Acquisition::Invoice::Adjustments->search({budget_id => $fund_id, closedate => undef, encumber_open => 1 }, { prefetch => 'invoiceid' } ); |
| 111 |
while ( my $adj = $adjustments->next ){ |
111 |
while ( my $adj = $adjustments->next ){ |
| 112 |
$total += $adj->adjustment; |
112 |
$total += $adj->adjustment; |
| 113 |
} |
113 |
} |