MINI MINI MANI MO

Path : /proc/self/root/opt/oracle/product/18c/dbhomeXE/md/admin/
File Upload :
Current File : //proc/self/root/opt/oracle/product/18c/dbhomeXE/md/admin/sdosemop.plb

@@?/rdbms/admin/sqlsessstart.sql
declare
  operator_not_found exception;
  pragma exception_init(operator_not_found, -04043);
begin
  execute immediate
   'drop function semidx_dummy_function';
  exception
    when operator_not_found then NULL;
    when others then
      SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE, 
        'SEM_INSTALL: sdosemop: drop semidx_dummy_function: '||SQLERRM);
end;
/
create function semidx_dummy_function wrapped 
a000000
1
abcd
abcd
abcd
abcd
abcd
abcd
abcd
abcd
abcd
abcd
abcd
abcd
abcd
abcd
abcd
8
5a 9a
S+JZFcTyoVytisYlaWa3F14Iowgwg8eZgcfLCNL+Xhbc19dZJuOuPtfXO1+u1dcM0fpHcuvn
uHTA0lyl0l7nx3TAM7h0ZSVdnsCyvbKbXqWZgTLAsgmldIvAwDL+0oYJaanyBKPHvpK+VIKm
pnYVqx0=

/
declare
  operator_not_found exception;
  pragma exception_init(operator_not_found, -29807);
begin
  execute immediate
    'drop operator semidx_dummy';
  exception
    when operator_not_found then NULL;
    when others then
      SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE, 
        'SEM_INSTALL: sdosemop: drop semidx_dummy: '||SQLERRM);
end;
/
begin
  execute immediate
    'create operator semidx_dummy binding
     (varchar2) return number
     using semidx_dummy_function';
  exception
    when others then
      SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE, 
        'SEM_INSTALL: sdosemop: create semidx_dummy: '||SQLERRM);
end;
/
declare
  indextype_not_found exception;
  pragma exception_init(indextype_not_found, -29833);
begin
  execute immediate
    'alter indextype sem_indextype
     add semidx_dummy(varchar2)';
  exception
    when indextype_not_found then NULL;
    when others then
    SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE, 
      'SEM_INSTALL: sdosemop: add semidx_dummy to sem_indextype: '||SQLERRM);
end;
/
declare
  indextype_not_found exception;
  pragma exception_init(indextype_not_found, -29833);
begin
  execute immediate
    'alter indextype sem_indextype
     drop sem_related(VARCHAR2, VARCHAR2,VARCHAR2, MDSYS.RDF_Models, 
                      MDSYS.RDF_Rulebases, VARCHAR2)';
  exception
    when indextype_not_found then NULL;
    when others then
    SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE, 
      'SEM_INSTALL: sdosemop: drop sem_related(VARCHAR2, VARCHAR2,VARCHAR2, MDSYS.RDF_Models, MDSYS.RDF_Rulebases, VARCHAR2): '||SQLERRM);
end;
/
declare
  indextype_not_found exception;
  pragma exception_init(indextype_not_found, -29833);
begin
  execute immediate
    'alter indextype sem_indextype
     drop sem_related(VARCHAR2, VARCHAR2,VARCHAR2, MDSYS.RDF_Models, 
                      MDSYS.RDF_Rulebases, INTEGER, INTEGER)';
  exception
    when indextype_not_found then NULL;
    when others then
    SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE, 
      'SEM_INSTALL: sdosemop: drop sem_related(VARCHAR2, VARCHAR2,VARCHAR2, MDSYS.RDF_Models, MDSYS.RDF_Rulebases, INTEGER, INTEGER): '||SQLERRM);
end;
/
declare
  indextype_not_found exception;
  pragma exception_init(indextype_not_found, -29833);
begin
  execute immediate
    'alter indextype sem_indextype
     drop sem_related(VARCHAR2, VARCHAR2,VARCHAR2, MDSYS.RDF_Models, 
                      MDSYS.RDF_Rulebases, VARCHAR2, INTEGER, INTEGER)';
  exception
    when indextype_not_found then NULL;
    when others then
    SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE, 
      'SEM_INSTALL: sdosemop: drop sem_related(VARCHAR2, VARCHAR2,VARCHAR2, MDSYS.RDF_Models, MDSYS.RDF_Rulebases, VARCHAR2, INTEGER, INTEGER): '||SQLERRM);
end;
/
declare
  indextype_not_found exception;
  pragma exception_init(indextype_not_found, -29833);
begin
  execute immediate
    'alter indextype sem_indextype
     drop sem_related(VARCHAR2, VARCHAR2,VARCHAR2, MDSYS.RDF_Models, 
                      MDSYS.RDF_Rulebases)';
  exception
    when indextype_not_found then NULL;
    when others then
    SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE, 
      'SEM_INSTALL: sdosemop: drop sem_related(VARCHAR2, VARCHAR2,VARCHAR2, MDSYS.RDF_Models, MDSYS.RDF_Rulebases): '||SQLERRM);
end;
/
declare
  operator_not_found exception;
  pragma exception_init(operator_not_found, -29807);
begin
  execute immediate
    'drop operator sem_path force';
  exception
    when operator_not_found then NULL;
    when others then
    SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE, 
      'SEM_INSTALL: sdosemop: drop sem_path: '||SQLERRM);
end;
/
declare
  operator_not_found exception;
  pragma exception_init(operator_not_found, -29807);
begin
  execute immediate
    'drop operator sem_distance force';
  exception
    when operator_not_found then NULL;
    when others then
    SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE, 
      'SEM_INSTALL: sdosemop: drop sem_distance: '||SQLERRM);
end;
/
declare
  operator_not_found exception;
  pragma exception_init(operator_not_found, -29807);
begin
  execute immediate
    'drop operator sem_related force';
  exception
    when operator_not_found then NULL;
    when others then
      SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE, 
        'SEM_INSTALL: sdosemop: drop sem_related: '||SQLERRM);
end;
/
BEGIN
EXECUTE IMMEDIATE
'CREATE OR REPLACE OPERATOR SEM_RELATED
  BINDING
  (VARCHAR2, VARCHAR2, VARCHAR2, MDSYS.RDF_Models,
  MDSYS.RDF_Rulebases, VARCHAR2) RETURN NUMBER
  WITH INDEX CONTEXT, SCAN CONTEXT sem_indextype_im COMPUTE ANCILLARY DATA
  USING SDO_SEM_OPERATOR.sem_related_func,
  (VARCHAR2, VARCHAR2, VARCHAR2, MDSYS.RDF_Models,
  MDSYS.RDF_Rulebases, INTEGER, INTEGER) RETURN NUMBER
  WITH INDEX CONTEXT, SCAN CONTEXT sem_indextype_im COMPUTE ANCILLARY DATA
  USING SDO_SEM_OPERATOR.sem_related_func,
  (VARCHAR2, VARCHAR2, VARCHAR2, MDSYS.RDF_Models,
  MDSYS.RDF_Rulebases, VARCHAR2, INTEGER, INTEGER) RETURN NUMBER
  WITH INDEX CONTEXT, SCAN CONTEXT sem_indextype_im COMPUTE ANCILLARY DATA
  USING SDO_SEM_OPERATOR.sem_related_func,
  (VARCHAR2, VARCHAR2, VARCHAR2, MDSYS.RDF_Models,
  MDSYS.RDF_Rulebases) RETURN NUMBER
  WITH INDEX CONTEXT, SCAN CONTEXT sem_indextype_im COMPUTE ANCILLARY DATA
  USING SDO_SEM_OPERATOR.sem_related_func';
EXCEPTION 
  WHEN OTHERS THEN
    
    IF (SQLCODE != -29809) THEN
      RAISE;
    END IF;
END;
/
show errors;
GRANT EXECUTE on MDSYS.SEM_RELATED TO PUBLIC;
CREATE OR REPLACE PUBLIC SYNONYM SEM_RELATED FOR MDSYS.SEM_RELATED;
BEGIN
EXECUTE IMMEDIATE
'CREATE OR REPLACE OPERATOR SEM_DISTANCE
  BINDING
  (NUMBER) RETURN NUMBER
  ANCILLARY TO SEM_RELATED (VARCHAR2, VARCHAR2, VARCHAR2, MDSYS.RDF_Models,
                            MDSYS.RDF_Rulebases, VARCHAR2),
               SEM_RELATED (VARCHAR2, VARCHAR2, VARCHAR2, MDSYS.RDF_Models,
                            MDSYS.RDF_Rulebases, INTEGER, INTEGER),
               SEM_RELATED (VARCHAR2, VARCHAR2, VARCHAR2, MDSYS.RDF_Models,
                            MDSYS.RDF_Rulebases, VARCHAR2, INTEGER, INTEGER),
               SEM_RELATED (VARCHAR2, VARCHAR2, VARCHAR2, MDSYS.RDF_Models,
                            MDSYS.RDF_Rulebases)
  USING  SDO_SEM_OPERATOR.sem_distance_func';
EXCEPTION 
  WHEN OTHERS THEN
    
    IF (SQLCODE != -29809) THEN
      RAISE;
    END IF;
END;
/
show errors;
GRANT EXECUTE ON SEM_DISTANCE TO PUBLIC;
CREATE OR REPLACE PUBLIC SYNONYM SEM_DISTANCE FOR MDSYS.SEM_DISTANCE;
BEGIN
EXECUTE IMMEDIATE
'CREATE OR REPLACE OPERATOR SEM_PATH
  BINDING
  (NUMBER) RETURN VARCHAR2
  ANCILLARY TO SEM_RELATED (VARCHAR2, VARCHAR2, VARCHAR2, MDSYS.RDF_Models,
                            MDSYS.RDF_Rulebases, VARCHAR2),
               SEM_RELATED (VARCHAR2, VARCHAR2, VARCHAR2, MDSYS.RDF_Models,
                            MDSYS.RDF_Rulebases, INTEGER, INTEGER),
               SEM_RELATED (VARCHAR2, VARCHAR2, VARCHAR2, MDSYS.RDF_Models,
                            MDSYS.RDF_Rulebases, VARCHAR2, INTEGER, INTEGER),
               SEM_RELATED (VARCHAR2, VARCHAR2, VARCHAR2, MDSYS.RDF_Models,
                            MDSYS.RDF_Rulebases)
  USING  SDO_SEM_OPERATOR.sem_path_func';
EXCEPTION 
  WHEN OTHERS THEN
    
    IF (SQLCODE != -29809) THEN
      RAISE;
    END IF;
END;
/
show errors;
BEGIN
EXECUTE IMMEDIATE
'CREATE OR REPLACE INDEXTYPE sem_indextype
 FOR
  semidx_dummy(varchar2)
 USING sem_indextype_im';
EXCEPTION 
  WHEN OTHERS THEN
    
    IF (SQLCODE != -29832) THEN
      RAISE;
    END IF;
END;
/
alter indextype sem_indextype
using sem_indextype_im
with order by sem_distance(number);
alter indextype sem_indextype
  add sem_related(VARCHAR2, VARCHAR2,VARCHAR2, MDSYS.RDF_Models, 
                  MDSYS.RDF_Rulebases, VARCHAR2),
  add sem_related(VARCHAR2, VARCHAR2,VARCHAR2, MDSYS.RDF_Models, 
                  MDSYS.RDF_Rulebases, INTEGER, INTEGER),
  add sem_related(VARCHAR2, VARCHAR2,VARCHAR2, MDSYS.RDF_Models, 
                  MDSYS.RDF_Rulebases, VARCHAR2, INTEGER, INTEGER),
  add sem_related(VARCHAR2, VARCHAR2,VARCHAR2, MDSYS.RDF_Models, 
                  MDSYS.RDF_Rulebases);
GRANT EXECUTE ON sem_indextype TO PUBLIC;
begin
  execute immediate
    'alter indextype sem_indextype
     drop semidx_dummy(varchar2)';
  exception when others then
    SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE, 
      'SEM_INSTALL: sdosemop: cleanup drop semidx_dummy(varchar2): '||SQLERRM);
end;
/
begin
  execute immediate
    'drop operator semidx_dummy force';
  exception when others then
    SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE, 
      'SEM_INSTALL: sdosemop: cleanup drop semidx_dummy: '||SQLERRM);
end;
/
begin
  execute immediate
   'drop function semidx_dummy_function';
  exception when others then
    SYS.DBMS_SYSTEM.KSDWRT(SYS.DBMS_SYSTEM.TRACE_FILE, 
      'SEM_INSTALL: sdordfctx: cleanup drop semidx_dummy_function: '||SQLERRM);
end;
/
@?/rdbms/admin/sqlsessend.sql

OHA YOOOO