355:
356: begin
357:
358: if ROOT_STMT = 'create' then
359: STMT_TYPE := ad_ddl.create_trigger;
360: elsif ROOT_STMT = 'alter' then
361: STMT_TYPE := ad_ddl.alter_trigger;
362: elsif ROOT_STMT = 'drop' then
363: STMT_TYPE := ad_ddl.drop_trigger;
357:
358: if ROOT_STMT = 'create' then
359: STMT_TYPE := ad_ddl.create_trigger;
360: elsif ROOT_STMT = 'alter' then
361: STMT_TYPE := ad_ddl.alter_trigger;
362: elsif ROOT_STMT = 'drop' then
363: STMT_TYPE := ad_ddl.drop_trigger;
364: else
365: -- Need to provide an error message here.
359: STMT_TYPE := ad_ddl.create_trigger;
360: elsif ROOT_STMT = 'alter' then
361: STMT_TYPE := ad_ddl.alter_trigger;
362: elsif ROOT_STMT = 'drop' then
363: STMT_TYPE := ad_ddl.drop_trigger;
364: else
365: -- Need to provide an error message here.
366: APP_EXCEPTION.RAISE_EXCEPTION;
367: end if;
439:
440: ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~*/
441:
442: if ROOT_STMT = 'create' then
443: AD_DDL.create_trigger_in_schema(TARGET_SCHEMA, SQLSTMT);
444: else
445: AD_DDL.do_ddl (alr_dbtrigger.APPLSYS_SCHEMA,
446: alr_dbtrigger.TARGET_APPL_SHORT_NAME,
447: STMT_TYPE,
441:
442: if ROOT_STMT = 'create' then
443: AD_DDL.create_trigger_in_schema(TARGET_SCHEMA, SQLSTMT);
444: else
445: AD_DDL.do_ddl (alr_dbtrigger.APPLSYS_SCHEMA,
446: alr_dbtrigger.TARGET_APPL_SHORT_NAME,
447: STMT_TYPE,
448: SQLSTMT,
449: OBJECT_NAME);
526: -- Ignore...
527: NULL;
528:
529: when others then
530: -- dbms_output.put_line( 'Error calling AD_DDL.do_ddl' );
531: -- dbms_output.put_line( sqlerrm );
532: raise;
533:
534: end DROP_EVENT_DB_TRIGGER;