Merge pull request #5301 from atm-ph/fix_develop_issue_2858

NEW issue 2858 - Option to allow negative transfer

htdocs/admin/stock.php

@@ -49,6 +49,10 @@ if($action)
 	{
 		$res = dolibarr_set_const($db, "STOCK_USERSTOCK_AUTOCREATE", GETPOST('STOCK_USERSTOCK_AUTOCREATE','alpha'),'chaine',0,'',$conf->entity);
 	}
+	if ($action == 'STOCK_ALLOW_NEGATIVE_TRANSFER')
+	{
+		$res = dolibarr_set_const($db, "STOCK_ALLOW_NEGATIVE_TRANSFER", GETPOST('STOCK_ALLOW_NEGATIVE_TRANSFER','alpha'),'chaine',0,'',$conf->entity);
+	}
 	// Mode of stock decrease
 	if ($action == 'STOCK_CALCULATE_ON_BILL'
 	|| $action == 'STOCK_CALCULATE_ON_VALIDATE_ORDER'
@@ -427,6 +431,22 @@ print '<input type="submit" class="button" value="'.$langs->trans("Modify").'">'
 print '</form>';
 print "</td>\n";
 print "</tr>\n";
+
+$var=!$var;
+
+print "<tr ".$bc[$var].">";
+print '<td width="60%">'.$langs->trans("WarehouseAllowNegativeTransfer").'</td>';
+
+print '<td width="160" align="right">';
+print "<form method=\"post\" action=\"stock.php\">";
+print '<input type="hidden" name="token" value="'.$_SESSION['newtoken'].'">';
+print "<input type=\"hidden\" name=\"action\" value=\"STOCK_ALLOW_NEGATIVE_TRANSFER\">";
+print $form->selectyesno("STOCK_ALLOW_NEGATIVE_TRANSFER",$conf->global->STOCK_ALLOW_NEGATIVE_TRANSFER,1);
+print '<input type="submit" class="button" value="'.$langs->trans("Modify").'">';
+print '</form>';
+print "</td>\n";
+print "</tr>\n";
+
 print '<br>';
 
 /* I keep the option/feature, but hidden to end users for the moment. If feature is used by module, no need to have users see it.

htdocs/core/modules/modStock.class.php

@@ -71,7 +71,9 @@ class modStock extends DolibarrModules
 		$this->langfiles = array("stocks");
 
 		// Constants
-		$this->const = array();
+		$this->const = array(
+			0=>array('STOCK_ALLOW_NEGATIVE_TRANSFER','chaine','1','',1)
+		);
 
 		// Boxes
 		$this->boxes = array();

htdocs/langs/en_US/stocks.lang

@@ -120,6 +120,8 @@ StockMustBeEnoughForShipment= Stock level must be enough to add product/service
 MovementLabel=Label of movement
 InventoryCode=Movement or inventory code
 IsInPackage=Contained into package
+WarehouseAllowNegativeTransfer=Allow transfer even without stock
+qtyToTranferIsNotEnough=You don't have enough stock from your source warehouse 
 ShowWarehouse=Show warehouse
 MovementCorrectStock=Stock correction for product %s
 MovementTransferStock=Stock transfer of product %s into another warehouse

htdocs/product/stock/class/mouvementstock.class.php

@@ -250,6 +250,17 @@ class MouvementStock extends CommonObject
 
 		}
 	
+		if (empty($conf->global->STOCK_ALLOW_NEGATIVE_TRANSFER) && in_array($type, array(1, 2)))
+		{
+			if (empty($product->stock_warehouse[$entrepot_id]->real) || $product->stock_warehouse[$entrepot_id]->real < abs($qty)) 
+			{
+				$this->error = $langs->trans('qtyToTranferIsNotEnough');
+				$this->errors[] = $langs->trans('qtyToTranferIsNotEnough');
+				$this->db->rollback();
+				return -8;
+			}
+		}
+
 		// Define if we must make the stock change (If product type is a service or if stock is used also for services)
 		$movestock=0;
 		if ($product->type != Product::TYPE_SERVICE || ! empty($conf->global->STOCK_SUPPORTS_SERVICES)) $movestock=1;

htdocs/product/stock/product.php

@@ -324,6 +324,8 @@ if ($action == "transfert_stock" && ! $cancel)
     				if ($result2 < 0) $error++;
 				}
 			}
+
+
 			if (! $error && $result1 >= 0 && $result2 >= 0)
 			{
 				$db->commit();