Ñêðèïò cr_trg.sql

-- *********************************************************************
-- Name: cr_trg.sql
-- Purpose:
-- Author: Vladimir Begun
-- $Id$
-- TODO: XXX

CREATE OR REPLACE TRIGGER trg$code_name
BEFORE DELETE
ON code_name
DECLARE
e_delete_prohibited CONSTANT NUMBER := -20001;
e_delete_prohibited_msg CONSTANT VARCHAR2(38) :=
'DELETE against CODE_NAME is prohibited';
BEGIN
RAISE_APPLICATION_ERROR(e_delete_prohibited, e_delete_prohibited_msg);
END trg$code_name;
/
SHOW ERR