informed_town_crier.sql

来自「OReilly Oracle PL SQL Programming第4版源代码」· SQL 代码 · 共 35 行

CREATE OR REPLACE TRIGGER town_crier
AFTER CREATE ON SCHEMA
BEGIN
  -- use event attributes to provide more info
  DBMS_OUTPUT.PUT_LINE('I believe you have created a ' ||
                       ORA_DICT_OBJ_TYPE || ' called ' ||
                       ORA_DICT_OBJ_NAME);
END;
/

SET SERVEROUTPUT ON
DROP TABLE a_table;
CREATE TABLE a_table
(col1 NUMBER);

CREATE INDEX an_index ON a_table(col1);

DROP FUNCTION a_function;
CREATE FUNCTION a_function RETURN BOOLEAN AS
BEGIN
  RETURN(TRUE);
END;
/

/*-- a CRLF to flush DBMS_OUTPUTs buffer */
EXEC DBMS_OUTPUT.PUT_LINE(CHR(10));


/*======================================================================
| Supplement to the third edition of Oracle PL/SQL Programming by Steven
| Feuerstein with Bill Pribyl, Copyright (c) 1997-2002 O'Reilly &
| Associates, Inc. To submit corrections or find more code samples visit
| http://www.oreilly.com/catalog/oraclep3/
*/