MINI MINI MANI MO
Rem loce121.sql
Rem
Rem Copyright (c) 2013, 2017, Oracle and/or its affiliates.
Rem All rights reserved.
Rem
Rem NAME
Rem loce121.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 MODIFIED (MM/DD/YY)
Rem sravada 11/01/17 - fix syntax error
Rem rjanders 10/08/17 - Add MDSYS to spatial type
Rem rjanders 06/30/17 - Add SYS/MDSYS prefixes
Rem sravada 05/31/17 - special exception for some cases
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 03/09/17 - update sdoeoper calls
Rem sravada 02/10/17 - drop java classes on downgrade
Rem sravada 01/11/17 - bug 25370681
Rem sravada 01/12/17 - add loce122
Rem rjanders 11/01/16 - Add distributed transaction support
Rem rjanders 07/18/16 - #24312486: Remove PL/SQL SDO_VERS package (obs.)
Rem rjanders 03/01/16 - Add regular journal_table for dist. txn support
Rem sravada 06/09/16 - remove SDO_GEOR_AUX
Rem sravada 02/08/16 - drop SDO_TXN_JOURNAL pub syn
Rem rjanders 01/26/16 - #22564200: Remove tracefile warnings
Rem sravada 01/19/16 - add the inherit priv on downgrade
Rem rjanders 01/11/16 - #22502802: Downgrade long identifier columns
Rem rjanders 01/11/16 - #22527146: Remove SDO_TXN_JOURNAL journal table
Rem rjanders 12/31/15 - #21925692: Remove SDO_TABLE_NAME to index metadata
Rem sravada 12/15/15 - remove all objects except types
Rem sravada 12/14/15 - add drop SDO_coord_op_param_val_TRIGG2
Rem nalexand 09/08/15 - bug-21494731: downgrade sdo_geo_addr
Rem yhu 04/27/15 - enh 20893895 - ADD METHODS AND CONSTRUCTORS FOR
Rem KML, GML AND GEOJSON TO SDO_GEOMETRY
Rem sravada 04/23/14 - downgrade from 12.2
Rem mhorhamm 04/02/13 - Created
Rem
Rem BEGIN SQL_FILE_METADATA
Rem SQL_SOURCE_FILE: sdo/admin/loce121.sql
Rem SQL_SHIPPED_FILE:
Rem SQL_PHASE:
Rem SQL_STARTUP_MODE: NORMAL
Rem SQL_IGNORABLE_ERRORS: NONE
Rem SQL_CALLING_FILE:
Rem END SQL_FILE_METADATA
Rem ********************************************************************
Rem #16473696: Indicate Oracle-Supplied object
@@?/rdbms/admin/sqlsessstart.sql
Rem ********************************************************************
ALTER SESSION SET CURRENT_SCHEMA = MDSYS;
-- Downgrade Locator stuff first
@@loce122.sql
grant inherit privileges on user SYS to MDSYS;
BEGIN
-- #22502802: Downgrade long identifier column sizes
begin
execute immediate
' Alter table MDSYS.SDO_INDEX_AGGREGATES_TABLE
modify (SDO_INDEX_OWNER varchar2(32),
SDO_INDEX_NAME varchar2(32)) ';
exception
when others then
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')1]: ' ||SQLERRM); RAISE;
end;
begin
execute immediate
' Alter table MDSYS.SDO_INDEX_METADATA_TABLE
modify (SDO_INDEX_OWNER varchar2(32),
SDO_INDEX_TABLE varchar2(32),
SDO_NL_INDEX_TABLE varchar2(33),
SDO_INDEX_NAME varchar2(32),
SDO_TSNAME varchar2(32),
SDO_RTREE_SEQ_NAME varchar2(32),
SDO_TABLESPACE varchar2(32),
SDO_INDEX_PARTITION varchar2(32)) ';
exception
when others then
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')2]: ' ||SQLERRM); RAISE;
end;
begin
-- ignore exception here as this table might have been already modified
-- depends on the downgrade path
execute immediate
' Alter table MDSYS.SDO_GEOM_METADATA_TABLE
modify (SDO_OWNER varchar2(32),
SDO_TABLE_NAME varchar2(32)) ';
exception
when others then
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')3]: ' ||SQLERRM);
end;
begin
execute immediate
' alter table MDSYS.SDO_TIN_PC_SEQ
modify (SDO_OWNER VARCHAR2(32) NOT NULL,
TABLE_NAME VARCHAR2(32) NOT NULL) ';
exception
when others then
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')4]: ' ||SQLERRM); RAISE;
end;
begin
execute immediate
' alter table MDSYS.SDO_TIN_PC_SYSDATA_TABLE
modify (SDO_OWNER VARCHAR2(32) NOT NULL,
TABLE_NAME VARCHAR2(32) NOT NULL,
DEP_TABLE_SCHEMA VARCHAR2(32) NOT NULL,
DEP_TABLE_NAME VARCHAR2(32) NOT NULL) ';
exception
when others then
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')5]: ' ||SQLERRM); RAISE;
end;
begin
execute immediate
' alter table MDSYS.SDO_MAPS_TABLE
modify (SDO_OWNER varchar2(32),
NAME varchar2(32)) ';
exception
when others then
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')6]: ' ||SQLERRM); RAISE;
end;
begin
execute immediate
' alter table MDSYS.SDO_STYLES_TABLE
modify (SDO_OWNER varchar2(32),
NAME varchar2(32)) ';
exception
when others then
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')7]: ' ||SQLERRM); RAISE;
end;
begin
execute immediate
' alter table MDSYS.SDO_THEMES_TABLE
modify (SDO_OWNER varchar2(32),
NAME varchar2(32),
BASE_TABLE varchar2(64)) ';
exception
when others then
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')8]: ' ||SQLERRM); RAISE;
end;
begin
execute immediate
' alter table mdsys.sdo_cached_maps_table
modify (SDO_OWNER varchar2(32),
NAME varchar2(32),
TILES_TABLE varchar2(32)) ';
exception
when others then
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')9]: ' ||SQLERRM); RAISE;
end;
begin
execute immediate
' alter table MDSYS.SDO_TOPO_METADATA_TABLE
modify ( SDO_OWNER varchar2(32) ) ';
exception
when others then
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')10]: ' ||SQLERRM); RAISE;
end;
begin
execute immediate
' alter table MDSYS.SDO_NETWORK_METADATA_TABLE
modify ( SDO_OWNER varchar2(32),
LRS_TABLE_NAME varchar2(32),
LRS_GEOM_COLUMN varchar2(32),
NODE_TABLE_NAME varchar2(32),
NODE_GEOM_COLUMN varchar2(32),
LINK_TABLE_NAME varchar2(32),
LINK_GEOM_COLUMN varchar2(32),
PATH_TABLE_NAME varchar2(32),
PATH_GEOM_COLUMN varchar2(32),
PATH_LINK_TABLE_NAME varchar2(32),
PARTITION_TABLE_NAME varchar2(32),
SUBPATH_TABLE_NAME varchar2(32),
SUBPATH_GEOM_COLUMN varchar2(32),
PARTITION_BLOB_TABLE_NAME varchar2(32),
COMPONENT_TABLE_NAME varchar2(32),
NODE_LEVEL_TABLE_NAME varchar2(32),
CHILD_NETWORK varchar2(32),
HIERARCHY_TABLE_NAME varchar2(20) ) ';
exception
when others then
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')11]: ' ||SQLERRM); RAISE;
end;
begin
execute immediate
' alter table MDSYS.SDO_NETWORK_CONSTRAINTS
modify ( sdo_owner VARCHAR2(32),
constraint VARCHAR2(32),
class_name VARCHAR2(32) ) ';
exception
when others then
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')12]: ' ||SQLERRM); RAISE;
end;
begin
execute immediate
' alter table MDSYS.SDO_NETWORK_USER_DATA
modify ( sdo_owner VARCHAR2(32),
network VARCHAR2(32),
data_name VARCHAR2(32)) ';
exception
when others then
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')13]: ' ||SQLERRM); RAISE;
end;
begin
execute immediate
' alter table MDSYS.SDO_NETWORK_HISTORIES
modify ( owner VARCHAR2(32),
node_history_table VARCHAR2(32),
link_history_table VARCHAR2(32),
node_trigger VARCHAR2(32),
link_trigger VARCHAR2(32) ) ';
exception
when others then
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')14]: ' ||SQLERRM); RAISE;
end;
begin
execute immediate
' alter table MDSYS.SDO_NETWORK_TIMESTAMPS
modify ( owner VARCHAR2(32),
table_name VARCHAR2(32)) ';
exception
when others then
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')15]: ' ||SQLERRM); RAISE;
end;
begin
execute immediate
' alter table MDSYS.SDO_NETWORK_FEATURE
modify ( SDO_OWNER VARCHAR2(32),
FEATURE_TABLE_NAME VARCHAR2(32),
RELATION_TABLE_NAME VARCHAR2(32),
HIERARCHY_TABLE_NAME VARCHAR2(32) ) ';
exception
when others then
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')16]: ' ||SQLERRM); RAISE;
end;
-- ignore exception here as this table might have been already modified
-- depends on the downgrade path
begin
execute immediate
' alter table MDSYS.SDO_LRS_METADATA_TABLE
modify ( SDO_OWNER VARCHAR2(32),
SDO_TABLE_NAME VARCHAR2(32),
SDO_COLUMN_NAME VARCHAR2(32) ) ';
exception
when others then
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')17]: ' ||SQLERRM);
end;
begin
execute immediate
' alter table MDSYS.SDO_ANNOTATION_TEXT_METADATA
modify ( F_TABLE_SCHEMA VARCHAR2(32),
F_TABLE_NAME VARCHAR2(32) ) ';
exception
when others then
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')18]: ' ||SQLERRM); RAISE;
end;
begin
execute immediate
' alter table MDSYS.SDO_NETWORK_LOCKS_WM
modify ( sdo_owner VARCHAR2(32),
workspace VARCHAR2(32) ) ';
exception
when others then
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')19]: ' ||SQLERRM); RAISE;
end;
begin
execute immediate
' alter table mdsys.OpenLS_Nodes
modify ( name VARCHAR2(32)) ';
exception
when others then
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')20]: ' ||SQLERRM); RAISE;
end;
begin
execute immediate
' alter table OGIS_SPATIAL_REFERENCE_SYSTEMS
modify ( AUTH_NAME VARCHAR2(100) ) ';
exception
when others then
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')21]: ' ||SQLERRM); RAISE;
end;
begin
execute immediate
' alter table MDSYS.WFS_FeatureTypeNestedSDOs$
modify ( objnamespace varchar2(32),
objName varchar2(32) ) ';
exception
when others then
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')22]: ' ||SQLERRM); RAISE;
end;
begin
execute immediate
' alter table MDSYS.WFS_FeatureTypeAttrs$
modify ( columnName varchar2(32) ) ';
exception
when others then
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')23]: ' ||SQLERRM); RAISE;
end;
begin
execute immediate
' alter table MDSYS.WFS_FeatureTypeSimpleTagAttrs$
modify ( columnName varchar2(32) ) ';
exception
when others then
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')24]: ' ||SQLERRM); RAISE;
end;
begin
execute immediate
' alter table MDSYS.WFS_FeatureTypeTags$
modify ( columnName varchar2(32) ) ';
exception
when others then
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')25]: ' ||SQLERRM); RAISE;
end;
begin
execute immediate
' alter table MDSYS.WFS_FeatureTypeXMLCOLINFO$
modify ( columnName varchar2(32) ) ';
exception
when others then
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')2627]: ' ||SQLERRM); RAISE;
end;
begin
execute immediate
' alter table MDSYS.WFS_PROC_MAP$
modify ( PACKAGENAME varchar2(32) ) ';
exception
when others then
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')28]: ' ||SQLERRM); RAISE;
end;
-- Remove SDO_TABLE_NAME column from SDO_INDEX_METADATA_TABLE
-- ignore exception here as this table might have been already modified
-- depends on the downgrade path
BEGIN
EXECUTE IMMEDIATE
' ALTER TABLE mdsys.sdo_index_metadata_table ' ||
' DROP (SDO_TABLE_NAME)' ;
EXCEPTION WHEN OTHERS THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')36]: ' ||SQLERRM);
END;
-- Drop constructor from SDO_GEO_ADDR
BEGIN
EXECUTE IMMEDIATE
' ALTER TYPE mdsys.sdo_geo_addr MODIFY ATTRIBUTE (
placeName VARCHAR2(200), streetName VARCHAR2(200), intersectStreet VARCHAR2(200),
secUnit VARCHAR2(200), settlement VARCHAR2(200), municipality VARCHAR2(200),
region VARCHAR2(200), country VARCHAR2(100), postalCode VARCHAR2(20),
postalAddonCode VARCHAR2(20), fullPostalCode VARCHAR2(40), poBox VARCHAR2(100),
houseNumber VARCHAR2(100), baseName VARCHAR2(200), streetType VARCHAR2(20),
streetPrefix VARCHAR2(20), streetSuffix VARCHAR2(20)
) CASCADE INCLUDING TABLE DATA ';
EXCEPTION WHEN OTHERS THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')37]: ' ||SQLERRM); RAISE;
END;
BEGIN
EXECUTE IMMEDIATE
' ALTER TYPE mdsys.sdo_geo_addr DROP CONSTRUCTOR FUNCTION SDO_GEO_ADDR(country VARCHAR2, matchmode VARCHAR2,
street VARCHAR2, intersectStreet VARCHAR2, settlement VARCHAR2, municipality VARCHAR2,
region VARCHAR2, postalcode VARCHAR2) RETURN SELF as RESULT DETERMINISTIC CASCADE' ;
EXCEPTION WHEN OTHERS THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')38]: ' ||SQLERRM); RAISE;
END;
BEGIN
EXECUTE IMMEDIATE 'ALTER TYPE ST_GEOMETRY DROP STATIC FUNCTION ST_AsText(ageometry ST_GEOMETRY) RETURN CLOB DETERMINISTIC CASCADE';
EXCEPTION WHEN others THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')39]: ' ||SQLERRM); RAISE;
END;
BEGIN
EXECUTE IMMEDIATE 'ALTER TYPE ST_GEOMETRY DROP STATIC FUNCTION ST_AsBinary(ageometry ST_GEOMETRY) RETURN BLOB DETERMINISTIC CASCADE';
EXCEPTION WHEN others THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')40]: ' ||SQLERRM); RAISE;
END;
BEGIN
EXECUTE IMMEDIATE 'ALTER TYPE ST_GEOMETRY DROP STATIC FUNCTION ST_GeomFromText(wkt CLOB) RETURN ST_GEOMETRY DETERMINISTIC CASCADE';
EXCEPTION WHEN others THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')41]: ' ||SQLERRM); RAISE;
END;
BEGIN
EXECUTE IMMEDIATE 'ALTER TYPE ST_GEOMETRY DROP STATIC FUNCTION ST_GeomFromWKB(wkb BLOB) RETURN ST_GEOMETRY DETERMINISTIC CASCADE';
EXCEPTION WHEN others THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')42]: ' ||SQLERRM); RAISE;
END;
BEGIN
EXECUTE IMMEDIATE 'ALTER TYPE ST_GEOMETRY DROP STATIC FUNCTION ST_GeomFromText(wkt CLOB, asrid INTEGER) RETURN ST_GEOMETRY DETERMINISTIC CASCADE';
EXCEPTION WHEN others THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')43]: ' ||SQLERRM); RAISE;
END;
BEGIN
EXECUTE IMMEDIATE 'ALTER TYPE ST_GEOMETRY DROP STATIC FUNCTION ST_GeomFromWKB(wkb BLOB, asrid INTEGER) RETURN ST_GEOMETRY DETERMINISTIC CASCADE';
EXCEPTION WHEN others THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')44]: ' ||SQLERRM); RAISE;
END;
BEGIN
EXECUTE IMMEDIATE 'ALTER TYPE MDSYS.SDO_GEOMETRY DROP MEMBER FUNCTION ' ||
'GET_GML RETURN CLOB DETERMINISTIC PARALLEL_ENABLE CASCADE';
EXCEPTION WHEN others THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')45]: ' ||SQLERRM); RAISE;
END;
BEGIN
EXECUTE IMMEDIATE 'ALTER TYPE MDSYS.SDO_GEOMETRY DROP MEMBER FUNCTION ' ||
'GET_GML(srsNameSpace IN varchar2, srsNSAlias IN varchar2) RETURN ' ||
'CLOB DETERMINISTIC PARALLEL_ENABLE CASCADE';
EXCEPTION WHEN others THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')46]: ' ||SQLERRM); RAISE;
END;
BEGIN
EXECUTE IMMEDIATE 'ALTER TYPE MDSYS.SDO_GEOMETRY DROP MEMBER FUNCTION ' ||
'GET_GML(coordOrder IN number) ' ||
'RETURN CLOB DETERMINISTIC PARALLEL_ENABLE CASCADE';
EXCEPTION WHEN others THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')47]: ' ||SQLERRM); RAISE;
END;
BEGIN
EXECUTE IMMEDIATE 'ALTER TYPE MDSYS.SDO_GEOMETRY DROP MEMBER FUNCTION ' ||
'GET_GML(srsNameSpace IN varchar2, ' ||
'srsNSAlias IN varchar2, coordOrder IN number) RETURN CLOB ' ||
'DETERMINISTIC PARALLEL_ENABLE CASCADE';
EXCEPTION WHEN others THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')48]: ' ||SQLERRM); RAISE;
END;
BEGIN
EXECUTE IMMEDIATE 'ALTER TYPE MDSYS.SDO_GEOMETRY DROP MEMBER FUNCTION ' ||
'GET_GML311 RETURN CLOB ' ||
'DETERMINISTIC PARALLEL_ENABLE CASCADE';
EXCEPTION WHEN others THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')49]: ' ||SQLERRM); RAISE;
END;
BEGIN
EXECUTE IMMEDIATE 'ALTER TYPE MDSYS.SDO_GEOMETRY DROP MEMBER FUNCTION ' ||
'GET_GML311( ' ||
'srsNameSpace IN varchar2, srsNSAlias IN varchar2) RETURN CLOB ' ||
'DETERMINISTIC PARALLEL_ENABLE CASCADE';
EXCEPTION WHEN others THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')50]: ' ||SQLERRM); RAISE;
END;
BEGIN
EXECUTE IMMEDIATE 'ALTER TYPE MDSYS.SDO_GEOMETRY DROP MEMBER FUNCTION ' ||
'GET_GML311( coordOrder IN number) ' ||
'RETURN CLOB DETERMINISTIC PARALLEL_ENABLE CASCADE';
EXCEPTION WHEN others THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')51]: ' ||SQLERRM); RAISE;
END;
BEGIN
EXECUTE IMMEDIATE 'ALTER TYPE MDSYS.SDO_GEOMETRY DROP MEMBER FUNCTION ' ||
'GET_GML311( ' ||
'srsNameSpace IN varchar2, srsNSAlias varchar2, coordOrder number) ' ||
'RETURN CLOB DETERMINISTIC PARALLEL_ENABLE CASCADE';
EXCEPTION WHEN others THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')52]: ' ||SQLERRM); RAISE;
END;
BEGIN
EXECUTE IMMEDIATE 'ALTER TYPE MDSYS.SDO_GEOMETRY DROP MEMBER FUNCTION ' ||
'GET_GML321 RETURN CLOB DETERMINISTIC PARALLEL_ENABLE CASCADE';
EXCEPTION WHEN others THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')53]: ' ||SQLERRM); RAISE;
END;
BEGIN
EXECUTE IMMEDIATE 'ALTER TYPE MDSYS.SDO_GEOMETRY DROP MEMBER FUNCTION ' ||
'GET_GML321( ' ||
'srsNameSpace IN varchar2, srsNSAlias IN varchar2) RETURN CLOB ' ||
'DETERMINISTIC PARALLEL_ENABLE CASCADE';
EXCEPTION WHEN others THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')54]: ' || SQLERRM); RAISE;
END;
BEGIN
EXECUTE IMMEDIATE 'ALTER TYPE MDSYS.SDO_GEOMETRY DROP MEMBER FUNCTION ' ||
'GET_GML321(coordOrder IN number) ' ||
'RETURN CLOB DETERMINISTIC PARALLEL_ENABLE CASCADE';
EXCEPTION WHEN others THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')55]: ' || SQLERRM); RAISE;
END;
BEGIN
EXECUTE IMMEDIATE 'ALTER TYPE MDSYS.SDO_GEOMETRY DROP MEMBER FUNCTION ' ||
'GET_GML321( ' ||
'srsNameSpace IN varchar2, srsNSAlias IN varchar2, ' ||
' coordOrder IN number) ' ||
'RETURN CLOB DETERMINISTIC PARALLEL_ENABLE CASCADE';
EXCEPTION WHEN others THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')56]: ' || SQLERRM); RAISE;
END;
BEGIN
EXECUTE IMMEDIATE 'ALTER TYPE MDSYS.SDO_GEOMETRY DROP MEMBER FUNCTION ' ||
'GET_KML RETURN CLOB DETERMINISTIC PARALLEL_ENABLE CASCADE';
EXCEPTION WHEN others THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')57]: ' || SQLERRM); RAISE;
END;
BEGIN
EXECUTE IMMEDIATE 'ALTER TYPE MDSYS.SDO_GEOMETRY DROP MEMBER FUNCTION ' ||
'GET_GEOJSON RETURN CLOB DETERMINISTIC PARALLEL_ENABLE CASCADE';
EXCEPTION WHEN others THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')58]: ' || SQLERRM); RAISE;
END;
BEGIN
EXECUTE IMMEDIATE 'ALTER TYPE MDSYS.SDO_GEOMETRY DROP CONSTRUCTOR FUNCTION ' ||
'SDO_GEOMETRY(input_clob IN clob, auxiliary_info IN varchar2, ' ||
'crs IN VARCHAR2 DEFAULT NULL) RETURN SELF AS RESULT DETERMINISTIC ' ||
'PARALLEL_ENABLE CASCADE';
EXCEPTION WHEN others THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')59]: ' || SQLERRM); RAISE;
END;
BEGIN
EXECUTE IMMEDIATE 'ALTER TYPE MDSYS.SDO_GEOMETRY DROP CONSTRUCTOR FUNCTION ' ||
'SDO_GEOMETRY(input_vchar IN varchar2, auxiliary_info IN varchar2, ' ||
'crs IN VARCHAR2 DEFAULT NULL) RETURN SELF AS RESULT DETERMINISTIC ' ||
'PARALLEL_ENABLE CASCADE';
EXCEPTION WHEN others THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')60]: ' || SQLERRM); RAISE;
END;
BEGIN
EXECUTE IMMEDIATE 'drop TRIGGER MDSYS.SDO_COORD_OP_PARAM_VAL_TRIGG2';
EXCEPTION WHEN others THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || '61]: ' || SQLERRM); RAISE;
END;
BEGIN
EXECUTE IMMEDIATE 'drop function MDSYS.ndm_reset_id_generator';
EXCEPTION WHEN others THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')62]: ' || SQLERRM); RAISE;
END;
BEGIN
EXECUTE IMMEDIATE 'drop package MDSYS.SDO_META_USER';
EXCEPTION WHEN others THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')63]: ' || SQLERRM); RAISE;
END;
BEGIN
EXECUTE IMMEDIATE 'drop package MDSYS.SDO_VERS';
EXCEPTION WHEN others THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')64]: ' || SQLERRM); RAISE;
END;
BEGIN
EXECUTE IMMEDIATE 'drop package body MDSYS.SDO_GEOR_AUX';
EXCEPTION WHEN others THEN
SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE,
'EXCEPTION[loce121.sql(' || $$PLSQL_LINE || ')65]: ' || SQLERRM); RAISE;
END;
-- ORA-22308: operation not allowed on evolved type
-- BEGIN
-- EXECUTE IMMEDIATE
-- 'CREATE OR REPLACE TYPE SDO_STRING_ARRAY
-- TIMESTAMP ''2001-12-06:13:00:00''
-- OID ''94C8417294383551E0340800209D3EE1''
-- AS VARRAY(1048576) OF VARCHAR2(32) ';
-- EXCEPTION WHEN others THEN NULL;
-- END;
END;
/
-- reset the view definition so that it is valid on downgrade
-- required to be valid for some OVM cases
create or replace view mdsys.all_sdo_index_metadata as
select SDO_INDEX_OWNER, SDO_INDEX_TYPE,
SDO_LEVEL, SDO_NUMTILES, SDO_MAXLEVEL, SDO_COMMIT_INTERVAL,
SDO_INDEX_TABLE, SDO_INDEX_NAME, SDO_INDEX_PRIMARY, SDO_TSNAME,
SDO_COLUMN_NAME, SDO_RTREE_HEIGHT, SDO_RTREE_NUM_NODES,
SDO_RTREE_DIMENSIONALITY, SDO_RTREE_FANOUT, SDO_RTREE_ROOT,
SDO_RTREE_SEQ_NAME, SDO_FIXED_META, SDO_TABLESPACE,
SDO_INITIAL_EXTENT, SDO_NEXT_EXTENT, SDO_PCTINCREASE,
SDO_MIN_EXTENTS, SDO_MAX_EXTENTS, SDO_INDEX_DIMS, SDO_LAYER_GTYPE,
SDO_RTREE_PCTFREE, SDO_INDEX_PARTITION, SDO_PARTITIONED,
SDO_RTREE_QUALITY, SDO_INDEX_VERSION, SDO_INDEX_GEODETIC,
SDO_INDEX_STATUS,
SDO_NL_INDEX_TABLE,
SDO_DML_BATCH_SIZE, SDO_RTREE_ENT_XPND,
SDO_NUM_ROWS, --- bug9743250
SDO_NUM_BLKS,
SDO_OPTIMIZED_NODES,
SDO_ROOT_MBR --- bug2719909
from MDSYS.SDO_INDEX_METADATA_TABLE
where
(exists
(select index_name from SYS.all_indexes
where index_name=sdo_index_name and
owner = sdo_index_owner));
-- @@sdoeoper.sql
declare
stmt varchar2(1000);
obj_name varchar2(260);
type cursor_type is REF CURSOR;
query_crs cursor_type ;
begin
-- TRIGGER
stmt := ' select object_name from SYS.all_objects where ' ||
' object_type = ''TRIGGER'' and owner = ''MDSYS'' ';
OPEN query_crs FOR stmt;
LOOP
fetch query_crs into obj_name;
EXIT when query_crs%NOTFOUND ;
begin
EXECUTE immediate ' drop TRIGGER mdsys.'||obj_name;
EXCEPTION
WHEN OTHERS THEN
obj_name := ' ';
end;
END LOOP;
close query_crs;
commit;
end;
/
Rem ********************************************************************
Rem #16473696: Indicate Oracle-Supplied object
@@?/rdbms/admin/sqlsessend.sql
Rem ********************************************************************
OHA YOOOO