MINI MINI MANI MO

Rem
Rem $Header: ordim/admin/imuploc.sql /main/5 2016/12/19 10:44:36 smavris Exp $
Rem
Rem imuploc.sql
Rem
Rem Copyright (c) 2014, 2016, Oracle and/or its affiliates. 
Rem All rights reserved.
Rem
Rem    NAME
Rem      imuploc.sql - Oracle Multimedia Locator Upgrade Script
Rem
Rem    DESCRIPTION
Rem     This script invokes locdbmig.sql in parallel with the Oracle
Rem     Multimedia upgrade. 
Rem
Rem    NOTES
Rem
Rem    BEGIN SQL_FILE_METADATA 
Rem    SQL_SOURCE_FILE: ordim/admin/imuploc.sql 
Rem    SQL_SHIPPED_FILE: ord/im/admin/imuploc.sql
Rem    SQL_PHASE: CMPUPORD
Rem    SQL_STARTUP_MODE: UPGRADE
Rem    SQL_IGNORABLE_ERRORS: NONE 
Rem    SQL_CALLING_FILE: ordim/admin/imupgrd.sql
Rem    END SQL_FILE_METADATA
Rem
Rem    MODIFIED   (MM/DD/YY)
Rem    smavris     12/13/16 - Correct SQL_FILE_METADATA
Rem    smavris     03/04/16 - Set sdo installed check to false
Rem    smavris     12/06/15 - Move immisc to sys
Rem    smavris     01/14/15 - Schema qualify dbms_registry
Rem    smavris     12/12/14 - Oracle Multimedia upgrade script
Rem    smavris     12/12/14 - Oracle Multimedia Parallel Upgrade Script
Rem    smavris     12/12/14 - Created
Rem

@@?/rdbms/admin/sqlsessstart.sql

alter session set current_schema="SYS";

REM
REM Invoke Locator upgrade and register MDSYS if SDO is not 
REM installed and MDSYS schema exists.  Note - if MDSYS does 
REM not exist this is most likely an internal test scenario 
REM and we should not attempt to upgrade Locator.
REM
COLUMN :script_name NEW_VALUE comp_file NOPRINT
Variable script_name varchar2(256)

declare
  sdo_installed BOOLEAN := FALSE;
begin
  -- Check whether SDO is installed.
  -- If not, Do not upgrade Locator
  -- Bug 22092616 
  -- Always set check_linked_on to FALSE.  According to 
  -- Siva this is a useless check.  The Spatial library
  -- should always be linked in because even Locator uses
  -- it. 
  sdo_installed := sys.immisc.isSDOInstalled(FALSE);  
  if (not sdo_installed) then
      :script_name := '?/md/admin/locdbmig.sql';
      sys.dbms_registry.upgrading
        ('ORDIM', 'Oracle Multimedia', 
         'validate_ordim', 'ORDSYS', 
         sys.dbms_registry.schema_list_t('ORDPLUGINS','SI_INFORMTN_SCHEMA',
                                     'MDSYS', 'ORDDATA'));
  else
    :script_name := sys.dbms_registry.nothing_script;
  end if;
end;
/

select :script_name from dual;
@&comp_file

@?/rdbms/admin/sqlsessend.sql