Lines 1-5
Link Here
|
1 |
package C4::Utils::DataTables::Members; |
1 |
package C4::Utils::DataTables::Members; |
2 |
|
2 |
|
|
|
3 |
use C4::Branch qw/onlymine/; |
3 |
use C4::Context; |
4 |
use C4::Context; |
4 |
use C4::Members qw/GetMemberIssuesAndFines/; |
5 |
use C4::Members qw/GetMemberIssuesAndFines/; |
5 |
use C4::Utils::DataTables; |
6 |
use C4::Utils::DataTables; |
Lines 17-22
sub search {
Link Here
|
17 |
|
18 |
|
18 |
my ($iTotalRecords, $iTotalDisplayRecords); |
19 |
my ($iTotalRecords, $iTotalDisplayRecords); |
19 |
|
20 |
|
|
|
21 |
# If branches are independant and user is not superlibrarian |
22 |
# The search has to be only on the user branch |
23 |
if ( C4::Branch::onlymine ) { |
24 |
my $userenv = C4::Context->userenv; |
25 |
$branchcode = $userenv->{'branch'}; |
26 |
|
27 |
} |
28 |
|
20 |
my $dbh = C4::Context->dbh; |
29 |
my $dbh = C4::Context->dbh; |
21 |
my $select = "SELECT SQL_CALC_FOUND_ROWS |
30 |
my $select = "SELECT SQL_CALC_FOUND_ROWS |
22 |
borrowers.borrowernumber, borrowers.surname, borrowers.firstname, borrowers.address, |
31 |
borrowers.borrowernumber, borrowers.surname, borrowers.firstname, borrowers.address, |