-- @@@ START COPYRIGHT @@@
--
-- Licensed to the Apache Software Foundation (ASF) under one
-- or more contributor license agreements.  See the NOTICE file
-- distributed with this work for additional information
-- regarding copyright ownership.  The ASF licenses this file
-- to you under the Apache License, Version 2.0 (the
-- "License"); you may not use this file except in compliance
-- with the License.  You may obtain a copy of the License at
--
--   http://www.apache.org/licenses/LICENSE-2.0
--
-- Unless required by applicable law or agreed to in writing,
-- software distributed under the License is distributed on an
-- "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
-- KIND, either express or implied.  See the License for the
-- specific language governing permissions and limitations
-- under the License.
--
-- @@@ END COPYRIGHT @@@
-- HL_R2_Triggers_Spec.doc: SPJ enhancements to Triggers
-- Compound statement (CS) with one Insert/Update/Delete as a trigger event
-- and the action is an insert to a table with no triggers.
-- Result: Success

obey TEST_SPJC_FUNC_001(clean_up);
obey TEST_SPJC_FUNC_001(set_up);
log  LOG_SPJC_FUNC_001 clear;
obey TEST_SPJC_FUNC_001(tests);
LOG;
obey TEST_SPJC_FUNC_001(clean_up);
exit;

?section clean_up
set schema CAT1.SCHM;


drop trigger TRIG01_SPJC_FUNC_001;
drop trigger TRIG02_SPJC_FUNC_001;
drop trigger TRIG03_SPJC_FUNC_001;

drop table TAB01_SPJC_FUNC_001;
drop table TAB02_SPJC_FUNC_001;

?section set_up
set schema CAT1.SCHM;

SET ENVVAR ALLOW_CS_IN_SQLCI 1;
CONTROL QUERY DEFAULT POS 'OFF';

create table TAB01_SPJC_FUNC_001(a int, b int, c int, d int);
create table TAB02_SPJC_FUNC_001(a int, b int, c int, d int);

INSERT INTO TAB01_SPJC_FUNC_001 VALUES (1, 2, 3, 4),
				(8, 6, 4, 2),
				(3, 6, 9, 12);

?section tests

------------------------------------------------------------------
-- TEST CASE 01: Row trigger on insert.
-- Result: Success
------------------------------------------------------------------

CREATE TRIGGER TRIG01_SPJC_FUNC_001 AFTER INSERT ON
	TAB01_SPJC_FUNC_001
	REFERENCING NEW ROW AS N
	FOR EACH ROW
		INSERT INTO TAB02_SPJC_FUNC_001 VALUES (N.A, N.B, N.C, N.D);

------------------------------------------------------------------

------------------------------------------------------------------
-- TEST CASE 02: Row trigger on update.
-- Result: Success
------------------------------------------------------------------

CREATE TRIGGER TRIG02_SPJC_FUNC_001 AFTER UPDATE ON
	TAB01_SPJC_FUNC_001
	REFERENCING OLD ROW AS O
	FOR EACH ROW
		INSERT INTO TAB02_SPJC_FUNC_001 VALUES (O.A, O.B, O.C, O.D);

------------------------------------------------------------------

------------------------------------------------------------------
-- TEST CASE 03: Row trigger on delete.
-- Result: Success
------------------------------------------------------------------

CREATE TRIGGER TRIG03_SPJC_FUNC_001 AFTER DELETE ON
	TAB01_SPJC_FUNC_001
	REFERENCING OLD ROW AS O
	FOR EACH ROW
		INSERT INTO TAB02_SPJC_FUNC_001 VALUES (O.A, O.B, O.C, O.D);

------------------------------------------------------------------

-- The tests

BEGIN
--	triggers an insert of new values
	INSERT INTO TAB01_SPJC_FUNC_001 VALUES(101, 201, 301, 401);

--	triggers an insert of old values
	UPDATE TAB01_SPJC_FUNC_001 set a = a + 1000, b = b + 1000,
			c = c + 1000, d = d + 1000 where a = 3;

--	triggers an insert of old values
	DELETE FROM TAB01_SPJC_FUNC_001 where a = 8;
END;

select * from TAB01_SPJC_FUNC_001;

-- Result: TAB01_SPJC_FUNC_002 has three rows
select * from TAB02_SPJC_FUNC_001;
------------------------------------------------------------------
