[Koha-cvs] koha/C4 Bull.pm [rel_2_2]

[Ryan Higgins]

CVSROOT:        /sources/koha
Module name:    koha
Branch:         rel_2_2
Changes by:     Ryan Higgins <rych>     07/04/26 01:23:43

Modified files:
        C4             : Bull.pm 

Log message:
        lateissues returning all serials instead of just late issues.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/C4/Bull.pm?cvsroot=koha&only_with_tag=rel_2_2&r1=1.6.2.45&r2=1.6.2.46

Patches:
Index: Bull.pm
===================================================================
RCS file: /sources/koha/koha/C4/Attic/Bull.pm,v
retrieving revision 1.6.2.45
retrieving revision 1.6.2.46
diff -u -b -r1.6.2.45 -r1.6.2.46
--- Bull.pm     26 Apr 2007 01:02:43 -0000      1.6.2.45
+++ Bull.pm     26 Apr 2007 01:23:43 -0000      1.6.2.46
@@ -217,6 +217,8 @@
         $supplierlist{''} = "All Suppliers";
        return %supplierlist;
 }
+
+# FIXME - UNSAFE db queries.
 sub GetLateIssues {
        my ($supplierid) = @_;
        my $dbh = C4::Context->dbh;
@@ -235,7 +237,7 @@
                                                        FROM subscription, 
serial, biblio
                                                        LEFT JOIN aqbooksellers 
ON subscription.aqbooksellerid = aqbooksellers.id
                                                        WHERE 
subscription.subscriptionid = serial.subscriptionid AND
-                                                       ((planneddate < now() 
and serial.STATUS <=3) OR serial.STATUS = 3) and
+                                                       ((planneddate < now() 
and serial.STATUS =1) OR serial.STATUS = 3) and
                                                        biblio.biblionumber = 
subscription.biblionumber order by title
                                                        ");
        }