-- @@@ 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
-- Result: Error

obey TEST_SPJC_STX_008(clean_up);
obey TEST_SPJC_STX_008(set_up);
LOG LOG_SPJC_STX_008 clear;
obey TEST_SPJC_STX_008(tests);
LOG;
obey TEST_SPJC_STX_008(clean_up);
exit;

?section clean_up
set schema CAT1.SCHM;
drop trigger TRIG01_SPJC_STX_008;
drop trigger TRIG02_SPJC_STX_008;

drop table TAB01_SPJC_STX_008;
drop table TAB02_SPJC_STX_008;

?section set_up
SET SCHEMA CAT1.SCHM;

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

create table TAB01_SPJC_STX_008(a int, b int, c int, d int);
create table TAB02_SPJC_STX_008(a int, b int, c int, d int);

INSERT INTO TAB01_SPJC_STX_008 VALUES (1,2,3,4),
			(2,3,4,5),
			(100,101,102,103);

set param ?p1 1001;
set param ?p2 2001;
set param ?p3 4001;
set param ?p4 5001;

?section tests

------------------------------------------------------------------
-- TEST CASE 01: Row trigger with a CALL triggered action with host
-- variable/paramter
-- Result: Error
------------------------------------------------------------------

CREATE TRIGGER TRIG01_SPJC_STX_008 AFTER DELETE ON
TAB01_SPJC_STX_008
REFERENCING OLD ROW AS O
FOR EACH ROW
	CALL InsertFourCoulmns('CAT1.SCHM.TAB02_SPJC_STX_008',
		:p1, :p2, :p3, :p4);

------------------------------------------------------------------
-- TEST CASE 02: Statement trigger with a CALL triggered action with host
-- variable/paramter
-- Result: Error
------------------------------------------------------------------
CREATE TRIGGER TRIG02_SPJC_STX_008 AFTER UPDATE ON
TAB01_SPJC_STX_008 REFERENCING NEW TABLE AS NT, OLD TABLE AS OT
FOR EACH STATEMENT
	CALL InsertFourCoulmns('CAT1.SCHM.TAB02_SPJC_STX_008',
		:p4, :p3, :p2, :p1);
------------------------------------------------------------------
