details: /erp/erp/devel/pi/rev/35efdf0d2dbb
changeset: 4830:35efdf0d2dbb
user: Vinoth Babu <vinoth.babu <at> openbravo.com>
date: Thu Aug 27 16:18:12 2009 +0530
summary: Commit for changes made according to the module of accruals and
deferrals.
diffstat:
src-db/database/model/functions/FACT_ACCT_RESET.xml | 39 +++++++++++++++++++-
1 files changed, 38 insertions(+), 1 deletions(-)
diffs (56 lines):
diff -r a2cae846cb3e -r 35efdf0d2dbb
src-db/database/model/functions/FACT_ACCT_RESET.xml
--- a/src-db/database/model/functions/FACT_ACCT_RESET.xml Wed Aug 26
15:41:16 2009 +0200
+++ b/src-db/database/model/functions/FACT_ACCT_RESET.xml Thu Aug 27
16:18:12 2009 +0530
@@ -56,7 +56,11 @@
v_factAcctCounter NUMBER:= 0;
c_commitInterval NUMBER:= 1000;
- BEGIN
+
+ v_count NUMBER;
+ v_DocAction VARCHAR2(60);
+ v_UpdatedBy AD_PINSTANCE.UpdatedBy%TYPE;
+ BEGIN
-- Update AD_PInstance
DBMS_OUTPUT.PUT_LINE('Updating PInstance - Processing ' || p_PInstance_ID)
;
v_ResultStr:='PInstanceNotFound';
@@ -256,6 +260,39 @@
-- Summary info
v_Message:='@Updated@ = ' || v_Updated || ', @Deleted@ = ' || v_Deleted;
--<<FINISH_PROCESS>>
+ -- Fact_Acct_Rest - Finish_Process Extension Point
+ SELECT count(*) INTO v_count
+ FROM DUAL
+ where exists (select 1 from ad_ep_procedures where ad_extension_points_id =
'53134730F2B340059ABA16165E9E0D29');
+ IF (v_count=1) THEN
+ DECLARE
+ v_ep_instance VARCHAR(32);
+ v_extension_point_id VARCHAR(32) := '53134730F2B340059ABA16165E9E0D29';
+ 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,
'DocAction',
+ v_DocAction, NULL, NULL, NULL, NULL, NULL, NULL);
+ AD_EP_INSTANCE_PARA_INSERT(v_ep_instance, v_extension_point_id, 'User',
+ v_UpdatedBy, 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;
-- Update AD_PInstance
DBMS_OUTPUT.PUT_LINE('Updating PInstance - Finished ' || v_Message) ;
AD_UPDATE_PINSTANCE(p_PInstance_ID, NULL, 'N', v_Result, v_Message) ;
------------------------------------------------------------------------------
Let Crystal Reports handle the reporting - Free Crystal Reports 2008 30-Day
trial. Simplify your report design, integration and deployment - and focus on
what you do best, core application coding. Discover what's new with
Crystal Reports now. http://p.sf.net/sfu/bobj-july
_______________________________________________
Openbravo-commits mailing list
Openbravo-commits@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/openbravo-commits
