CREATE OR REPLACE TRIGGER DTCADAFORN_FORN
BEFORE INSERT ON FORNECEDOR FOR EACH ROW
BEGIN
    IF INSERTING THEN
        :NEW.DTCADAFORN := SYSDATE;
    END IF;
END;
/