details: /erp/devel/pi/rev/661f42233527
changeset: 8538:661f42233527
user: Mikel Irurita <mikel.irurita <at> openbravo.com>
date: Thu Oct 14 18:28:57 2010 +0200
summary: Related to issue 14864: verify if alternative financial flow is
implemented
diffstat:
src-db/database/model/functions/MRP_PURCHASEORDER.xml | 11 ++++++++++-
1 files changed, 10 insertions(+), 1 deletions(-)
diffs (35 lines):
diff -r 55a1e97b8109 -r 661f42233527
src-db/database/model/functions/MRP_PURCHASEORDER.xml
--- a/src-db/database/model/functions/MRP_PURCHASEORDER.xml Thu Oct 14
16:20:02 2010 +0200
+++ b/src-db/database/model/functions/MRP_PURCHASEORDER.xml Thu Oct 14
18:28:57 2010 +0200
@@ -51,6 +51,8 @@
v_PriceStd NUMBER;
v_TaxId varchar2(32);
v_ProductName NVARCHAR2(90);
+ v_IsAPRMinstalled NUMBER;
+ v_DefaultPaymentRule VARCHAR2(60):=null;
v_Count NUMBER;
@@ -133,6 +135,13 @@
AND ISBILLTO='Y'
AND C_BPARTNER_ID=Cur_workproposal.C_BPARTNER_ID;
+ SELECT COUNT(1) INTO v_IsAPRMinstalled
+ FROM ad_preference
+ WHERE property = 'FinancialManagement' AND ad_module_id <> '0';
+ IF (v_IsAPRMinstalled > 0) THEN
+ v_DefaultPaymentRule := 'P';
+ END IF;
+
INSERT INTO C_Order
(C_ORDER_ID, AD_CLIENT_ID, AD_ORG_ID, ISACTIVE,
CREATED, CREATEDBY, UPDATED, UPDATEDBY,
@@ -150,7 +159,7 @@
'N', v_DocumentNo, 'DR', 'CO','N',
v_CDocTypeID, v_CDocTypeID, v_Description,
v_DateDoc,v_DateDoc, Cur_workproposal.C_BPartner_ID,v_BillTo_ID,
- v_BPartner_Location_ID, Cur_workproposal.C_Currency_ID,
COALESCE(Cur_workproposal.paymentrule, 'P'), Cur_workproposal.C_PAYMENTTERM_ID,
+ v_BPartner_Location_ID, Cur_workproposal.C_Currency_ID,
COALESCE(Cur_workproposal.paymentrule, v_DefaultPaymentRule),
Cur_workproposal.C_PAYMENTTERM_ID,
'D', 'A', 'I',COALESCE(Cur_workproposal.DeliveryViaRule,'D'),
'5',0,0,
v_M_Warehouse_ID, Cur_workproposal.PO_PRICELIST_ID, 'N', v_DateDoc,
------------------------------------------------------------------------------
Beautiful is writing same markup. Internet Explorer 9 supports
standards for HTML5, CSS3, SVG 1.1, ECMAScript5, and DOM L2 & L3.
Spend less time writing and rewriting code and more time creating great
experiences on the web. Be a part of the beta today.
http://p.sf.net/sfu/beautyoftheweb
_______________________________________________
Openbravo-commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/openbravo-commits
