Schema level tiggers

Question

hi all,
is it possible to write a schema level trigger with DCL and DDL commands in it.
Actually in my database there are more than one (X & Y)schemas with differnt privelages.
if i create a table in ' X'schema,i have to create a synonym for the same table for the other schema 'Y' and i want to grant select privelage for that table for 'Y' .my verison is 10204
create or replace
TRIGGER bcs_trigger
after  create ON X.SCHEMA
declare
Cursor table_cur is
Select object_id, object_name, object_type, owner
from DBA_OBJECTS
where to_date(created,'DD/MM/YYYY')= to_date(SYSDATE,'DD/MM/YYYY');
  type TABLE_collect is table of table_cur %rowtype;
TACOLL TABLE_collect;
v_msg varchar2(1000) := 'SYNONYM HAS BEEN CREATED';
V_error varchar2(1000) := 'ALREADY EXIST';
BEGIN
open table_cur;
loop
          fetch table_cur bulk collect into TACOLL;
           exit when table_cur %notfound;
           end loop;
           close table_cur;
for i in 1.. TACOLL.count
loop
IF
TACOLL(i). OBJECT_TYPE ='TABLE'
THEN
execute immediate 'create synonym '||TACOLL(i).OBJECT_NAME||' for '||TACOLL(i).OBJECT_NAME;
execute immediate 'grant select on '||TACOLL(i).OBJECT_NAME||' to Y ';
dbms_output.put_line ('v_msg');
end if;
end loop;
end ;

Answer 1

Hi Suresh.
Welcome to OTN Forums!
I think this help you
CREATE OR REPLACE TRIGGER bcs_trigger AFTER
CREATE ON X.SCHEMA
  DECLARE
    V_MSG VARCHAR2(1000) := 'SYNONYM HAS BEEN CREATED';
  BEGIN
    FOR OBJ IN
    (SELECT object_id,
      object_name,
      object_type,
      owner
    FROM DBA_OBJECTS
    WHERE TO_DATE(CREATED,'DD/MM/YYYY')= TO_DATE(SYSDATE,'DD/MM/YYYY'))
    LOOP
      IF OBJ.OBJECT_TYPE = 'TABLE' THEN
        EXECUTE IMMEDIATE 'create or replace synonym '||OBJ.OBJECT_NAME||' for '||OBJ.OBJECT_NAME;
        EXECUTE IMMEDIATE 'grant select on '||OBJ.OBJECT_NAME||' to Y ';
        dbms_output.put_line (V_MSG|| ' : ' ||OBJ_OBJECT_NAME);
      END IF;
    END LOOP;
  END ;