View | Details | Raw Unified | Return to bug 8598
Collapse All | Expand All

(-)a/members/files.pl (+18 lines)
Lines 23-30 use warnings; Link Here
23
use CGI;
23
use CGI;
24
24
25
use C4::Auth;
25
use C4::Auth;
26
use C4::Branch;
26
use C4::Output;
27
use C4::Output;
27
use C4::Members;
28
use C4::Members;
29
use C4::Members::Attributes qw(GetBorrowerAttributes);
28
use C4::Debug;
30
use C4::Debug;
29
31
30
use Koha::DateUtils;
32
use Koha::DateUtils;
Lines 100-105 else { Link Here
100
    }
102
    }
101
103
102
    $template->param(
104
    $template->param(
105
        categoryname    => $data->{'description'},
106
        branchname      => GetBranchName($data->{'branchcode'}),
107
    );
108
109
    if (C4::Context->preference('ExtendedPatronAttributes')) {
110
        my $attributes = GetBorrowerAttributes($borrowernumber);
111
        $template->param(
112
            ExtendedPatronAttributes => 1,
113
            extendedattributes => $attributes
114
        );
115
    }
116
117
    my ($picture, $dberror) = GetPatronImage($data->{'cardnumber'});
118
    $template->param( picture => 1 ) if $picture;
119
120
    $template->param(
103
        files => Koha::Borrower::Files->new( borrowernumber => $borrowernumber )
121
        files => Koha::Borrower::Files->new( borrowernumber => $borrowernumber )
104
          ->GetFilesInfo(),
122
          ->GetFilesInfo(),
105
123
(-)a/members/statistics.pl (-2 / +16 lines)
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
- 

Return to bug 8598