[Web-erp-svn] SF.net SVN: web-erp:[5638] trunk/SelectProduct.php

[<te...@us...>]

Revision: 5638
          http://web-erp.svn.sourceforge.net/web-erp/?rev=5638&view=rev
Author:   tehonu
Date:     2012-09-09 00:26:37 +0000 (Sun, 09 Sep 2012)
Log Message:
-----------
Avoid redundancies in list of supplier to purchase the item when there is many purchdata available

Modified Paths:
--------------
    trunk/SelectProduct.php

Modified: trunk/SelectProduct.php
===================================================================
--- trunk/SelectProduct.php	2012-09-08 06:07:30 UTC (rev 5637)
+++ trunk/SelectProduct.php	2012-09-09 00:26:37 UTC (rev 5638)
@@ -456,16 +456,20 @@
 										purchdata.leadtime
 									FROM purchdata INNER JOIN suppliers
 									ON purchdata.supplierno=suppliers.supplierid
-									WHERE purchdata.stockid='" . $StockID . "'", $db);
+									WHERE purchdata.stockid='" . $StockID . "'
+									ORDER BY purchdata.effectivefrom DESC", $db);
+		$LastSupplierShown = "";
 		while ($SuppRow = DB_fetch_array($SuppResult)) {
-			if (($myrow['eoq'] < $SuppRow['minorderqty'])) {
-				$EOQ = $SuppRow['minorderqty'];
-			} else {
-				$EOQ = $myrow['eoq'];
+			if ($LastSupplierShown != $SuppRow['supplierid']){
+				if (($myrow['eoq'] < $SuppRow['minorderqty'])) {
+					$EOQ = $SuppRow['minorderqty'];
+				} else {
+					$EOQ = $myrow['eoq'];
+				}
+				echo '<a href="' . $rootpath . '/PO_Header.php?NewOrder=Yes' . '&amp;SelectedSupplier=' . $SuppRow['supplierid'] . '&amp;StockID=' . $StockID . '&amp;Quantity='.$EOQ.'&amp;LeadTime='.$SuppRow['leadtime'].'">'. _('Purchase this Item from') . ' ' . $SuppRow['suppname'] . '</a>
+				<br />';
+				$LastSupplierShown = $SuppRow['supplierid'];
 			}
-			echo '<a href="' . $rootpath . '/PO_Header.php?NewOrder=Yes' . '&amp;SelectedSupplier=' . $SuppRow['supplierid'] . '&amp;StockID=' . $StockID . '&amp;Quantity='.$EOQ.'&amp;LeadTime='.$SuppRow['leadtime'].'">'. _('Purchase this Item from') . ' ' . $SuppRow['suppname'] . '</a>
-			<br />';
-
 			/**/
 		} /* end of while */
 	} /* end of $myrow['mbflag'] == 'B' */

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.