Bütünlük ve Güvenlik

CREATE TABLE STUDENT (
    SId      INT          NOT NULL,
    SName    VARCHAR(10) NOT NULL,
    MajorId  INT,
    GradYear INT,

    PRIMARY KEY (SId),
    FOREIGN KEY (MajorId) REFERENCES DEPT
        ON DELETE CASCADE
        ON DELETE SET NULL,
    CHECK (SId > 0),          -- Bireysel kayıt kısıtlaması
    CHECK (GradYear >= 1863)  -- Bireysel kayıt kısıtlaması
);

CREATE ASSERTION SmallSections
    CHECK (NOT EXISTS (
        SELECT e.SectionId
        FROM   ENROLL e
        GROUP BY e.SectionId
        HAVING COUNT(e.EId) > 30
    ));

CREATE ASSERTION ValidGradYear
    CHECK (NOT EXISTS (
        SELECT s.*
        FROM   STUDENT s
        WHERE  s.GradYear < 1863
    ));

CREATE ASSERTION NoTakeTwice
    CHECK (NOT EXISTS (
        SELECT e.StudentId, k.CourseId
        FROM   SECTION k, ENROLL e
        WHERE  k.SectId = e.SectionId
        GROUP BY e.StudentId, k.CourseId
        HAVING COUNT(k.SectId) > 1
    ));

CREATE TRIGGER trigger_adi
    {BEFORE | AFTER} {INSERT | DELETE | UPDATE} [OF sutun_adi] ON tablo_adi
    [REFERENCING <eski veya yeni değer alias listesi>]
    [FOR EACH ROW]           -- Eylem her değiştirilen satıra uygulanır
    [WHEN koşul]
    eylem;                    -- Birden fazla ifade için BEGIN...END kullan

CREATE TRIGGER LogGradeChange
    AFTER UPDATE OF Grade ON ENROLL
    REFERENCING OLD ROW AS oldrow, NEW ROW AS newrow
    FOR EACH ROW
    WHEN (oldrow.Grade <> newrow.Grade)   -- Sadece gerçekten değiştiğinde
        INSERT INTO GRADE_LOG(UserName, DateChanged, EId, OldGrade, NewGrade)
        VALUES(CURRENT_USER, CURRENT_DATE, newrow.EId, oldrow.Grade, newrow.Grade);

-- Bir ENROLL kaydı silindiğinde, bağlı SECTION kaydı boş kaldıysa onu da sil
CREATE TRIGGER DeleteEmptySection
    AFTER DELETE ON ENROLL
    REFERENCING OLD ROW AS oldrow
    FOR EACH ROW
    DELETE FROM SECTION
    WHERE  SectId = oldrow.SectionId
    AND    SectId NOT IN (SELECT SectionId FROM ENROLL);

CREATE [OR REPLACE] TRIGGER trigger_adi
    {BEFORE | AFTER} {INSERT | DELETE | UPDATE} [OF sutun_adi] ON tablo_adi
    [REFERENCING OLD AS oldrow NEW AS newrow]
    [FOR EACH ROW]
    [ENABLE / DISABLE]       -- Oracle'a özgü: aktif/pasif
    [WHEN koşul]
BEGIN
    çalıştırılabilir ifadeler;  -- :new.sutun ve :old.sutun kullanımı
END;

CREATE OR REPLACE TRIGGER CommUpdate
    BEFORE UPDATE OF sal ON emp
    FOR EACH ROW
    WHEN (new.sal > 3000)   -- WHEN'de kolon adı iki nokta olmadan
BEGIN
    :new.comm := :old.sal / 20;  -- :new ve :old iki nokta ile
END;

CREATE OR REPLACE TRIGGER DeleteDept
    BEFORE DELETE ON dept
    FOR EACH ROW
BEGIN
    DELETE FROM emp
    WHERE deptno = :old.deptno;  -- Silinen departmanın çalışanlarını sil
END;

-- StudentId ve Grade sütunları gizli tutulur (dean ve professor'a özel)
GRANT SELECT (StudentId, Grade) ON ENROLL TO dean, professor;

-- EId ve SectionId herkese açık
GRANT SELECT (EId, SectionId) ON ENROLL TO PUBLIC;

-- Professor sadece Grade sütununu güncelleyebilir
GRANT UPDATE (Grade) ON ENROLL TO professor;

-- Admissions sadece SName ve MajorId ekleyebilir
GRANT INSERT (SName, MajorId) ON STUDENT TO admissions;

-- admissions hem INSERT yapabilir hem de başkasına INSERT yetkisi verebilir
GRANT INSERT ON STUDENT TO admissions WITH GRANT OPTION;