|
Lines 21-26
use strict;
Link Here
|
| 21 |
use warnings; |
21 |
use warnings; |
| 22 |
|
22 |
|
| 23 |
use C4::Context; |
23 |
use C4::Context; |
|
|
24 |
use C4::Branch; |
| 24 |
|
25 |
|
| 25 |
use vars qw($VERSION @ISA @EXPORT); |
26 |
use vars qw($VERSION @ISA @EXPORT); |
| 26 |
|
27 |
|
|
Lines 124-133
sub getreviews {
Link Here
|
| 124 |
|
125 |
|
| 125 |
sub getallreviews { |
126 |
sub getallreviews { |
| 126 |
my ($status, $offset, $row_count) = @_; |
127 |
my ($status, $offset, $row_count) = @_; |
| 127 |
my @params = ($status,($offset ? $offset : 0),($row_count ? $row_count : 20)); |
128 |
my @params; |
| 128 |
my $dbh = C4::Context->dbh; |
129 |
my $dbh = C4::Context->dbh; |
| 129 |
my $query = |
130 |
|
| 130 |
"SELECT * FROM reviews WHERE approved=? order by datereviewed desc LIMIT ?, ?"; |
131 |
my $query = " |
|
|
132 |
SELECT reviews.* |
| 133 |
FROM reviews |
| 134 |
LEFT JOIN borrowers USING ( borrowernumber ) |
| 135 |
WHERE approved=? order by datereviewed desc LIMIT ?, ? |
| 136 |
"; |
| 137 |
push( @params, $status ); |
| 138 |
|
| 139 |
if ( C4::Context->preference("IndependentBranches") ) { |
| 140 |
unless ( C4::Context->IsSuperLibrarian() ) { |
| 141 |
my @branches = GetIndependentGroupModificationRights(); |
| 142 |
$query .= |
| 143 |
" AND ( borrowers.branchcode IN ( " |
| 144 |
. join( ',', ('?') x @branches ) |
| 145 |
. " ) OR borrowers.branchcode = '')"; |
| 146 |
push( @params, @branches ); |
| 147 |
} |
| 148 |
} |
| 149 |
|
| 150 |
$query .= " ORDER BY datereviewed desc LIMIT ?, ?"; |
| 151 |
push( @params, ($offset ? $offset : 0),($row_count ? $row_count : 20) ); |
| 152 |
|
| 131 |
my $sth = $dbh->prepare($query) || warn $dbh->err_str; |
153 |
my $sth = $dbh->prepare($query) || warn $dbh->err_str; |
| 132 |
$sth->execute(@params); |
154 |
$sth->execute(@params); |
| 133 |
return $sth->fetchall_arrayref({}); |
155 |
return $sth->fetchall_arrayref({}); |
| 134 |
- |
|
|