(c) Instytut Informatyki Politechniki Poznańskiej
‹#›
(c) Instytut Informatyki Politechniki Poznańskiej
9
Przykład pragmy
CREATE OR REPLACE PACKAGE place AS
  FUNCTION podatek (p_id_prac NUMBER) RETURN NUMBER;
  PRAGMA RESTRICT_REFERENCES(podatek, WNDS, RNDS, WNPS);
  deadlock_detected EXCEPTION;
END;
CREATE OR REPLACE PACKAGE BODY place AS
  FUNCTION podatek (p_id_prac NUMBER) RETURN NUMBER IS
  PRAGMA AUTONOMOUS_TRANSACTION;
  PRAGMA EXCEPTION_INIT(deadlock_detected, -60);
    BEGIN
        -- ciało funkcji
    EXCEPTION
       WHEN deadlock_detected THEN
         -- obsługa błędu
    END podatek;
  ...