[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/07/18 05:56:34

Modified files:
	C4             : Bull.pm 

Log message:
	mysql 5 syntax fixes

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

Patches:
Index: Bull.pm
===================================================================
RCS file: /sources/koha/koha/C4/Attic/Bull.pm,v
retrieving revision 1.6.2.46
retrieving revision 1.6.2.47
diff -u -b -r1.6.2.46 -r1.6.2.47
--- Bull.pm	26 Apr 2007 01:23:43 -0000	1.6.2.46
+++ Bull.pm	18 Jul 2007 05:56:34 -0000	1.6.2.47
@@ -204,7 +204,7 @@
 sub getSupplierListWithLateIssues {
 	my $dbh = C4::Context->dbh;
 	my $sth = $dbh->prepare("SELECT DISTINCT id, name
-							FROM subscription, serial
+							FROM serial , subscription 
 							LEFT JOIN aqbooksellers ON subscription.aqbooksellerid = aqbooksellers.id
 							WHERE subscription.subscriptionid = serial.subscriptionid AND
 							(planneddate < now( ) OR serial.STATUS = 3 OR serial.STATUS = 4)
@@ -225,7 +225,7 @@
 	my $sth;
 	if ($supplierid) {
 		$sth = $dbh->prepare("SELECT name,title,planneddate,serialseq,serial.subscriptionid
-							FROM subscription, serial, biblio
+							FROM serial, biblio, subscription
 							LEFT JOIN aqbooksellers ON subscription.aqbooksellerid = aqbooksellers.id
 							WHERE subscription.subscriptionid = serial.subscriptionid AND
 							((planneddate < now() and serial.STATUS =1) OR serial.STATUS = 3) and
@@ -234,7 +234,7 @@
 							");
 	} else {
 		$sth = $dbh->prepare("SELECT name,title,planneddate,serialseq,serial.subscriptionid
-							FROM subscription, serial, biblio
+							FROM serial, biblio, subscription
 							LEFT JOIN aqbooksellers ON subscription.aqbooksellerid = aqbooksellers.id
 							WHERE subscription.subscriptionid = serial.subscriptionid AND
 							((planneddate < now() and serial.STATUS =1) OR serial.STATUS = 3) and
@@ -269,7 +269,7 @@
     
             if ($supplierid) {
 		                $sth = $dbh->prepare("SELECT serialid,aqbooksellerid,name,title,planneddate,serialseq,serial.subscriptionid
-                                  FROM subscription, serial, biblio
+                                  FROM  serial, biblio, subscription
                                   LEFT JOIN aqbooksellers ON subscription.aqbooksellerid = aqbooksellers.id
                                   WHERE subscription.subscriptionid = serial.subscriptionid AND
                                   serial.STATUS = 4 and
@@ -278,7 +278,7 @@
                                   ");
         } else {
 	                    $sth = $dbh->prepare("SELECT serialid,aqbooksellerid,name,title,planneddate,serialseq,serial.subscriptionid
-                                  FROM subscription, serial, biblio
+                                  FROM  serial, biblio, subscription
                                   LEFT JOIN aqbooksellers ON subscription.aqbooksellerid = aqbooksellers.id
                                   WHERE subscription.subscriptionid = serial.subscriptionid AND
                                   serial.STATUS =4 and