MINI MINI MANI MO

Rem
Rem $Header: sdo/admin/seme102.sql /main/8 2017/05/26 16:34:19 rjanders Exp $
Rem
Rem seme102.sql
Rem
Rem Copyright (c) 2007, 2017, Oracle and/or its affiliates. 
Rem All rights reserved.
Rem
Rem    NAME
Rem      seme102.sql - <one-line expansion of the name>
Rem
Rem    DESCRIPTION
Rem      <short description of component this file declares/defines>
Rem
Rem    NOTES
Rem      <other useful comments, qualifications, etc.>
Rem
Rem    BEGIN SQL_FILE_METADATA
Rem    SQL_SOURCE_FILE: sdo/admin/seme102.sql
Rem    SQL_SHIPPED_FILE: md/admin/seme102.sql
Rem    SQL_PHASE: DOWNGRADE 
Rem    SQL_STARTUP_MODE: NORMAL
Rem    SQL_IGNORABLE_ERRORS: NONE 
Rem    SQL_CALLING_FILE: NONE 
Rem    END SQL_FILE_METADATA
Rem    
Rem    MODIFIED   (MM/DD/YY)
Rem    rjanders    05/10/17 - #26037683: Raise 'when other' exceptions
Rem    rjanders    03/23/17 - #25437999: Remove 'when others then NULL'
Rem                           handlers
Rem    rjanders    03/15/13 - #16473696: Start/End _ORACLE_SCRIPT
Rem                           initialization
Rem    vkolovsk    09/03/08 - need to drop sameas related packages and types
Rem    sdas        06/17/07 - drop upgrade package if present
Rem    sdas        06/15/07 - drop sdo_sem_downgrade_utl
Rem    alwu        06/01/07 - add logic to remove 11g downgrade package
Rem    sdas        05/24/07 - Semantic Store downgrade
Rem    sdas        05/24/07 - Created
Rem

Rem ********************************************************************
Rem #16473696: Indicate Oracle-Supplied object
@@?/rdbms/admin/sqlsessstart.sql
Rem ********************************************************************

ALTER SESSION SET CURRENT_SCHEMA = MDSYS;

declare
  stmt VARCHAR2(1000);
  trigger_not_found exception;
  pragma exception_init(trigger_not_found, -04080);
  table_not_found exception;
  pragma exception_init(table_not_found, -00942);
  object_not_found exception;
  pragma exception_init(object_not_found, -04043);
  sequence_not_found exception;
  pragma exception_init(sequence_not_found, -02289);
  synonym_not_found exception;
  pragma exception_init(synonym_not_found, -01432);
  indextype_not_found exception;
  pragma exception_init(indextype_not_found, -29833);
  operator_not_found exception;
  pragma exception_init(operator_not_found, -29807);
  dependent_objects exception;
  pragma exception_init(dependent_objects, -02303);
begin
   begin
      stmt := 'drop type sdo_sem_stats force'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')1]: ' || SQLERRM); -- RAISE;
   end;
 
   begin
      stmt := 'drop indextype sem_indextype force';  execute immediate stmt;
      exception
        when indextype_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')2]: ' || SQLERRM); -- RAISE;
    end;

   begin
      stmt := 'drop public synonym sem_path'; execute immediate stmt;
      exception
        when synonym_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')3]: ' || SQLERRM); -- RAISE;
    end;

   begin
      stmt := 'drop operator sem_path force'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when operator_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')4]: ' || SQLERRM); -- RAISE;
    end;

   begin
      stmt := 'drop public synonym sem_distance'; execute immediate stmt;
      exception
        when synonym_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')5]: ' || SQLERRM); -- RAISE;
    end;

   begin
      stmt := 'drop operator sem_distance force'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when operator_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')6]: ' || SQLERRM); -- RAISE;
    end;

   begin
      stmt := 'drop public synonym sem_related'; execute immediate stmt;
      exception
        when synonym_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')7]: ' || SQLERRM); -- RAISE;
    end;

   begin
      stmt := 'drop operator sem_related force'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when operator_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')8]: ' || SQLERRM); -- RAISE;
    end;

   begin
      stmt := 'drop package sdo_sem_operator'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')9]: ' || SQLERRM); -- RAISE;
    end;

   begin
      stmt := 'drop type sem_sameas_list force';  execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')10]: ' || SQLERRM); -- RAISE;
   end;

   begin
      stmt := 'drop type sem_sameas_rec force';  execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')11]: ' || SQLERRM); -- RAISE;
    end;

   begin
      stmt := 'drop type sem_indextype_im force';  execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')12]: ' || SQLERRM); -- RAISE;
    end;

   begin
      stmt := 'drop type sdo_bt_handle'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when dependent_objects then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')13]: ' || SQLERRM); -- RAISE;
    end;

   begin
      stmt := 'drop package sdo_sem_bt'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')14]: ' || SQLERRM); -- RAISE;
    end;

   begin
      stmt := 'drop package rdf_apis_oper_internal'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')15]: ' || SQLERRM); -- RAISE;
    end;

   begin
      stmt := 'drop package sdo_sem_inference'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')16]: ' || SQLERRM); -- RAISE;
   end;

   begin
      stmt := 'drop package sdo_sem_infh'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')17]: ' || SQLERRM); -- RAISE;
   end;

   begin
      stmt := 'drop package sdo_sem_infi'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')18]: ' || SQLERRM); -- RAISE;
   end;

   begin
      stmt := 'drop package sdo_sem_utl'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')19]: ' || SQLERRM); -- RAISE;
   end;

   begin
      stmt := 'drop package sem_upgrade_to_11'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')20]: ' || SQLERRM); -- RAISE;
   end;

   begin
      stmt := 'drop package sdo_sem_downgrade_utl'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')21]: ' || SQLERRM); -- RAISE;
   end;

   begin
      stmt := 'drop package sdo_rdf_mig'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
            SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                   'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')22]: ' || SQLERRM); -- RAISE;
   end;

   begin
      stmt := 'drop package sdo_sem_validate'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')23]: ' || SQLERRM); -- RAISE;
   end;

   begin
      stmt := 'drop package sdo_sem_downgrade'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')24]: ' || SQLERRM); -- RAISE;
   end;

   begin
      stmt := 'drop package sdo_sem_perf'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')25]: ' || SQLERRM); -- RAISE;
   end;
   
   begin
      stmt := 'drop package sdo_sem_cli'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')26]: ' || SQLERRM); -- RAISE;
   end;

   begin
      stmt := 'drop public synonym SEM_INF_HIST'; execute immediate stmt;
      exception
        when synonym_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')27]: ' || SQLERRM); -- RAISE;
   end;

   begin
      stmt := 'drop public synonym SEM_PERF'; execute immediate stmt;
      exception
        when synonym_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')28]: ' || SQLERRM); -- RAISE;
   end;

   begin
      stmt := 'drop view mdsys.sem_inf_hist'; execute immediate stmt;
      exception
        when table_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')29]: ' || SQLERRM); -- RAISE;
   end;

   begin
      stmt := 'drop table mdsys.rdf_hist$'; execute immediate stmt;
      exception
        when table_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')30]: ' || SQLERRM); -- RAISE;
   end;

   begin
      stmt := 'drop sequence mdsys.rdf_hist_id_sq'; execute immediate stmt;
      exception
        when sequence_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')31]: ' || SQLERRM); -- RAISE;
   end;

   begin
      stmt := 'drop package mdsys.sdo_sem_log'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')32]: ' || SQLERRM); -- RAISE;
   end;

   begin
      stmt := 'drop package mdsys.sdo_sem_magic'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')33]: ' || SQLERRM); -- RAISE;
   end;

   begin
      stmt := 'drop type mdsys.sem_vars_table force'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')34]: ' || SQLERRM); -- RAISE;
   end;

   begin
      stmt := 'drop type mdsys.sem_pred_array force'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')35]: ' || SQLERRM); -- RAISE;
   end;

   begin
      stmt := 'drop type mdsys.sem_predicate force'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')36]: ' || SQLERRM); -- RAISE;
   end;

   begin
      stmt := 'drop type mdsys.sem_rule force'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')37]: ' || SQLERRM); -- RAISE;
   end;

   begin
      stmt := 'drop type mdsys.sem_node force'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')38]: ' || SQLERRM); -- RAISE;
   end;

   begin
      stmt := 'drop type mdsys.sem_nodes_array force'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')39]: ' || SQLERRM); -- RAISE;
   end;

   begin
      stmt := 'drop type mdsys.sem_rule_node force'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
    SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')40]: ' || SQLERRM); -- RAISE;
   end;

   begin
      stmt := 'drop type mdsys.sem_goal_node force'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')41]: ' || SQLERRM); -- RAISE;
   end;

   begin
      stmt := 'drop type mdsys.sem_rules_table force'; execute immediate stmt;
      exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')42]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop type mdsys.sem_graph force'; execute immediate stmt;
     exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')43]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop type mdsys.sem_terms_table'; execute immediate stmt;
     exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')44]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop type mdsys.sem_term'; execute immediate stmt;
     exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')45]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop type mdsys.sem_term'; execute immediate stmt;
     exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')46]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop trigger mdsys.sdo_sem_drop_trigger'; execute immediate stmt;
     exception
        when trigger_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')47]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop trigger mdsys.sdo_sem_alter_trigger'; execute immediate stmt;
     exception
        when trigger_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')48]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop public synonym SEM_APIS'; execute immediate stmt;
     exception
        when synonym_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')49]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop package mdsys.sdo_rdf'; execute immediate stmt;
     exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')50]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop package mdsys.rdf_apis_user'; execute immediate stmt;
     exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')51]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop package mdsys.rdf_apis'; execute immediate stmt;
     exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')52]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop package mdsys.sdo_rdf_inference'; execute immediate stmt;
     exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')53]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop package mdsys.rdf_apis_internal'; execute immediate stmt;
     exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')54]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop package mdsys.sdo_rdf_internal'; execute immediate stmt;
     exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')55]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop package mdsys.sdo_sem_const'; execute immediate stmt;
     exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')56]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop package mdsys.sem_hash_internal'; execute immediate stmt;
     exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')57]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop public synonym SEM_VARCHARARRAY force'; execute immediate stmt;
     exception
        when synonym_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')58]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop type mdsys.RDF_VARCHARARRAY force'; execute immediate stmt;
     exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')59]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop public synonym SEM_LONGVARCHARARRAY force'; execute immediate stmt; 
     exception
        when synonym_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')60]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop type mdsys.RDF_LONGVARCHARARRAY force'; execute immediate stmt;
     exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')61]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop public synonym SEM_MATCH'; execute immediate stmt;
     exception
        when synonym_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')62]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop public synonym RDF_MATCH'; execute immediate stmt;
     exception
        when synonym_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')63]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop function mdsys.RDF_MATCH'; execute immediate stmt;
     exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')64]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop type mdsys.RDF_MATCH_IMPL_T force'; execute immediate stmt;
     exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')65]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop public synonym SEM_ALIASES'; execute immediate stmt;
     exception
        when synonym_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')66]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop type mdsys.RDF_ALIASES force'; execute immediate stmt;
     exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')67]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop public synonym SEM_ALIAS'; execute immediate stmt;
     exception
        when synonym_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')68]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop type mdsys.RDF_ALIAS force'; execute immediate stmt;
     exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')69]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop type mdsys.SDO_RDF_TRIPLE force'; execute immediate stmt;
     exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')70]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop type mdsys.SDO_RDF_TRIPLE_S force'; execute immediate stmt;
     exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')71]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop procedure mdsys.LOAD_PREDEFINED_RULEBASES'; execute immediate stmt;
     exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')72]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop context SDO_SEM_CTX'; execute immediate stmt;
     exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')73]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop package mdsys.SDO_SEM_CTX'; execute immediate stmt;
     exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')74]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop public synonym SEM_MODELS'; execute immediate stmt;
     exception
        when synonym_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')75]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop type mdsys.RDF_MODELS force'; execute immediate stmt;
     exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')76]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop public synonym SEM_RULEBASES'; execute immediate stmt;
     exception
        when synonym_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')77]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop type mdsys.RDF_RULEBASES force'; execute immediate stmt;
     exception
        when object_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')78]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop public synonym SDO_RDF_RULEBASES'; execute immediate stmt;
     exception
        when synonym_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')79]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop public synonym SDO_RDF_MODELS'; execute immediate stmt;
     exception
        when synonym_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')80]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop public synonym SDO_RDF_ALIAS'; execute immediate stmt;
     exception
        when synonym_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')81]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop public synonym SDO_RDF_ALIASES'; execute immediate stmt;
     exception
        when synonym_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')82]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop public synonym SDO_RDF_INFERENCE'; execute immediate stmt;
     exception
        when synonym_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')83]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop public synonym SDO_RDF_MATCH'; execute immediate stmt;
     exception
        when synonym_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')84]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop public synonym SDO_RDF_INTERNAL'; execute immediate stmt;
     exception
        when synonym_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')85]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop public synonym SDO_RDF'; execute immediate stmt;
     exception
        when synonym_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')86]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop public synonym SDO_RDF_TRIPLE'; execute immediate stmt;
     exception
        when synonym_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')87]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop public synonym SDO_RDF_TRIPLE_S'; execute immediate stmt;
     exception
        when synonym_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')88]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop public synonym SDO_SEM_INFERENCE'; execute immediate stmt;
     exception
        when synonym_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')89]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop public synonym SDO_SEM_VALIDATE'; execute immediate stmt;
     exception
        when synonym_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')90]: ' || SQLERRM); -- RAISE;
   end;

   begin
     stmt := 'drop public synonym SDO_SEM'; execute immediate stmt;
     exception
        when synonym_not_found then NULL;
        when others then
          SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                                 'EXCEPTION[seme102.sql(' || $$PLSQL_LINE || ')91]: ' || SQLERRM); -- RAISE;
   end;

end;
/

ALTER SESSION SET CURRENT_SCHEMA = SYS;
call dbms_java.dropjava('-force -synonym -schema MDSYS  md/lib/sdordf.jar');

Rem ********************************************************************
Rem #16473696: Indicate Oracle-Supplied object
@?/rdbms/admin/sqlsessend.sql
Rem ********************************************************************