More problems on my triggers

Question

Hi there,
See 2 tables, 1insert statement each and a trigger below:
I don't understand y when a factory has ceased to exist, it still allows a records to insert on the 2nd table factory_address for a much more later date
factory.CEASE_TO_EXIST_DATE = '15-JUN-2000'
factory_address.FACTORY_RESIDENCE_DATE = '15-OCT-2002'
CREATE TABLE "FACTORY" (
"FACTORY_ID" NUMBER(3) NOT NULL,
"FACTORY_NAME" VARCHAR2(20 byte) NOT NULL,
"BUDGET" NUMBER(10) NOT NULL,
"ESTABLISHMENT_DATE" DATE NOT NULL,
"CEASE_TO_EXIST_DATE" DATE NULL,
CONSTRAINT "CK_FACTORY_EST_CEASE" CHECK (ESTABLISHMENT_DATE<=CEASE_TO_EXIST_DATE),
CONSTRAINT "PK_FACTORY_FACTORY_ID_1" PRIMARY KEY("FACTORY_ID"));
CREATE TABLE "FACTORY_ADDRESS" (
"FACTORY_ADDRESS_ID" NUMBER(3) NOT NULL,
"FACTORY_RESIDENCE_DATE" DATE NOT NULL,
"FACTORY_ADDRESS1" VARCHAR2(15 byte) NOT NULL,
"FACTORY_ADDRESS2" VARCHAR2(15 byte),
"FACTORY_TOWN" VARCHAR2(15 byte) NOT NULL,
"FACTORY_POST_CODE" VARCHAR2(8 byte) NOT NULL,
"FACTORY_PHONE_NUMBER" VARCHAR2(15 byte) NOT NULL,
"FACTORY_ID" NUMBER(3) NOT NULL,
CONSTRAINT "FK_FACTORY_FACTORY" FOREIGN KEY("FACTORY_ID") REFERENCES "FACTORY"("FACTORY_ID")ON DELETE CASCADE,
CONSTRAINT "PK_FACTORYADDRESS_ID_1" PRIMARY KEY("FACTORY_ADDRESS_ID"));
CREATE OR REPLACE TRIGGER B4_FACTORY_ADDRESS2
BEFORE INSERT ON FACTORY_ADDRESS
for each row
declare R_date date;
BEGIN
select CEASE_TO_EXIST_DATE into R_date from factory
where factory_id = :new.factory_id;
IF :new.FACTORY_RESIDENCE_DATE > R_date THEN
Raise_application_error (-20101,'SORRY THIS FACTORY NO MORE EXIST');
END IF;
END;
INSERT INTO FACTORY VALUES
(500,'LANDERS FACTORY',2200000,'28-JAN-1999', '15-JUN-2000');
INSERT INTO FACTORY_ADDRESS VALUES
(990,'15-OCT-2002','42 ENGLAND WAY', '','LONDON', 'SE15 4ER', '02083319898', 500);
many thanks in advance
cube60

Answer 1

Hi,
I have just run all your DDL, DML statements and trigger behaves as expected. May be the trigger is disabled in your database or you didn't compile it at all. Anyway, I would recreate the whole thing again from scratch.
Regards,
Andrew Velitchko
BrainBench MVP for Developer/2000
http://www.brainbench.com