ad_field_trg.sql

来自「Java写的ERP系统」· SQL 代码 · 共 40 行

SQL
40
字号
CREATE OR REPLACE TRIGGER AD_Field_Trg
AFTER INSERT OR UPDATE OF Name, Description, Help 
	ON AD_Field
FOR EACH ROW
DECLARE
/******************************************************************************
 * ** 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
 ******************************************************************************
 *	Insert AD_Field Trigger 
 *		for Translation 
 */
BEGIN
	IF INSERTING THEN
		INSERT INTO AD_Field_Trl
        	(AD_Field_ID, AD_Language, AD_Client_ID, AD_Org_ID,
	        IsActive, Created, CreatedBy, Updated, UpdatedBy,
    	    Name, Description, Help, IsTranslated)
	    SELECT :new.AD_Field_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';
	END IF;	--	Inserting


	--	AD_Field update trigger
	--		synchronize name,... with Field if not centrally maintained
	IF (UPDATING AND :new.IsCentrallyMaintained='N') THEN
		UPDATE	AD_Field_Trl
		SET		IsTranslated = 'N'
	--			Updated=SysDate
		WHERE	AD_Field_ID = :new.AD_Field_ID;
	END IF;	--	Updating

END AD_Field_Trg;
/

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?