web-erp-svn Mailing List for webERP Accounting & Business Management (Page 162)

SourceForge Headquarters 225 Broadway Suite 1600 San Diego, CA 92101 +1 (858) 422-6466

Revision: 4763
          http://web-erp.svn.sourceforge.net/web-erp/?rev=4763&view=rev
Author:   daintree
Date:     2011-12-07 07:03:38 +0000 (Wed, 07 Dec 2011)
Log Message:
-----------


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

Modified: trunk/StockLocTransfer.php
===================================================================

--- trunk/StockLocTransfer.php	2011-12-03 04:18:47 UTC (rev 4762)
+++ trunk/StockLocTransfer.php	2011-12-07 07:03:38 UTC (rev 4763)
@@ -22,56 +22,127 @@
 			unset($_POST['StockID' . $i]);
 			unset($_POST['StockQTY' . $i]);
 		}
-	}
-	$ErrorMessage='';
-	for ($i=$_POST['LinesCounter']-10;$i<$_POST['LinesCounter'];$i++){
-		if (isset($_POST['StockID' . $i]) AND $_POST['StockID' . $i]!=''){
-			$_POST['StockID' . $i]=trim(mb_strtoupper($_POST['StockID' . $i]));
-			$result = DB_query("SELECT COUNT(stockid) FROM stockmaster WHERE stockid='" . $_POST['StockID' . $i] . "'",$db);
-			$myrow = DB_fetch_row($result);
-			if ($myrow[0]==0){
-				$InputError = True;
-				$ErrorMessage .= _('The part code entered of'). ' ' . $_POST['StockID' . $i] . ' '. _('is not set up in the database') . '. ' . _('Only valid parts can be entered for transfers'). '<br />';
-				$_POST['LinesCounter'] -= 10;
-			}
-			DB_free_result( $result );
-			if (!is_numeric(filter_number_format($_POST['StockQTY' . $i]))){
-				$InputError = True;
-				$ErrorMessage .= _('The quantity entered of'). ' ' . $_POST['StockQTY' . $i] . ' '. _('for part code'). ' ' . $_POST['StockID' . $i] . ' '. _('is not numeric') . '. ' . _('The quantity entered for transfers is expected to be numeric').'<br />';
-				$_POST['LinesCounter'] -= 10;
-			}
-			if (filter_number_format($_POST['StockQTY' . $i]) <= 0){
-				$InputError = True;
-				$ErrorMessage .= _('The quantity entered for').' '. $_POST['StockID' . $i] . ' ' . _('is less than or equal to 0') . '. ' . _('Please correct this or remove the item').'<br />';
-				$_POST['LinesCounter'] -= 10;
-			}
-			// Only if stock exists at this location
-			$result = DB_query("SELECT quantity 
-								FROM locstock 
-								WHERE stockid='" . $_POST['StockID' . $i] . "' 
-								AND loccode='".$_POST['FromStockLocation']."'",
-								$db);
-								
-			$myrow = DB_fetch_row($result);
-			if ($myrow[0] < filter_number_format($_POST['StockQTY' . $i])){
-				$InputError = True;
-				$ErrorMessage .= _('The part code entered of'). ' ' . $_POST['StockID' . $i] . ' '. _('does not have enough stock available for transfer.') . '.<br />';
-				$_POST['LinesCounter'] -= 10;
-			}
-			DB_free_result( $result );
-			$TotalItems++;
-		}
-	}//for all LinesCounter
-	if ($TotalItems == 0){
-		$InputError = True;
-		$ErrorMessage .= _('You must enter at least 1 Stock Item to transfer').'<br />';
-	}
+	}  else {
+      if ($_FILES['SelectedTransferFile']['name']) { //start file processing
+      	//initialize
+       	$InputError = false;
+        $ErrorMessage='';
+        //get file handle
+        $FileHandle = fopen($_FILES['SelectedTransferFile']['tmp_name'], 'r');
+        $TotalItems=0;
+    	//loop through file rows
+    	while ( ($myrow = fgetcsv($FileHandle, 10000, ',')) !== FALSE ) {
 
-/*Ship location and Receive location are different */
-	if ($_POST['FromStockLocation']==$_POST['ToStockLocation']){
-		$InputError=True;
-		$ErrorMessage .= _('The transfer must have a different location to receive into and location sent from');
-	}
+    		//check for correct number of fields
+    		$FieldCount = count($myrow);
+    		if ($FieldCount != 2)){
+    			prnMsg (_('File contains') . ' '. $FieldCount . ' ' . _('columns, but only 2 columns are expected. The comma separated file should have just two columns the first for the item code and the second for the quantity to transfer'),'error');
+    			fclose($FileHandle);
+    			include('includes/footer.inc');
+    			exit;
+    		}
+
+    		// cleanup the data (csv files often import with empty strings and such)
+    		for ($i=0; $i<count($myrow);$i++) {
+    			$StockID='';
+    			$Quantity=0;
+                $myrow[$i] = trim($myrow[$i]);
+    			switch ($i) {
+    				case 0:
+    					$StockID = trim(mb_strtoupper($myrow[$i]));
+                        $result = DB_query("SELECT COUNT(stockid) FROM stockmaster WHERE stockid='" . $StockID . "'",$db);
+            			$myrow = DB_fetch_row($result);
+            			if ($myrow[0]==0){
+            				$InputError = True;
+            				$ErrorMessage .= _('The part code entered of'). ' ' . $StockID . ' '. _('is not set up in the database') . '. ' . _('Only valid parts can be entered for transfers'). '<br />';
+           				}
+    					break;
+    				case 1:
+           				$Quantity = filter_number_format($myrow[$i]);
+    					if (!is_numeric($Quantity)){
+				           $InputError = True;
+                           $ErrorMessage .= _('The quantity entered for'). ' ' . $StockID . ' ' . _('of') . $Quantity . ' '. _('is not numeric.') . _('The quantity entered for transfers is expected to be numeric');
+                        }
+    					break;
+                } // end switch statement
+                if ($_SESSION['ProhibitNegativeStock']==1){
+                    // Only if stock exists at this location
+            		$result = DB_query("SELECT quantity
+            							FROM locstock
+            							WHERE stockid='" . $StockID . "'
+            							AND loccode='".$_POST['FromStockLocation']."'",
+            							$db);
+                    $CheckStockRow = DB_fetch_array($result);
+            		if ($myrow['quantity'] < $Quantity){
+            			$InputError = True;
+            			$ErrorMessage .= _('The item'). ' ' . $StockID . ' ' . _('does not have enough stock available (') . ' ' . $myrow['quantity'] . ')' . ' ' . _('The quantity required to transfer was') .  ' ' . $Quantity . '.<br />';
+                    }
+                }
+
+                if ($StockID!='' AND $Quantity!=0){
+                   $_POST['StockID' . $RowCounter] = $StockID;
+                   $_POST['StockQTY' . $RowCounter] = $Quantity;
+                }
+            } // end for loop through the columns on the row being processed
+            $TotalItems++;
+            $_POST['LinesCounter']=$TotalItems;
+          } //end while there are lines in the CSV file
+       } //end if there is a CSV file to import
+          else { // process the manually input lines
+        	$ErrorMessage='';
+        	for ($i=$_POST['LinesCounter']-10;$i<$_POST['LinesCounter'];$i++){
+        		if (isset($_POST['StockID' . $i]) AND $_POST['StockID' . $i]!=''){
+        			$_POST['StockID' . $i]=trim(mb_strtoupper($_POST['StockID' . $i]));
+        			$result = DB_query("SELECT COUNT(stockid) FROM stockmaster WHERE stockid='" . $_POST['StockID' . $i] . "'",$db);
+        			$myrow = DB_fetch_row($result);
+        			if ($myrow[0]==0){
+        				$InputError = True;
+        				$ErrorMessage .= _('The part code entered of'). ' ' . $_POST['StockID' . $i] . ' '. _('is not set up in the database') . '. ' . _('Only valid parts can be entered for transfers'). '<br />';
+        				$_POST['LinesCounter'] -= 10;
+        			}
+        			DB_free_result( $result );
+        			if (!is_numeric(filter_number_format($_POST['StockQTY' . $i]))){
+        				$InputError = True;
+        				$ErrorMessage .= _('The quantity entered of'). ' ' . $_POST['StockQTY' . $i] . ' '. _('for part code'). ' ' . $_POST['StockID' . $i] . ' '. _('is not numeric') . '. ' . _('The quantity entered for transfers is expected to be numeric').'<br />';
+        				$_POST['LinesCounter'] -= 10;
+        			}
+        			if (filter_number_format($_POST['StockQTY' . $i]) <= 0){
+        				$InputError = True;
+        				$ErrorMessage .= _('The quantity entered for').' '. $_POST['StockID' . $i] . ' ' . _('is less than or equal to 0') . '. ' . _('Please correct this or remove the item').'<br />';
+        				$_POST['LinesCounter'] -= 10;
+        			}
+        			if ($_SESSION['ProhibitNegativeStock']==1){
+                        // Only if stock exists at this location
+            			$result = DB_query("SELECT quantity
+            								FROM locstock
+            								WHERE stockid='" . $_POST['StockID' . $i] . "'
+            								AND loccode='".$_POST['FromStockLocation']."'",
+            								$db);
+
+            			$myrow = DB_fetch_row($result);
+            			if ($myrow[0] < filter_number_format($_POST['StockQTY' . $i])){
+            				$InputError = True;
+            				$ErrorMessage .= _('The part code entered of'). ' ' . $_POST['StockID' . $i] . ' '. _('does not have enough stock available for transfer.') . '.<br />';
+            				$_POST['LinesCounter'] -= 10;
+            			}
+ 			        }
+        			DB_free_result( $result );
+        			$TotalItems++;
+        		}
+        	}//for all LinesCounter
+        }
+
+    	if ($TotalItems == 0){
+    		$InputError = True;
+    		$ErrorMessage .= _('You must enter at least 1 Stock Item to transfer').'<br />';
+    	}
+
+    /*Ship location and Receive location are different */
+    	if ($_POST['FromStockLocation']==$_POST['ToStockLocation']){
+    		$InputError=True;
+    		$ErrorMessage .= _('The transfer must have a different location to receive into and location sent from');
+    	}
+   	 } //end if the transfer is not a duplicated
 }
 
 if(isset($_POST['Submit']) AND $InputError==False){
@@ -178,8 +249,14 @@
 			echo '<option value="' . $myrow['loccode'] . '">' . $myrow['locationname'] . '</option>';
 		}
 	}
-	echo '</select></td></tr></table>';
+	echo '</select></td></tr>';
 
+	echo '<tr>
+              <td>' . _('Upload CSV file of Transfer Items and Quantites') . ':</td>
+              <td><input name="SelectedTransferFile" type="file" /></td>
+          </tr>
+          </table>';
+
 	echo '<table class="selection">';
 
 	$tableheader = '<tr><th>'. _('Item Code'). '</th>

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





2011	Jan (14)	Feb (42)	Mar (56)	Apr (60)	May (54)	Jun (48)	Jul (74)	Aug (52)	Sep (68)	Oct (64)	Nov (42)	Dec (62)
2012	Jan (142)	Feb (270)	Mar (374)	Apr (230)	May (214)	Jun (116)	Jul (234)	Aug (66)	Sep (120)	Oct (16)	Nov (17)	Dec (41)
2013	Jan (19)	Feb (18)	Mar (8)	Apr (40)	May (121)	Jun (42)	Jul (127)	Aug (145)	Sep (27)	Oct (38)	Nov (83)	Dec (61)
2014	Jan (33)	Feb (35)	Mar (59)	Apr (41)	May (38)	Jun (45)	Jul (17)	Aug (58)	Sep (46)	Oct (51)	Nov (55)	Dec (36)
2015	Jan (57)	Feb (67)	Mar (70)	Apr (34)	May (32)	Jun (11)	Jul (3)	Aug (17)	Sep (16)	Oct (13)	Nov (30)	Dec (30)
2016	Jan (17)	Feb (12)	Mar (17)	Apr (20)	May (47)	Jun (15)	Jul (13)	Aug (30)	Sep (32)	Oct (20)	Nov (32)	Dec (24)
2017	Jan (16)	Feb	Mar (11)	Apr (11)	May (5)	Jun (42)	Jul (9)	Aug (10)	Sep (14)	Oct (15)	Nov (2)	Dec (29)
2018	Jan (28)	Feb (49)	Mar	Apr	May	Jun	Jul	Aug	Sep	Oct	Nov	Dec

web-erp-svn Mailing List for webERP Accounting & Business Management (Page 162)

Accounting & Best Practice Business Administration System

web-erp-svn — SVN commits