details:   https://code.openbravo.com/erp/devel/pi/rev/13592cad431f
changeset: 21334:13592cad431f
user:      Gorka Ion Damián <gorkaion.damian <at> openbravo.com>
date:      Mon Oct 21 11:09:29 2013 +0200
summary:   Fixed issue 24975.Added extension point to Movement Post

diffstat:

 src-db/database/model/functions/M_MOVEMENT_POST.xml |  40 +++++++++++++++++++-
 src-db/database/sourcedata/AD_EXTENSION_POINTS.xml  |  10 +++++
 2 files changed, 48 insertions(+), 2 deletions(-)

diffs (81 lines):

diff -r 7194ff6bfb76 -r 13592cad431f 
src-db/database/model/functions/M_MOVEMENT_POST.xml
--- a/src-db/database/model/functions/M_MOVEMENT_POST.xml       Wed Oct 16 
20:27:37 2013 +0530
+++ b/src-db/database/model/functions/M_MOVEMENT_POST.xml       Mon Oct 21 
11:09:29 2013 +0200
@@ -230,12 +230,47 @@
             )
             ;
           M_Check_Stock(Cur_MoveLine.M_Product_ID, v_Client_ID, v_Org_ID, 
v_Result, v_Message) ;
-          IF v_Result=0 THEN
-                       RAISE_APPLICATION_ERROR(-20000, v_Message||' 
'||'@line@'||' '||Cur_MoveLine.line) ;
+          
+          IF (v_Result = 0) THEN
+            RAISE_APPLICATION_ERROR(-20000, v_Message||' '||'@line@'||' 
'||Cur_MoveLine.line) ;
           END IF;
         END LOOP;
       END; -- FOR COMMIT
     END IF;--END_PROCESS
+    --M_Movement_Post - Finish_Process Extension Point
+    --Extension point at the end of the M_Inout_Post. It has 5 available 
parameters Record_ID, DocAction, User, Message and Result
+    SELECT count(*) INTO v_count
+    FROM DUAL
+    where exists (select 1 from ad_ep_procedures where ad_extension_points_id 
= 'FB653E9B971343B3989222ECD5B73A72');
+    IF (v_count=1) THEN
+      DECLARE
+        v_ep_instance VARCHAR2(32);
+        v_extension_point_id VARCHAR2(32) := 
'FB653E9B971343B3989222ECD5B73A72';
+      BEGIN
+        v_ep_instance := get_uuid();
+        AD_EP_INSTANCE_PARA_INSERT(v_ep_instance, v_extension_point_id, 
'Record_ID',
+          v_record_id, NULL, NULL, NULL, NULL, NULL, NULL);
+        AD_EP_INSTANCE_PARA_INSERT(v_ep_instance, v_extension_point_id, 'User',
+          v_p_User, NULL, NULL, NULL, NULL, NULL, NULL);
+        AD_EP_INSTANCE_PARA_INSERT(v_ep_instance, v_extension_point_id, 
'Message',
+          NULL, NULL, NULL, NULL, NULL, NULL, v_Message);
+        AD_EP_INSTANCE_PARA_INSERT(v_ep_instance, v_extension_point_id, 
'Result',
+          NULL, NULL, v_Result, NULL, NULL, NULL, NULL);
+        AD_EXTENSION_POINT_HANDLER(v_ep_instance, v_extension_point_id);
+        SELECT p_number INTO v_Result
+        FROM ad_ep_instance_para
+        WHERE ad_ep_instance_id = v_ep_instance
+          AND parametername LIKE 'Result';
+        SELECT p_text INTO v_Message
+        FROM ad_ep_instance_para
+        WHERE ad_ep_instance_id = v_ep_instance
+          AND parametername LIKE 'Message';
+
+        DELETE FROM ad_ep_instance_para
+        WHERE ad_ep_instance_id = v_ep_instance;
+      END;
+    END IF;
+
     IF(NOT END_PROCESS) THEN
       -- End Processing 
--------------------------------------------------------
       --<<END_PROCESSING>>
@@ -246,6 +281,7 @@
     --<<END_PROCESS>>
     v_ResultStr:='UnLockingMovement';
     UPDATE M_Movement  SET Processing='N'  WHERE M_Movement_ID=v_Record_ID;
+
     --  Update AD_PInstance
     DBMS_OUTPUT.PUT_LINE('Updating PInstance - Finished ' || v_Message) ;
     AD_UPDATE_PINSTANCE(PInstance_ID, v_p_User, 'N', v_Result, v_Message) ;
diff -r 7194ff6bfb76 -r 13592cad431f 
src-db/database/sourcedata/AD_EXTENSION_POINTS.xml
--- a/src-db/database/sourcedata/AD_EXTENSION_POINTS.xml        Wed Oct 16 
20:27:37 2013 +0530
+++ b/src-db/database/sourcedata/AD_EXTENSION_POINTS.xml        Mon Oct 21 
11:09:29 2013 +0200
@@ -110,6 +110,16 @@
 <!--CBE7DD2E561E4D3D8257ECEA5F19687F-->  <ISACTIVE><![CDATA[Y]]></ISACTIVE>
 <!--CBE7DD2E561E4D3D8257ECEA5F19687F--></AD_EXTENSION_POINTS>
 
+<!--FB653E9B971343B3989222ECD5B73A72--><AD_EXTENSION_POINTS>
+<!--FB653E9B971343B3989222ECD5B73A72-->  
<AD_EXTENSION_POINTS_ID><![CDATA[FB653E9B971343B3989222ECD5B73A72]]></AD_EXTENSION_POINTS_ID>
+<!--FB653E9B971343B3989222ECD5B73A72-->  
<AD_CLIENT_ID><![CDATA[0]]></AD_CLIENT_ID>
+<!--FB653E9B971343B3989222ECD5B73A72-->  <AD_ORG_ID><![CDATA[0]]></AD_ORG_ID>
+<!--FB653E9B971343B3989222ECD5B73A72-->  <NAME><![CDATA[M_Movement_Post - 
Finish_Process Extension Point]]></NAME>
+<!--FB653E9B971343B3989222ECD5B73A72-->  <DESCRIPTION><![CDATA[Extension Point 
at the end of the M_Movement_Post procedure.  It has 4 available parameters 
Record_ID, User, Message and Result.]]></DESCRIPTION>
+<!--FB653E9B971343B3989222ECD5B73A72-->  
<AD_MODULE_ID><![CDATA[0]]></AD_MODULE_ID>
+<!--FB653E9B971343B3989222ECD5B73A72-->  <ISACTIVE><![CDATA[Y]]></ISACTIVE>
+<!--FB653E9B971343B3989222ECD5B73A72--></AD_EXTENSION_POINTS>
+
 <!--FF80818132FC38BB0132FC8B43AE000D--><AD_EXTENSION_POINTS>
 <!--FF80818132FC38BB0132FC8B43AE000D-->  
<AD_EXTENSION_POINTS_ID><![CDATA[FF80818132FC38BB0132FC8B43AE000D]]></AD_EXTENSION_POINTS_ID>
 <!--FF80818132FC38BB0132FC8B43AE000D-->  
<AD_CLIENT_ID><![CDATA[0]]></AD_CLIENT_ID>

------------------------------------------------------------------------------
October Webinars: Code for Performance
Free Intel webinars can help you accelerate application performance.
Explore tips for MPI, OpenMP, advanced profiling, and more. Get the most from 
the latest Intel processors and coprocessors. See abstracts and register >
http://pubads.g.doubleclick.net/gampad/clk?id=60135031&iu=/4140/ostg.clktrk
_______________________________________________
Openbravo-commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/openbravo-commits

Reply via email to