details:   https://code.openbravo.com/erp/devel/pi/rev/c12babe222f6
changeset: 20687:c12babe222f6
user:      Pandeeswari Ramakrishnan <pandeeswari.ramakrishnan <at> 
openbravo.com>
date:      Tue Jul 02 15:11:09 2013 +0530
summary:   Fixes Issue 0024243: You cannot close a completed order.

diffstat:

 src-db/database/model/triggers/C_ORDERLINETAX_TRG.xml |  9 ++++++---
 1 files changed, 6 insertions(+), 3 deletions(-)

diffs (28 lines):

diff -r de1168d2981c -r c12babe222f6 
src-db/database/model/triggers/C_ORDERLINETAX_TRG.xml
--- a/src-db/database/model/triggers/C_ORDERLINETAX_TRG.xml     Tue Jul 02 
12:46:45 2013 +0200
+++ b/src-db/database/model/triggers/C_ORDERLINETAX_TRG.xml     Tue Jul 02 
15:11:09 2013 +0530
@@ -33,6 +33,7 @@
 v_Increment_Amount C_ORDERTAX.TAXAMT%TYPE ;
 v_Increment_Base C_ORDERTAX.TAXBASEAMT%TYPE ;
 v_Processed VARCHAR(60) ;
+v_DocAction VARCHAR(60);
 BEGIN
     
     IF AD_isTriggerEnabled()='N' THEN RETURN;
@@ -96,11 +97,13 @@
       :NEW.UPDATEDBY, :NEW.TAXBASEAMT, :NEW.TAXAMT, v_LineNo);
     END IF;
   ELSE
-    SELECT PROCESSED
-    INTO v_Processed
+    SELECT PROCESSED,
+    DOCACTION
+    INTO v_Processed,
+    v_DocAction
     FROM C_ORDER
     WHERE C_ORDER_ID=v_C_ORDER_ID;
-    IF (v_Processed='Y') THEN
+    IF (v_Processed='Y' AND v_DocAction <> 'CL') THEN
        RAISE_APPLICATION_ERROR(-20000, '@20501@') ;
     END IF;
     UPDATE C_ORDERTAX SET TAXAMT = (CASE WHEN v_DocTaxAmount='D' THEN 
ROUND((TAXBASEAMT - :OLD.TAXBASEAMT) * v_Rate/100, v_Prec) ELSE (TAXAMT - 
:OLD.TAXAMT) END), TAXBASEAMT=TAXBASEAMT - :OLD.TAXBASEAMT

------------------------------------------------------------------------------
This SF.net email is sponsored by Windows:

Build for Windows Store.

http://p.sf.net/sfu/windows-dev2dev
_______________________________________________
Openbravo-commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/openbravo-commits

Reply via email to