Lines 29-34
use C4::Branch;
Link Here
|
29 |
use C4::Context; |
29 |
use C4::Context; |
30 |
use C4::Members; |
30 |
use C4::Members; |
31 |
use C4::Members::Statistics; |
31 |
use C4::Members::Statistics; |
|
|
32 |
use C4::Members::Attributes qw(GetBorrowerAttributes); |
32 |
use C4::Output; |
33 |
use C4::Output; |
33 |
|
34 |
|
34 |
my $input = new CGI; |
35 |
my $input = new CGI; |
Lines 56-62
if ( not defined $borrower ) {
Link Here
|
56 |
foreach my $key ( keys %$borrower ) { |
57 |
foreach my $key ( keys %$borrower ) { |
57 |
$template->param( $key => $borrower->{$key} ); |
58 |
$template->param( $key => $borrower->{$key} ); |
58 |
} |
59 |
} |
59 |
|
60 |
$template->param( |
|
|
61 |
categoryname => $borrower->{'description'}, |
62 |
branchname => GetBranchName($borrower->{'branchcode'}), |
63 |
); |
60 |
# Construct column names |
64 |
# Construct column names |
61 |
my $fields = C4::Members::Statistics::get_fields(); |
65 |
my $fields = C4::Members::Statistics::get_fields(); |
62 |
our @statistic_column_names = split '\|', $fields; |
66 |
our @statistic_column_names = split '\|', $fields; |
Lines 80-85
my $count_total_issues = $total->{count_total_issues_today} || 0;
Link Here
|
80 |
my $count_total_issues_returned = $total->{count_total_issues_returned_today} || 0; |
84 |
my $count_total_issues_returned = $total->{count_total_issues_returned_today} || 0; |
81 |
my $count_total_actual_state = ($count_total_precedent_state - $count_total_issues_returned + $count_total_issues); |
85 |
my $count_total_actual_state = ($count_total_precedent_state - $count_total_issues_returned + $count_total_issues); |
82 |
|
86 |
|
|
|
87 |
if (C4::Context->preference('ExtendedPatronAttributes')) { |
88 |
my $attributes = GetBorrowerAttributes($borrowernumber); |
89 |
$template->param( |
90 |
ExtendedPatronAttributes => 1, |
91 |
extendedattributes => $attributes |
92 |
); |
93 |
} |
94 |
|
95 |
my ($picture, $dberror) = GetPatronImage($borrower->{'cardnumber'}); |
96 |
$template->param( picture => 1 ) if $picture; |
97 |
|
83 |
$template->param( |
98 |
$template->param( |
84 |
statisticsview => 1, |
99 |
statisticsview => 1, |
85 |
datas => $datas, |
100 |
datas => $datas, |
86 |
- |
|
|