Dbms_xmlschema

Question

How do you "unregister a schema". The following is being used to register and validate but it will not "reregister". getting the following error:
DECLARE
RECURSE BOOLEAN := TRUE;
ANNOTATE BOOLEAN := FALSE;
EMBEDCOLL BOOLEAN := TRUE;
XSD_TYPE XMLTYPE;
XSD_CLOB CLOB;
XML_CLOB CLOB;
XML_TYPE XMLTYPE;
valid_flag INTEGER;
p_out     CLOB;
BEGIN
EXECUTE IMMEDIATE 'CREATE OR REPLACE DIRECTORY XML_DIR AS ''C:\XMLAPI_PRODUCE''';
XSD_TYPE := dbms_xmlschema.generateschema('SJS','XMLAPI_INCIDENT_TYPE','APIIncident',RECURSE,ANNOTATE,EMBEDCOLL);
XSD_CLOB := XSD_TYPE.getclobval;
dbms_xmlschema.registerSchema('http://www.oracle.com/best.xsd', XSD_CLOB);
sjs.file_util.write_clob(XSD_CLOB,'TEST.xml','C:\XMLAPI_PRODUCE');
DBMS_LOB.CREATETEMPORARY(xml_CLOB,TRUE,dbms_lob.CALL);
DBMS_LOB.OPEN(xml_CLOB, DBMS_LOB.LOB_READWRITE);
sjs.file_util.ReadClob(xml_CLOB,'XML_DIR','INC200306261138511.xml');
xml_type := XMLTYPE.createXML(xml_clob);
IF xml_type.isSchemaValid('http://www.oracle.com/best.xsd') = 1 THEN
DBMS_OUTPUT.PUT_LINE('Valid xml');
ELSE
DBMS_OUTPUT.PUT_LINE('NOT Valid xml');
END IF;
DBMS_LOB.CLOSE(xml_CLOB);
DBMS_LOB.FREETEMPORARY(xml_CLOB);
dbms_output.put_line(p_out);
END;
ERROR at line 1:
ORA-31085: schema "http://www.oracle.com/best.xsd" already registered
ORA-06512: at "XDB.DBMS_XMLSCHEMA_INT", line 0
ORA-06512: at "XDB.DBMS_XMLSCHEMA", line 26
ORA-06512: at line 15

Answer 1

Got it, Thanks, The following stil always produces Not valid for the xml. Do you know a way to get the info on why the xml is invalid?
Thanks
SET SERVEROUTPUT ON SIZE 1000000
DECLARE
RECURSE BOOLEAN := TRUE;
ANNOTATE BOOLEAN := FALSE;
EMBEDCOLL BOOLEAN := TRUE;
XSD_TYPE XMLTYPE;
XSD_CLOB CLOB;
XML_CLOB CLOB;
XML_TYPE XMLTYPE;
valid_flag INTEGER;
p_out     CLOB;
BEGIN
EXECUTE IMMEDIATE 'CREATE OR REPLACE DIRECTORY XML_DIR AS ''C:\XMLAPI_PRODUCE''';
XSD_TYPE := dbms_xmlschema.generateschema('SJS','XMLAPI_INCIDENT_TYPE','APIIncident',RECURSE,ANNOTATE,EMBEDCOLL);
XSD_CLOB := XSD_TYPE.getclobval;
dbms_xmlschema.deleteSchema('http://www.oracle.com/best.xsd', dbms_xmlschema.DELETE_CASCADE);
dbms_xmlschema.registerSchema('http://www.oracle.com/best.xsd', XSD_CLOB);
sjs.file_util.write_clob(XSD_CLOB,'TEST.xml','C:\XMLAPI_PRODUCE');
DBMS_LOB.CREATETEMPORARY(xml_CLOB,TRUE,dbms_lob.CALL);
DBMS_LOB.OPEN(xml_CLOB, DBMS_LOB.LOB_READWRITE);
sjs.file_util.ReadClob(xml_CLOB,'XML_DIR','TEST.xml');
xml_type := XMLTYPE.createXML(xml_clob);
IF xml_type.isSchemaValid(XSD_CLOB) = 1 THEN
DBMS_OUTPUT.PUT_LINE('Valid xml');
ELSE
DBMS_OUTPUT.PUT_LINE('NOT Valid xml');
END IF;
DBMS_LOB.CLOSE(xml_CLOB);
DBMS_LOB.FREETEMPORARY(xml_CLOB);
dbms_output.put_line(p_out);
END;