Fix: migrate order delivery address in shipments

htdocs/install/upgrade2.php

@@ -207,6 +207,8 @@ if (isset($_POST['action']) && $_POST['action'] == 'upgrade')
 		// Script pour V2.6 -> V2.7
 		migrate_menus($db,$langs,$conf);
 		
+		migrate_commande_deliveryaddress($db,$langs,$conf);
+
 
 		// On commit dans tous les cas.
 		// La procedure etant concue pour pouvoir passer plusieurs fois quelquesoit la situation.
@@ -2096,6 +2098,78 @@ function migrate_menus($db,$langs,$conf)
 	print '</td></tr>';
 }
 
+/*
+ * Migration du champ fk_adresse_livraison dans expedition
+ */
+function migrate_commande_deliveryaddress($db,$langs,$conf)
+{
+	dolibarr_install_syslog("upgrade2::migrate_commande_deliveryaddress");
+
+	print '<tr><td colspan="4">';
+
+	print '<br>';
+	print '<b>'.$langs->trans('MigrationDeliveryAddress')."</b><br>\n";
+
+	$error = 0;
+
+	$db->begin();
+
+	$sql = "SELECT c.fk_adresse_livraison, ce.fk_expedition";
+	$sql.= " FROM ".MAIN_DB_PREFIX."commande as c";
+	$sql.= ", ".MAIN_DB_PREFIX."co_exp as ce";
+	$sql.= " WHERE c.rowid = ce.fk_commande";
+	$sql.= " AND c.fk_adresse_livraison IS NOT NULL";
+	
+	$resql = $db->query($sql);
+	if ($resql)
+	{
+		$i = 0;
+		$num = $db->num_rows($resql);
+
+		if ($num)
+		{
+			while ($i < $num)
+			{
+				$obj = $db->fetch_object($resql);
+
+				$sql = "UPDATE ".MAIN_DB_PREFIX."expedition SET";
+				$sql.= " fk_adresse_livraison = '".$obj->fk_adresse_livraison."'";
+				$sql.= " WHERE rowid=".$obj->fk_expedition;
+
+				$resql2=$db->query($sql);
+				if ($resql2)
+				{
+
+				}
+				else
+				{
+					$error++;
+					dol_print_error($db);
+				}
+				print ". ";
+				$i++;
+			}
+
+		}
+
+		if ($error == 0)
+		{
+			$db->commit();
+		}
+		else
+		{
+			$db->rollback();
+		}
+	}
+	else
+	{
+		dol_print_error($db);
+		$db->rollback();
+	}
+
+	print '</td></tr>';
+}
+
 
 /* A faire egalement: Modif statut paye et fk_facture des factures payes completement
 

htdocs/langs/en_US/install.lang

@@ -192,3 +192,6 @@ MigrationStockDetail=Update stock value of products
 
 # Migration menus
 MigrationMenusDetail=Update dynamic menus tables
+
+# Migration delivery address
+MigrationDeliveryAddress=Update delivery address in shipments

htdocs/langs/fr_FR/install.lang

@@ -194,4 +194,5 @@ MigrationStockDetail=Mise a jour valeur en stock des produits
 # Migration menus
 MigrationMenusDetail=Mise a jour table des menus dynamiques
 
-
+# Migration delivery address
+MigrationDeliveryAddress=Mise a jour des adresses de livraison dans les bons d'expedition