c_project_trg2.sql

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

CREATE OR REPLACE TRIGGER C_Project_Trg2
BEFORE UPDATE
	ON C_Project
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
 ******************************************************************************
 *	Recalculate Totals
 **/
	v_Count					NUMBER;
BEGIN
 	SELECT	COUNT(*)
	  INTO	v_Count
   	FROM	C_ProjectLine
	WHERE	C_Project_ID=:new.C_Project_ID;

	IF (v_Count > 0) THEN
		--	Update Summary Info
		SELECT 	SUM(PlannedAmt), SUM(PlannedQty),
				SUM(PlannedMarginAmt), SUM(CommittedAmt), SUM(ActualAmt)
		  INTO 	:new.PlannedAmt, :new.PlannedQty, 
				:new.PlannedMarginAmt, :new.CommittedAmt, :new.ActualAmt
		FROM C_ProjectLine 
		WHERE C_Project_ID=:new.C_Project_ID;
	END IF;
	
END C_Project_Trg2;
/