|
Lines 30-35
use C4::Context;
Link Here
|
| 30 |
use C4::Auth qw( check_cookie_auth ); |
30 |
use C4::Auth qw( check_cookie_auth ); |
| 31 |
use Koha::Patrons; |
31 |
use Koha::Patrons; |
| 32 |
use Koha::DateUtils qw( format_sqldatetime ); |
32 |
use Koha::DateUtils qw( format_sqldatetime ); |
|
|
33 |
use Koha::Libraries; |
| 33 |
|
34 |
|
| 34 |
use JSON qw( to_json ); |
35 |
use JSON qw( to_json ); |
| 35 |
|
36 |
|
|
Lines 79-84
my $borrowers_rs = Koha::Patrons->search_limited(
Link Here
|
| 79 |
|
80 |
|
| 80 |
my @borrowers; |
81 |
my @borrowers; |
| 81 |
while ( my $b = $borrowers_rs->next ) { |
82 |
while ( my $b = $borrowers_rs->next ) { |
|
|
83 |
my $library = Koha::Libraries->find( $b->branchcode ); |
| 82 |
push @borrowers, |
84 |
push @borrowers, |
| 83 |
{ borrowernumber => $b->borrowernumber, |
85 |
{ borrowernumber => $b->borrowernumber, |
| 84 |
surname => $b->surname // '', |
86 |
surname => $b->surname // '', |
|
Lines 91-96
while ( my $b = $borrowers_rs->next ) {
Link Here
|
| 91 |
zipcode => $b->zipcode // '', |
93 |
zipcode => $b->zipcode // '', |
| 92 |
country => $b->country // '', |
94 |
country => $b->country // '', |
| 93 |
branchcode => $b->branchcode // '', |
95 |
branchcode => $b->branchcode // '', |
|
|
96 |
branchname => $library->branchname // '', |
| 94 |
}; |
97 |
}; |
| 95 |
} |
98 |
} |
| 96 |
|
99 |
|