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

(-)a/reports/acquisitions_stats.pl (-2 / +2 lines)
Lines 94-100 if ($do_it) { Link Here
94
        foreach my $col (@$cols) {
94
        foreach my $col (@$cols) {
95
            print $col->{coltitle} . $sep;
95
            print $col->{coltitle} . $sep;
96
        }
96
        }
97
        print "Total\n";
97
        print gettext("Total") . "\n";
98
        foreach my $line (@$lines) {
98
        foreach my $line (@$lines) {
99
            my $x = $line->{loopcell};
99
            my $x = $line->{loopcell};
100
            print $line->{rowtitle} . $sep;
100
            print $line->{rowtitle} . $sep;
Lines 104-110 if ($do_it) { Link Here
104
            print $line->{totalrow};
104
            print $line->{totalrow};
105
            print "\n";
105
            print "\n";
106
        }
106
        }
107
        print "TOTAL";
107
        print gettext("TOTAL");
108
        $cols = @$results[0]->{loopfooter};
108
        $cols = @$results[0]->{loopfooter};
109
        foreach my $col (@$cols) {
109
        foreach my $col (@$cols) {
110
            print $sep. $col->{totalcol};
110
            print $sep. $col->{totalcol};
(-)a/reports/bor_issues_top.pl (-2 / +2 lines)
Lines 86-92 if ($do_it) { Link Here
86
        print @$results[0]->{line} ."/". @$results[0]->{column} .$sep;
86
        print @$results[0]->{line} ."/". @$results[0]->{column} .$sep;
87
# Other header
87
# Other header
88
		print join($sep, map {$_->{coltitle}} @$cols);
88
		print join($sep, map {$_->{coltitle}} @$cols);
89
        print $sep . "Total\n";
89
        print $sep . gettext("Total") . "\n";
90
# Table
90
# Table
91
        foreach my $line ( @$lines ) {
91
        foreach my $line ( @$lines ) {
92
            my $x = $line->{loopcell};
92
            my $x = $line->{loopcell};
Lines 96-102 if ($do_it) { Link Here
96
            print "\n";
96
            print "\n";
97
        }
97
        }
98
# footer
98
# footer
99
        print "TOTAL";
99
        print gettext("TOTAL");
100
        $cols = @$results[0]->{loopfooter};
100
        $cols = @$results[0]->{loopfooter};
101
		print join($sep, map {$_->{totalcol}} @$cols);
101
		print join($sep, map {$_->{totalcol}} @$cols);
102
        print $sep.@$results[0]->{total};
102
        print $sep.@$results[0]->{total};
(-)a/reports/borrowers_out.pl (-2 / +2 lines)
Lines 83-89 if ($do_it) { Link Here
83
        foreach my $col ( @$cols ) {
83
        foreach my $col ( @$cols ) {
84
            print $col->{coltitle}.$sep;
84
            print $col->{coltitle}.$sep;
85
        }
85
        }
86
        print "Total\n";
86
        print gettext("Total") . "\n";
87
# Table
87
# Table
88
        foreach my $line ( @$lines ) {
88
        foreach my $line ( @$lines ) {
89
            my $x = $line->{loopcell};
89
            my $x = $line->{loopcell};
Lines 96-102 if ($do_it) { Link Here
96
            print "\n";
96
            print "\n";
97
        }
97
        }
98
# footer
98
# footer
99
        print "TOTAL";
99
        print gettext("TOTAL");
100
        $cols = @$results[0]->{loopfooter};
100
        $cols = @$results[0]->{loopfooter};
101
        foreach my $col ( @$cols ) {
101
        foreach my $col ( @$cols ) {
102
            print $sep.$col->{totalcol};
102
            print $sep.$col->{totalcol};
(-)a/reports/cat_issues_top.pl (-2 / +2 lines)
Lines 89-95 if ($do_it) { Link Here
89
        foreach my $col ( @$cols ) {
89
        foreach my $col ( @$cols ) {
90
            print $col->{coltitle}.$sep;
90
            print $col->{coltitle}.$sep;
91
        }
91
        }
92
        print "Total\n";
92
        print gettext("Total") . "\n";
93
# Table
93
# Table
94
        foreach my $line ( @$lines ) {
94
        foreach my $line ( @$lines ) {
95
            my $x = $line->{loopcell};
95
            my $x = $line->{loopcell};
Lines 101-107 if ($do_it) { Link Here
101
            print "\n";
101
            print "\n";
102
        }
102
        }
103
# footer
103
# footer
104
        print "TOTAL";
104
        print gettext("TOTAL");
105
        $cols = @$results[0]->{loopfooter};
105
        $cols = @$results[0]->{loopfooter};
106
        foreach my $col ( @$cols ) {
106
        foreach my $col ( @$cols ) {
107
            print $sep.$col->{totalcol};
107
            print $sep.$col->{totalcol};
(-)a/reports/catalogue_stats.pl (-2 / +2 lines)
Lines 86-92 if ($do_it) { Link Here
86
		foreach my $col ( @$cols ) {
86
		foreach my $col ( @$cols ) {
87
			print $col->{coltitle}.$sep;
87
			print $col->{coltitle}.$sep;
88
		}
88
		}
89
		print "Total\n";
89
		print gettext("Total") . "\n";
90
		foreach my $line ( @$lines ) {
90
		foreach my $line ( @$lines ) {
91
			my $x = $line->{loopcell};
91
			my $x = $line->{loopcell};
92
			print $line->{rowtitle}.$sep;
92
			print $line->{rowtitle}.$sep;
Lines 96-102 if ($do_it) { Link Here
96
			print $line->{totalrow};
96
			print $line->{totalrow};
97
 			print "\n";
97
 			print "\n";
98
	 	}
98
	 	}
99
		print "TOTAL";
99
		print gettext("TOTAL");
100
		$cols = @$results[0]->{loopfooter};
100
		$cols = @$results[0]->{loopfooter};
101
		foreach my $col ( @$cols ) {
101
		foreach my $col ( @$cols ) {
102
			print $sep.$col->{totalcol};
102
			print $sep.$col->{totalcol};
(-)a/reports/issues_avg_stats.pl (-2 / +2 lines)
Lines 91-97 if ($do_it) { Link Here
91
        foreach my $col ( @$cols ) {
91
        foreach my $col ( @$cols ) {
92
            print $col->{coltitle}.$sep;
92
            print $col->{coltitle}.$sep;
93
        }
93
        }
94
        print "Total\n";
94
        print gettext("Total") . "\n";
95
# Table
95
# Table
96
        foreach my $line ( @$lines ) {
96
        foreach my $line ( @$lines ) {
97
            my $x = $line->{loopcell};
97
            my $x = $line->{loopcell};
Lines 103-109 if ($do_it) { Link Here
103
            print "\n";
103
            print "\n";
104
        }
104
        }
105
# footer
105
# footer
106
        print "TOTAL";
106
        print gettext("TOTAL");
107
        $cols = @$results[0]->{loopfooter};
107
        $cols = @$results[0]->{loopfooter};
108
        foreach my $col ( @$cols ) {
108
        foreach my $col ( @$cols ) {
109
            print $sep.$col->{totalcol};
109
            print $sep.$col->{totalcol};
(-)a/reports/issues_stats.pl (-2 / +2 lines)
Lines 107-113 if ($do_it) { Link Here
107
		foreach my $col ( @$cols ) {
107
		foreach my $col ( @$cols ) {
108
			print $col->{coltitle}.$sep;
108
			print $col->{coltitle}.$sep;
109
		}
109
		}
110
		print "Total\n";
110
		print gettext("Total") . "\n";
111
# Table
111
# Table
112
		foreach my $line ( @$lines ) {
112
		foreach my $line ( @$lines ) {
113
			my $x = $line->{loopcell};
113
			my $x = $line->{loopcell};
Lines 116-122 if ($do_it) { Link Here
116
			print $line->{totalrow}, "\n";
116
			print $line->{totalrow}, "\n";
117
		}
117
		}
118
# footer
118
# footer
119
        print "TOTAL";
119
        print gettext("TOTAL");
120
        $cols = @$results[0]->{loopfooter};
120
        $cols = @$results[0]->{loopfooter};
121
		print map {$sep.$_->{totalcol}} @$cols;
121
		print map {$sep.$_->{totalcol}} @$cols;
122
        print $sep.@$results[0]->{total};
122
        print $sep.@$results[0]->{total};
(-)a/reports/reserves_stats.pl (-3 / +2 lines)
Lines 115-121 if ($do_it) { Link Here
115
		foreach my $col ( @$cols ) {
115
		foreach my $col ( @$cols ) {
116
			print $col->{coltitle}.$sep;
116
			print $col->{coltitle}.$sep;
117
		}
117
		}
118
		print "Total\n";
118
		print gettext("Total") . "\n";
119
# Table
119
# Table
120
		foreach my $line ( @$lines ) {
120
		foreach my $line ( @$lines ) {
121
			my $x = $line->{loopcell};
121
			my $x = $line->{loopcell};
Lines 124-130 if ($do_it) { Link Here
124
			print $line->{totalrow}, "\n";
124
			print $line->{totalrow}, "\n";
125
		}
125
		}
126
# footer
126
# footer
127
        print "TOTAL";
127
        print gettext("TOTAL");
128
        $cols = @$results[0]->{loopfooter};
128
        $cols = @$results[0]->{loopfooter};
129
		print map {$sep.$_->{totalcol}} @$cols;
129
		print map {$sep.$_->{totalcol}} @$cols;
130
        print $sep.@$results[0]->{total};
130
        print $sep.@$results[0]->{total};
131
- 

Return to bug 11668