...

SubProject/FEQ0000/Purchase/fPurchase_Add.cs

@@ -670,6 +670,7 @@ namespace FEQ0000
             dr.pumunit = tbPumUnit.Text;
 
             dr.supply = tbSupply.Text;
+            dr.place = tbStorage.Text;
 
             if (tbSupplyIndex.Text == "") dr.SetsupplyidxNull();
             else dr.supplyidx = int.Parse(tbSupplyIndex.Text);