|
Lines 134-140
sub GetSuppliersWithLateIssues {
Link Here
|
| 134 |
my $dbh = C4::Context->dbh; |
134 |
my $dbh = C4::Context->dbh; |
| 135 |
my $statuses = join(',', ( LATE, MISSING_STATUSES, CLAIMED ) ); |
135 |
my $statuses = join(',', ( LATE, MISSING_STATUSES, CLAIMED ) ); |
| 136 |
my $query = qq| |
136 |
my $query = qq| |
| 137 |
SELECT DISTINCT id, name |
137 |
SELECT COUNT(*) as count, id, name |
| 138 |
FROM subscription |
138 |
FROM subscription |
| 139 |
LEFT JOIN serial ON serial.subscriptionid=subscription.subscriptionid |
139 |
LEFT JOIN serial ON serial.subscriptionid=subscription.subscriptionid |
| 140 |
LEFT JOIN aqbooksellers ON subscription.aqbooksellerid = aqbooksellers.id |
140 |
LEFT JOIN aqbooksellers ON subscription.aqbooksellerid = aqbooksellers.id |
|
Lines 144-149
sub GetSuppliersWithLateIssues {
Link Here
|
| 144 |
OR serial.STATUS IN ( $statuses ) |
144 |
OR serial.STATUS IN ( $statuses ) |
| 145 |
) |
145 |
) |
| 146 |
AND subscription.closed = 0 |
146 |
AND subscription.closed = 0 |
|
|
147 |
GROUP BY aqbooksellers.id |
| 147 |
ORDER BY name|; |
148 |
ORDER BY name|; |
| 148 |
return $dbh->selectall_arrayref($query, { Slice => {} }); |
149 |
return $dbh->selectall_arrayref($query, { Slice => {} }); |
| 149 |
} |
150 |
} |