/********************************************************************************
 *
 * Program Name:	AU_GLSYSTEM.SQL
 *
 * Program Description: MAINTAIN COMPANY NAMES IN AP/GL/PO
 *
 * Author:              JOHN EISENSCHMIDT <jeisenschmidt@feldinc.com>
 *
 * Date:                2005-06-28 - Created
 *			2005-06-30 - Added update to TXCOMPANY [JE]
 *			2005-07-01 - Only fires on updates to NAME Column [JE]
 *
 ********************************************************************************/
IF EXISTS (
	SELECT NAME
	FROM SYSOBJECTS
	WHERE NAME='AU_GLSYSTEM'
) DROP TRIGGER AU_GLSYSTEM
GO
CREATE TRIGGER AU_GLSYSTEM ON GLSYSTEM AFTER UPDATE AS 
BEGIN
	--COLUMN 2 IS NAME, ONLY FIRE ON UPDATES TO NAME
	IF (COLUMNS_UPDATED() = 0x02)
	BEGIN
		UPDATE APCOMPANY
		SET NAME = (
			SELECT NAME
			FROM GLSYSTEM
			WHERE APCOMPANY.COMPANY=GLSYSTEM.COMPANY
		)
		UPDATE POCOMPANY
		SET NAME = (
			SELECT NAME
			FROM GLSYSTEM
			WHERE POCOMPANY.COMPANY=GLSYSTEM.COMPANY
		)
		UPDATE TXCOMPANY
		SET NAME = (
			SELECT NAME
			FROM GLSYSTEM
			WHERE TXCOMPANY.COMPANY=GLSYSTEM.COMPANY
		)
	END	--END THE TEST
END	--END THE TRIGGER