-- @@@ 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 @@@
-- tentative execution of before triggers


------------------------------------------------------------------
-- SET ENVIRONMENT
------------------------------------------------------------------


obey TEST_4_2_2(clean_up);
log   LOG_4_2_2 clear;
obey TEST_4_2_2(set_up);
obey TEST_4_2_2(tests);
LOG;
obey TEST_4_2_2(clean_up);
exit;

?section clean_up
set schema CAT1.SCHM;
DROP TRIGGER btrig4;
DROP TRIGGER atrig41;
DROP TRIGGER atrig42;
------------------------------------------------------------------
obey clearTables;

?section set_up
INSERT INTO tab1A VALUES (1,2,3,4);
INSERT INTO tab1A VALUES (2,3,4,5);

---------------------------------
-- DEFINE TRIGGER btrig4
---------------------------------

CREATE TRIGGER btrig4
BEFORE UPDATE
ON tab1A
REFERENCING NEW AS newR 
FOR EACH ROW
SET newR.c = newR.a + newR.b;



---------------------------------
-- DEFINE TRIGGER atrig42
---------------------------------

CREATE TRIGGER atrig42
AFTER UPDATE OF (c)
ON tab1A
REFERENCING OLD AS oldR, NEW AS newR
FOR EACH ROW
WHEN (newR.c = newR.a + newR.b)
INSERT INTO tab1B VALUES (newR.a, oldR.d); 


---------------------------------
-- DEFINE TRIGGER atrig41
---------------------------------

CREATE TRIGGER atrig41
AFTER UPDATE ON tab1A
REFERENCING NEW AS newR
FOR EACH ROW
UPDATE tab1B SET b=newR.d; 



?section tests

------------------------------------------------------------------
--          TEST CASE
------------------------------------------------------------------

UPDATE tab1A SET b=10, d=4;

SELECT * FROM tab1A; -- check result

SELECT * FROM tab1B; -- check result

------------------------------------------------------------------
--           END
------------------------------------------------------------------
