details: https://code.openbravo.com/erp/devel/pi/rev/d3245331b58a
changeset: 17780:d3245331b58a
user: Naiara Martinez <naiara.martinez <at> openbravo.com>
date: Mon Aug 06 10:13:25 2012 +0200
summary: fixed bug 21267:Not insert in m_storage_pending for stocked=N product
Contribution from eintelau
diffstat:
src-db/database/model/triggers/C_ORDERLINE2_TRG.xml | 20 ++++++++++++++++++--
1 files changed, 18 insertions(+), 2 deletions(-)
diffs (37 lines):
diff -r de3d99d64d0c -r d3245331b58a
src-db/database/model/triggers/C_ORDERLINE2_TRG.xml
--- a/src-db/database/model/triggers/C_ORDERLINE2_TRG.xml Tue Aug 28
09:18:58 2012 +0200
+++ b/src-db/database/model/triggers/C_ORDERLINE2_TRG.xml Mon Aug 06
10:13:25 2012 +0200
@@ -80,7 +80,15 @@
v_QtyReservedPO := -:old.qtyordered;
v_QtyOrderReservedPO := -:old.quantityorder;
END IF;
- M_UPDATE_STORAGE_PENDING(:old.AD_Client_ID, :old.AD_Org_ID,
:old.UpdatedBy, :old.M_Product_ID, :old.M_Warehouse_ID,
:old.M_AttributeSetInstance_ID, :old.C_UOM_ID, :old.M_Product_UOM_ID,
v_QtyReserved, v_QtyOrderReserved, v_QtyReservedPO, v_QtyOrderReservedPO);
+ SELECT COUNT(*)
+ INTO V_STOCKED
+ FROM M_PRODUCT
+ WHERE M_Product_ID=:old.M_PRODUCT_ID
+ AND IsStocked='Y'
+ AND ProductType='I';
+ IF V_STOCKED > 0 THEN
+ M_UPDATE_STORAGE_PENDING(:old.AD_Client_ID, :old.AD_Org_ID,
:old.UpdatedBy, :old.M_Product_ID, :old.M_Warehouse_ID,
:old.M_AttributeSetInstance_ID, :old.C_UOM_ID, :old.M_Product_UOM_ID,
v_QtyReserved, v_QtyOrderReserved, v_QtyReservedPO, v_QtyOrderReservedPO);
+ END IF;
END IF;
END IF;
@@ -102,7 +110,15 @@
v_QtyReservedPO := :new.qtyordered;
v_QtyOrderReservedPO := :new.quantityorder;
END IF;
- M_UPDATE_STORAGE_PENDING(:new.AD_Client_ID, :new.AD_Org_ID,
:new.UpdatedBy, :new.M_Product_ID, :new.M_Warehouse_ID,
:new.M_AttributeSetInstance_ID, :new.C_UOM_ID, :new.M_Product_UOM_ID,
v_QtyReserved, v_QtyOrderReserved, v_QtyReservedPO, v_QtyOrderReservedPO);
+ SELECT COUNT(*)
+ INTO V_STOCKED
+ FROM M_PRODUCT
+ WHERE M_Product_ID=:NEW.M_PRODUCT_ID
+ AND IsStocked='Y'
+ AND ProductType='I';
+ IF V_STOCKED > 0 THEN
+ M_UPDATE_STORAGE_PENDING(:new.AD_Client_ID, :new.AD_Org_ID,
:new.UpdatedBy, :new.M_Product_ID, :new.M_Warehouse_ID,
:new.M_AttributeSetInstance_ID, :new.C_UOM_ID, :new.M_Product_UOM_ID,
v_QtyReserved, v_QtyOrderReserved, v_QtyReservedPO, v_QtyOrderReservedPO);
+ END IF;
END IF;
END IF;
------------------------------------------------------------------------------
Live Security Virtual Conference
Exclusive live event will cover all the ways today's security and
threat landscape has changed and how IT managers can respond. Discussions
will include endpoint security, mobile security and the latest in malware
threats. http://www.accelacomm.com/jaw/sfrnl04242012/114/50122263/
_______________________________________________
Openbravo-commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/openbravo-commits
