[Koha-cvs] CVS: koha/reports cat_issues_top.pl,1.4,1.5

[Henri-Damien LAURENT]

Update of /cvsroot/koha/koha/reports
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24199/reports

Modified Files:
        cat_issues_top.pl 
Log Message:
Minor fix : Counting biblio and not items

Index: cat_issues_top.pl
===================================================================
RCS file: /cvsroot/koha/koha/reports/cat_issues_top.pl,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -r1.4 -r1.5
*** cat_issues_top.pl   30 Mar 2005 08:08:25 -0000      1.4
--- cat_issues_top.pl   31 Mar 2005 06:47:25 -0000      1.5
***************
*** 281,285 ****
        
  # Processing average loanperiods
!       $strcalc .= "SELECT biblio.title, COUNT(*) AS RANK, biblio.biblionumber 
AS ID";
        $strcalc .= " , $colfield " if ($colfield);
        $strcalc .= " FROM `issues`,borrowers,(items LEFT JOIN biblioitems ON 
biblioitems.biblioitemnumber=items.biblioitemnumber) LEFT JOIN biblio ON 
(biblio.biblionumber=items.biblionumber) WHERE 
issues.itemnumber=items.itemnumber AND 
issues.borrowernumber=borrowers.borrowernumber and returndate is not null";
--- 281,285 ----
        
  # Processing average loanperiods
!       $strcalc .= "SELECT DISTINCT biblio.title, COUNT(biblio.biblionumber) 
AS RANK, biblio.biblionumber AS ID";
        $strcalc .= " , $colfield " if ($colfield);
        $strcalc .= " FROM `issues`,borrowers,(items LEFT JOIN biblioitems ON 
biblioitems.biblioitemnumber=items.biblioitemnumber) LEFT JOIN biblio ON 
(biblio.biblionumber=items.biblionumber) WHERE 
issues.itemnumber=items.itemnumber AND 
issues.borrowernumber=borrowers.borrowernumber and returndate is not null";
***************
*** 306,310 ****
        $strcalc .= " AND year(issues.timestamp) like '" . @$filters[9] ."'" if 
( @$filters[9] );
        
!       $strcalc .= " group by borrowers.borrowernumber";
        $strcalc .= ", $colfield" if ($column);
        $strcalc .= " order by ";
--- 306,310 ----
        $strcalc .= " AND year(issues.timestamp) like '" . @$filters[9] ."'" if 
( @$filters[9] );
        
!       $strcalc .= " group by biblio.biblionumber";
        $strcalc .= ", $colfield" if ($column);
        $strcalc .= " order by ";