MINI MINI MANI MO

Rem catmdt.sql
Rem
Rem Copyright (c) 2014, 2017, Oracle and/or its affiliates. 
Rem All rights reserved.
Rem
Rem    NAME
Rem      catmdt.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/catmdt.sql 
Rem    SQL_SHIPPED_FILE: md/admin/catmdt.sql 
Rem    SQL_PHASE: CATMDT
Rem    SQL_STARTUP_MODE: NORMAL 
Rem    SQL_IGNORABLE_ERRORS: NONE 
Rem    SQL_CALLING_FILE: sdo/admin/catmd.sql 
Rem    END SQL_FILE_METADATA
Rem
Rem    MODIFIED   (MM/DD/YY)
Rem    sravada     11/06/17 - revert MDSYS prefix for types
Rem    rjanders    10/08/17 - Add MDSYS to spatial type
Rem    bkazar      07/05/17 - Remove registering SPATIAL_CSW_ADMIN_USR for old
Rem                           CSW
Rem    rjanders    06/30/17 - Add SYS/MDSYS prefixes
Rem    rjanders    05/10/17 - #26037683: Raise 'when other' exceptions
Rem    rjanders    03/23/17 - #25437999: Remove 'when others then NULL'
Rem                           handlers
Rem    sravada     01/11/17 - bug 25370681
Rem    yhu         04/20/16 - recompile SDO_JOIN
Rem    sravada     03/30/16 - move some alter types here
Rem    sravada     02/19/16 - remove SPATIAL_WFS_ADMIN_USR
Rem    sravada     12/22/15 - dynamic SQL for java call
Rem    czechar     08/14/15 - adding SQL file metadata
Rem    sravada     07/14/15 - compile invalid objects
Rem    matperry    06/22/15 - add order by to all_objects query
Rem    sravada     06/18/15 - validate Java classes
Rem    sravada     12/31/14 - Created
Rem


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

Alter session set current_schema=MDSYS;

declare
  compilation_error exception;
  pragma exception_init(compilation_error, -22324);
begin
   begin
   execute immediate
'alter type SDO_STRING_ARRAY modify element type VARCHAR2(130) cascade  ';

   exception
     when compilation_error then NULL;
     when others then
     SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                            'EXCEPTION[catmdt.sql(' || $$PLSQL_LINE || ')1]: ' || SQLERRM); RAISE;
 end;
end;
/


alter package mdsys.sdo_pc_pkg compile body;
alter package mdsys.sdo_tin_pkg compile body;
alter package mdsys.mderr compile body;
alter trigger MDSYS.SDO_GEOR_TRIG_INS1 compile;
alter trigger MDSYS.SDO_GEOR_TRIG_UPD1 compile;
alter function MDSYS.SDO_JOIN compile;

BEGIN
 begin
   if (sys.dbms_registry.script('JAVAVM','TRUE') = 'TRUE') then
      execute immediate ' begin
       dbms_java.loadjava(''-resolve  -synonym -schema MDSYS -grant PUBLIC
             md/jlib/sdoapi.jar md/jlib/sdoutl.jar md/jlib/sdotopo.jar 
             md/jlib/sdotype.jar md/jlib/sdonm.jar'');   end;' ;
    end if;
    exception
      when others then
        SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
                               'EXCEPTION[catmdt.sql(' || $$PLSQL_LINE || ')2]: ' || SQLERRM); RAISE;
 end;
END;
/

EXECUTE dbms_registry.UPDATE_SCHEMA_LIST('SDO', dbms_registry.schema_list_t('MDSYS', 'MDDATA' ));

select object_name, object_type, status from sys.all_objects
where owner='MDSYS' and status = 'INVALID' 
order by object_name, object_type;

prompt done listing invalid objects owned by MDSYS

REM update the component registry
REM this should be the last one in catmd (ALWAYS!!)
@@sdocmprg.sql
commit;

select object_name, object_type, status from sys.all_objects
where owner='MDSYS' and status = 'INVALID'
order by 1,2,3;

REM change the session back to the SYS schema
Alter session set current_schema=SYS;


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