ad_workflow_trg.sql

Java写的ERP系统

CREATE OR REPLACE TRIGGER AD_Workflow_Trg
AFTER INSERT OR UPDATE OF Name, Description, Help
	ON AD_Workflow
FOR EACH ROW
/******************************************************************************
 * ** Compiere Product **             Copyright (c) 1999-2001 Accorto, Inc. USA
 * Open  Source  Software        Provided "AS IS" without warranty or liability
 * When you use any parts (changed or unchanged), add  "Powered by Compiere" to
 * your product name;  See license details http://www.compiere.org/license.html
 ******************************************************************************
 */
BEGIN
	--	Insert AD_Workflow Trigger 
	--		for Translation 
	--		Access
	IF INSERTING THEN
    	--  Create Translation Row
	    INSERT INTO AD_Workflow_Trl
    	    (AD_Workflow_ID, AD_Language, AD_Client_ID, AD_Org_ID,
        	IsActive, Created, CreatedBy, Updated, UpdatedBy,
	        Name, Description, Help, IsTranslated)
    	SELECT :new.AD_Workflow_ID, AD_Language, :new.AD_Client_ID, :new.AD_Org_ID,
        	:new.IsActive, :new.Created, :new.CreatedBy, :new.Updated, :new.UpdatedBy,
	        :new.Name, :new.Description, :new.Help, 'N'
    	FROM    AD_Language
	   	WHERE	IsActive = 'Y' AND IsSystemLanguage = 'Y';
		--	Access for all
	   INSERT INTO AD_WorkFlow_Access
			(AD_WorkFlow_ID, AD_Role_ID, 
			AD_Client_ID, AD_Org_ID, IsActive, Created, CreatedBy, Updated, UpdatedBy, IsReadWrite)
		SELECT :new.AD_WorkFlow_ID, r.AD_Role_ID,
			r.AD_CLIENT_ID, r.AD_ORG_ID, 'Y', SysDate, 0, SysDate, 0, 'Y'
		FROM 	AD_Role r;
	END IF;	--	Inserting

	--	AD_Workflow update trigger
	--		synchronize name,... 
	IF UPDATING THEN
		UPDATE	AD_Workflow_Trl
		SET		IsTranslated = 'N',
				Updated=SysDate
		WHERE	AD_Workflow_ID = :new.AD_Workflow_ID;
	END IF;	--	Updating

END AD_Workflow_Trg;
/