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

(-)a/C4/Members/Statistics.pm (-5 / +1 lines)
Lines 40-49 BEGIN { Link Here
40
    );
40
    );
41
}
41
}
42
42
43
44
our $fields = get_fields();
45
46
47
=head2 get_fields
43
=head2 get_fields
48
  Get fields form syspref 'StatisticsFields'
44
  Get fields form syspref 'StatisticsFields'
49
  Returns list of valid fields, defaults to 'location|itype|ccode'
45
  Returns list of valid fields, defaults to 'location|itype|ccode'
Lines 79-84 sub get_fields { Link Here
79
sub construct_query {
75
sub construct_query {
80
    my $count    = shift;
76
    my $count    = shift;
81
    my $subquery = shift;
77
    my $subquery = shift;
78
    my $fields = get_fields();
82
    my @select_fields = split '\|', $fields;
79
    my @select_fields = split '\|', $fields;
83
    my $query = "SELECT COUNT(*) as count_$count,";
80
    my $query = "SELECT COUNT(*) as count_$count,";
84
    $query .= join ',', @select_fields;
81
    $query .= join ',', @select_fields;
85
- 

Return to bug 16443