From 798c2ce678320dd6cf1a3ee374c6affe117ca15a Mon Sep 17 00:00:00 2001 From: tipaul Date: Thu, 17 Mar 2005 14:53:03 +0000 Subject: [PATCH] minor fixes (in query building & html typos), no new features --- .../en/reports/acquisitions_stats.tmpl | 14 ++++++------ .../default/en/reports/issues_stats.tmpl | 8 +++---- .../default/en/reports/reports-home.tmpl | 22 +++++++++---------- reports/issues_stats.pl | 14 +++++++----- 4 files changed, 29 insertions(+), 29 deletions(-) diff --git a/koha-tmpl/intranet-tmpl/default/en/reports/acquisitions_stats.tmpl b/koha-tmpl/intranet-tmpl/default/en/reports/acquisitions_stats.tmpl index e8bad6167a..7b8a48e1cc 100644 --- a/koha-tmpl/intranet-tmpl/default/en/reports/acquisitions_stats.tmpl +++ b/koha-tmpl/intranet-tmpl/default/en/reports/acquisitions_stats.tmpl @@ -125,9 +125,9 @@   - by + + @@ -201,9 +201,9 @@   - by + + @@ -245,7 +245,7 @@

Cell value

- Count items + Count items Amount
diff --git a/koha-tmpl/intranet-tmpl/default/en/reports/issues_stats.tmpl b/koha-tmpl/intranet-tmpl/default/en/reports/issues_stats.tmpl index b226353ef3..2501751f44 100644 --- a/koha-tmpl/intranet-tmpl/default/en/reports/issues_stats.tmpl +++ b/koha-tmpl/intranet-tmpl/default/en/reports/issues_stats.tmpl @@ -128,9 +128,9 @@ - by + + @@ -204,7 +204,7 @@

Cell value

-

Count issues

+

Count issues

Circulation rate

diff --git a/koha-tmpl/intranet-tmpl/default/en/reports/reports-home.tmpl b/koha-tmpl/intranet-tmpl/default/en/reports/reports-home.tmpl index 2ab13a7944..5ce671b5ec 100644 --- a/koha-tmpl/intranet-tmpl/default/en/reports/reports-home.tmpl +++ b/koha-tmpl/intranet-tmpl/default/en/reports/reports-home.tmpl @@ -3,28 +3,26 @@

Reports

-

Stats on borrowers

- -

Stats on catalogue

+

Stat wizard on

+

Acquisitions

+

Borrowers

+

Catalogue

+

Issues

+
+
+

Other stats

+

on catalogue

-

Stats on issues

+

on issues

-

Stats on acquisitions

-

data exports

diff --git a/reports/issues_stats.pl b/reports/issues_stats.pl index 84f6976043..9be9fd1348 100755 --- a/reports/issues_stats.pl +++ b/reports/issues_stats.pl @@ -307,7 +307,7 @@ sub calculate { my $linefield; if (($line =~/datetime/) and ($dsp == 1)) { #Display by day - $linefield .="dayname($line)"; + $linefield .="concat(weekday($line),' ',dayname($line))"; } elsif (($line=~/datetime/) and ($dsp == 2)) { #Display by Month $linefield .="monthname($line)"; @@ -319,7 +319,9 @@ sub calculate { } else { $linefield .= $line; } - + my $lineorder = $linefield; + $lineorder = "weekday($line)" if $lineorder =~ "^dayname"; + my $strsth; $strsth .= "select distinctrow $linefield from statistics, borrowers where (statistics.borrowernumber=borrowers.borrowernumber) and $line is not null "; @@ -339,8 +341,8 @@ sub calculate { $strsth .= " and $line LIKE ? " ; } $strsth .=" group by $linefield"; - $strsth .=" order by $linefield"; -# warn "". $strsth; + $strsth .=" order by $lineorder"; + warn "". $strsth; my $sth = $dbh->prepare( $strsth ); if (( @linefilter ) and ($linefilter[1])){ @@ -467,8 +469,8 @@ sub calculate { $strcalc .= " AND monthname(datetime) like '" . $monthsel ."'" if ( $monthsel ); $strcalc .= " AND statistics.type like '" . $type ."'" if ( $type ); - $strcalc .= " group by $linefield, $colfield order by $linefield,$colfield"; -# warn "". $strcalc; + $strcalc .= " group by $linefield, $colfield order by $lineorder,$colfield"; + warn "". $strcalc; my $dbcalc = $dbh->prepare($strcalc); $dbcalc->execute; # warn "filling table"; -- 2.39.5