|
Lines 31-36
use Koha::Patron::Modifications;
Link Here
|
| 31 |
use Koha::Patron::Discharge; |
31 |
use Koha::Patron::Discharge; |
| 32 |
use Koha::Reviews; |
32 |
use Koha::Reviews; |
| 33 |
use Koha::ArticleRequests; |
33 |
use Koha::ArticleRequests; |
|
|
34 |
use Koha::ProblemReports; |
| 34 |
|
35 |
|
| 35 |
my $query = new CGI; |
36 |
my $query = new CGI; |
| 36 |
|
37 |
|
|
Lines 74-79
my $pending_article_requests = Koha::ArticleRequests->search_limited(
Link Here
|
| 74 |
$branch ? ( 'me.branchcode' => $branch ) : (), |
75 |
$branch ? ( 'me.branchcode' => $branch ) : (), |
| 75 |
} |
76 |
} |
| 76 |
)->count; |
77 |
)->count; |
|
|
78 |
my $pending_problem_reports = Koha::ProblemReports->search({ status => 'N' }); |
| 77 |
|
79 |
|
| 78 |
$template->param( |
80 |
$template->param( |
| 79 |
pendingcomments => $pendingcomments, |
81 |
pendingcomments => $pendingcomments, |
|
Lines 82-87
$template->param(
Link Here
|
| 82 |
pending_borrower_modifications => $pending_borrower_modifications, |
84 |
pending_borrower_modifications => $pending_borrower_modifications, |
| 83 |
pending_discharge_requests => $pending_discharge_requests, |
85 |
pending_discharge_requests => $pending_discharge_requests, |
| 84 |
pending_article_requests => $pending_article_requests, |
86 |
pending_article_requests => $pending_article_requests, |
|
|
87 |
pending_problem_reports => $pending_problem_reports |
| 85 |
); |
88 |
); |
| 86 |
|
89 |
|
| 87 |
output_html_with_http_headers $query, $cookie, $template->output; |
90 |
output_html_with_http_headers $query, $cookie, $template->output; |
| 88 |
- |
|
|