MINI MINI MANI MO

Path : /opt/oracle/product/18c/dbhomeXE/ord/im/admin/
File Upload :
Current File : //opt/oracle/product/18c/dbhomeXE/ord/im/admin/imxreins.sql

Rem
Rem
Rem imxreins.sql
Rem
Rem Copyright (c) 2009, 2013, Oracle and/or its affiliates. 
Rem All rights reserved. 
Rem
Rem    NAME
Rem      imxreins.sql 
Rem
Rem    DESCRIPTION
Rem      This script inserts back the old version of oracle default documents 
Rem      that were updated during upgrade/patch into the dicom repository.
Rem
Rem    NOTES
Rem      Before running this script user must be connected as a user
Rem       with authority to insert dicom repository documents and
Rem       ordsys.ord_dicom_admin.editdatamodel has been called.
Rem      After running this script 
Rem       ordsys.ord_dicom_admin.publishdatamodel has to be called.
Rem
Rem    MODIFIED   (MM/DD/YY)
Rem

@@?/rdbms/admin/sqlsessstart.sql



-- insert the ordcmcmd.xml into the dicom repos
declare 
 xt sys.XMLtype;
 ex exception;
 pragma exception_init(ex, -53002);
 ordcmXml varchar2(32767);
 ordClob   clob;
begin
 sys.dbms_lob.createTemporary( ordClob, true, sys.dbms_lob.call );
 ordcmXml := '<?xml version="1.0" encoding="UTF-8"?>' ||
'<!-- Copyright (c) 2007, Oracle. All rights reserved.  ' ||
'  NAME' ||
'  ordcmcmd.xml - Oracle Multimedia DICOM default constraint ' ||
'                 module definition document' ||
'  ' ||
'   MODIFIED   (MM/DD/YY)' ||
'   smavris     03/26/13 - XbranchMerge smavris_bug-16473669 from
'                          st_ordim_12.1.0
'   dolin       06/06/07 - ' ||
'   dguo        05/18/07 - change product name' ||
'   myalavar    04/09/07 - add major_minor version' ||
'   dguo        08/01/06 - Beta release 1' ||
'   dguo        04/03/05 - Created' ||
'' ||
'' ||
'-->' ||
'' ||
'<CONFORMANCE_CONSTRAINT_DEFINITION xmlns="http://xmlns.oracle.com/ord/dicom/constraint_1_0" xmlns:dt="http://xmlns.oracle.com/ord/dicom/datatype_1_0" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://xmlns.oracle.com/ord/dicom/constraint_1_0 http://xmlns.oracle.com/ord/dicom/constraint_1_0">' ||
' <DOCUMENT_HEADER>' ||
'  <dt:DOCUMENT_CHANGE_LOG>' ||
'   <dt:DOCUMENT_MODIFIER>Dongbai Guo</dt:DOCUMENT_MODIFIER>' ||
'   <dt:DOCUMENT_MODIFICATION_DATE>2007-04-09</dt:DOCUMENT_MODIFICATION_DATE>' ||
'   <dt:DOCUMENT_VERSION>1.0</dt:DOCUMENT_VERSION>' ||
'   <dt:MODIFICATION_COMMENT>Oracle default constraint module definition</dt:MODIFICATION_COMMENT>' ||
'   <dt:BASE_DOCUMENT>DICOM Base Standard 2007 Part 3.3</dt:BASE_DOCUMENT>' ||
'   <dt:BASE_DOCUMENT_RELEASE_DATE>2007-01-01</dt:BASE_DOCUMENT_RELEASE_DATE>' ||
'   <dt:BASE_DOCUMENT_DESCRIPTION>Downloadable from http://medical.nema.org/</dt:BASE_DOCUMENT_DESCRIPTION>' ||
'  </dt:DOCUMENT_CHANGE_LOG>' ||
' </DOCUMENT_HEADER>' ||
'' ||
' <EXTERNAL_MACRO_INCLUDE name="CodeSequenceMacro">Defines a code sequence macro</EXTERNAL_MACRO_INCLUDE>' ||
' <EXTERNAL_MACRO_INCLUDE name="PersonIdentifierMacro">Defines a person identification macro</EXTERNAL_MACRO_INCLUDE>' ||
' <GLOBAL_RULE name="PatientModule">' ||
'   <DESCRIPTION>' ||
'     A subset of Patient Module defined in DICOM standard, ' ||
'     PS 3.3-2007, Table C.7-1' ||
'   </DESCRIPTION>' ||
'   <PREDICATE>' ||
'     <BOOLEAN_FUNC operator="notEmpty">' ||
'       <ATTRIBUTE_TAG>00100040</ATTRIBUTE_TAG>' ||
'     </BOOLEAN_FUNC>' ||
'   </PREDICATE>' ||
'   <PREDICATE>' ||
'     <DESCRIPTION>Patient''s Sex</DESCRIPTION>' ||
'     <RELATIONAL operator="in">' ||
'       <ATTRIBUTE_TAG>00100040</ATTRIBUTE_TAG>' ||
'       <STRING_VALUE>M</STRING_VALUE>' ||
'       <STRING_VALUE>F</STRING_VALUE>' ||
'       <STRING_VALUE>O</STRING_VALUE>' ||
'     </RELATIONAL>' ||
'   </PREDICATE>' ||
'   <PREDICATE>' ||
'     <DESCRIPTION>Referenced patient sequence constraint</DESCRIPTION>' ||
'     <LOGICAL operator="derive">' ||
'       <PREDICATE>' ||
'         <BOOLEAN_FUNC operator="occurs">' ||
'           <ATTRIBUTE_TAG>00081120</ATTRIBUTE_TAG>' ||
'         </BOOLEAN_FUNC>' ||
'       </PREDICATE>' ||
'       <PREDICATE>' ||
'         <LOGICAL operator="and">' ||
'           <PREDICATE>' ||
'             <BOOLEAN_FUNC operator="notEmpty">' ||
'               <ATTRIBUTE_TAG>00081120.00081150</ATTRIBUTE_TAG>' ||
'             </BOOLEAN_FUNC>' ||
'           </PREDICATE>' ||
'           <PREDICATE>' ||
'             <BOOLEAN_FUNC operator="notEmpty">' ||
'               <ATTRIBUTE_TAG>00081120.00081155</ATTRIBUTE_TAG>' ||
'             </BOOLEAN_FUNC>' ||
'           </PREDICATE>    ' ||
'         </LOGICAL>' ||
'       </PREDICATE>' ||
'     </LOGICAL>' ||
'   </PREDICATE>' ||
'   <ACTION action="log" when="false">Validation error: missing mandatory attribute for patient module</ACTION>' ||
'   <ACTION action="warning" when="false">Warning: validation failure</ACTION>' ||
' </GLOBAL_RULE>' ||
' ' ||
' <GLOBAL_RULE name="GeneralStudyModule">' ||
'   <DESCRIPTION>' ||
'     A subset of General Study Module defined in DICOM standard, ' ||
'     PS 3.3-2007, Table C.7-3' ||
'   </DESCRIPTION>' ||
'   <PREDICATE>' ||
'     <DESCRIPTION>Referring Physician Identification Sequence</DESCRIPTION>' ||
'     <LOGICAL operator="derive">' ||
'       <PREDICATE>' ||
'         <BOOLEAN_FUNC operator="occurs">' ||
'           <ATTRIBUTE_TAG>00080096</ATTRIBUTE_TAG>' ||
'         </BOOLEAN_FUNC>' ||
'       </PREDICATE>' ||
'       <PREDICATE>' ||
'         <INVOKE_MACRO>' ||
'           <MACRO_NAME>PersonIdentifierMacro</MACRO_NAME>' ||
'           <PARAMETER>' ||
'             <NAME>PersonIDAttr</NAME>' ||
'             <VALUE>00080096</VALUE>' ||
'           </PARAMETER>' ||
'         </INVOKE_MACRO>' ||
'       </PREDICATE>' ||
'     </LOGICAL>' ||
'   </PREDICATE>' ||
'   <PREDICATE>' ||
'     <DESCRIPTION>Study Instance UID</DESCRIPTION>' ||
'     <BOOLEAN_FUNC operator="notEmpty">' ||
'       <ATTRIBUTE_TAG>0020000D</ATTRIBUTE_TAG>' ||
'     </BOOLEAN_FUNC>' ||
'   </PREDICATE>' ||
' </GLOBAL_RULE>' ||
'  ' ||
'  <GLOBAL_RULE name="GeneralSeriesModule">' ||
'    <DESCRIPTION>' ||
'      A subset of General Series Module defined in DICOM standard,' ||
'      PS 3.3-2007, Table C.7-5a' ||
'    </DESCRIPTION>' ||
'    <PREDICATE>' ||
'      <BOOLEAN_FUNC operator="notEmpty">' ||
'        <ATTRIBUTE_TAG>00080060</ATTRIBUTE_TAG>' ||
'      </BOOLEAN_FUNC>' ||
'      <ACTION action="warning" when="false">' ||
'        missing attribute 00080060 ' ||
'      </ACTION>' ||
'    </PREDICATE>' ||
'    <PREDICATE>' ||
'      <BOOLEAN_FUNC operator="notEmpty">' ||
'        <ATTRIBUTE_TAG>0020000E</ATTRIBUTE_TAG>' ||
'      </BOOLEAN_FUNC>' ||
'      <ACTION action="warning" when="false">' ||
'        missing attribute 0020000E ' ||
'      </ACTION>' ||
'    </PREDICATE>' ||
'    <PREDICATE>' ||
'      <LOGICAL operator="derive">' ||
'        <PREDICATE>' ||
'          <BOOLEAN_FUNC operator="notEmpty">' ||
'            <ATTRIBUTE_TAG>00400260</ATTRIBUTE_TAG>' ||
'          </BOOLEAN_FUNC>' ||
'        </PREDICATE>' ||
'        <PREDICATE>' ||
'          <INVOKE_MACRO>' ||
'            <MACRO_NAME>CodeSequenceMacro</MACRO_NAME>' ||
'            <PARAMETER>' ||
'              <NAME>CodeAttr</NAME>' ||
'              <VALUE>00400260</VALUE>' ||
'            </PARAMETER>' ||
'          </INVOKE_MACRO>' ||
'          <ACTION action="warning" when="false">' ||
'            missing attribute 00400260.00080100 or 00400260.00080102 ' ||
'          </ACTION>' ||
'        </PREDICATE>' ||
'      </LOGICAL>' ||
'    </PREDICATE>' ||
'    <ACTION action="warning" when="false">' ||
'      GeneralSeriesModule is not satisfied' ||
'    </ACTION>' ||
'  </GLOBAL_RULE>  ' ||
'' ||
'  <GLOBAL_RULE name="SOPCommonModule">' ||
'    <DESCRIPTION>' ||
'      A subset of SOP Common Module defined in DICOM standard,' ||
'      PS 3.3-2007, Table C.12-1' ||
'    </DESCRIPTION>' ||
'    <PREDICATE>' ||
'      <BOOLEAN_FUNC operator="notEmpty">' ||
'        <ATTRIBUTE_TAG>00080016</ATTRIBUTE_TAG>' ||
'      </BOOLEAN_FUNC>' ||
'    </PREDICATE>' ||
'    <PREDICATE>' ||
'      <BOOLEAN_FUNC operator="notEmpty">' ||
'        <ATTRIBUTE_TAG>00080018</ATTRIBUTE_TAG>' ||
'      </BOOLEAN_FUNC>' ||
'    </PREDICATE>' ||
'  </GLOBAL_RULE>' ||
'  ' ||
'  <GLOBAL_RULE name="ImagePixelMacro">' ||
'    <DESCRIPTION>' ||
'      A subset of Image Pixel Macro defined in DICOM standard,' ||
'      PS 3.3-2007, Table C.7-11b' ||
'    </DESCRIPTION>' ||
'    <PREDICATE>' ||
'      <BOOLEAN_FUNC operator="notEmpty">' ||
'        <ATTRIBUTE_TAG>00280002</ATTRIBUTE_TAG>' ||
'      </BOOLEAN_FUNC>' ||
'    </PREDICATE>' ||
'    <PREDICATE>' ||
'      <BOOLEAN_FUNC operator="notEmpty">' ||
'        <ATTRIBUTE_TAG>00280004</ATTRIBUTE_TAG>' ||
'      </BOOLEAN_FUNC>' ||
'    </PREDICATE>' ||
'    <PREDICATE>' ||
'      <RELATIONAL operator="in">' ||
'        <ATTRIBUTE_TAG>00280004</ATTRIBUTE_TAG>' ||
'        <STRING_VALUE>MONOCHROME1</STRING_VALUE>' ||
'        <STRING_VALUE>MONOCHROME2</STRING_VALUE>' ||
'        <STRING_VALUE>PALETTE COLOR</STRING_VALUE>' ||
'        <STRING_VALUE>RGB</STRING_VALUE>' ||
'      </RELATIONAL>' ||
'    </PREDICATE>' ||
'    <PREDICATE>' ||
'      <BOOLEAN_FUNC operator="notEmpty">' ||
'        <ATTRIBUTE_TAG>00280010</ATTRIBUTE_TAG>' ||
'      </BOOLEAN_FUNC>' ||
'    </PREDICATE>' ||
'    <PREDICATE>' ||
'      <BOOLEAN_FUNC operator="notEmpty">' ||
'        <ATTRIBUTE_TAG>00280011</ATTRIBUTE_TAG>' ||
'      </BOOLEAN_FUNC>' ||
'    </PREDICATE>' ||
'    <PREDICATE>' ||
'      <RELATIONAL operator="in">' ||
'        <ATTRIBUTE_TAG>00280100</ATTRIBUTE_TAG>' ||
'        <STRING_VALUE>8</STRING_VALUE>' ||
'        <STRING_VALUE>12</STRING_VALUE>' ||
'        <STRING_VALUE>16</STRING_VALUE>' ||
'        <STRING_VALUE>24</STRING_VALUE>' ||
'      </RELATIONAL>' ||
'    </PREDICATE>' ||
'    <PREDICATE>' ||
'      <BOOLEAN_FUNC operator="notEmpty">' ||
'        <ATTRIBUTE_TAG>00280101</ATTRIBUTE_TAG>' ||
'      </BOOLEAN_FUNC>' ||
'    </PREDICATE>' ||
'    <PREDICATE>' ||
'      <BOOLEAN_FUNC operator="notEmpty">' ||
'        <ATTRIBUTE_TAG>00280102</ATTRIBUTE_TAG>' ||
'      </BOOLEAN_FUNC>' ||
'    </PREDICATE>' ||
'    <PREDICATE>' ||
'      <BOOLEAN_FUNC operator="notEmpty">' ||
'        <ATTRIBUTE_TAG>00280103</ATTRIBUTE_TAG>' ||
'      </BOOLEAN_FUNC>' ||
'    </PREDICATE>' ||
'    <PREDICATE>' ||
'      <LOGICAL operator="derive">' ||
'        <PREDICATE>' ||
'          <LOGICAL operator="not">' ||
'            <PREDICATE>' ||
'              <BOOLEAN_FUNC operator="occurs">' ||
'                <ATTRIBUTE_TAG>00287FE0</ATTRIBUTE_TAG>' ||
'              </BOOLEAN_FUNC>' ||
'            </PREDICATE>' ||
'          </LOGICAL>' ||
'        </PREDICATE>' ||
'        <PREDICATE>' ||
'          <BOOLEAN_FUNC operator="notEmpty">' ||
'            <ATTRIBUTE_TAG>7FE00010</ATTRIBUTE_TAG>' ||
'          </BOOLEAN_FUNC>' ||
'        </PREDICATE>' ||
'      </LOGICAL>' ||
'    </PREDICATE>' ||
'    <PREDICATE>' ||
'      <LOGICAL operator="derive">' ||
'        <PREDICATE>' ||
'          <RELATIONAL operator="gt">' ||
'            <ATTRIBUTE_TAG>00280002</ATTRIBUTE_TAG>' ||
'            <STRING_VALUE>1</STRING_VALUE>' ||
'          </RELATIONAL>' ||
'        </PREDICATE>' ||
'        <PREDICATE>' ||
'          <BOOLEAN_FUNC operator="notEmpty">' ||
'            <ATTRIBUTE_TAG>00280006</ATTRIBUTE_TAG>' ||
'          </BOOLEAN_FUNC>' ||
'        </PREDICATE>' ||
'      </LOGICAL>' ||
'    </PREDICATE>' ||
'    <PREDICATE>' ||
'      <LOGICAL operator="derive">' ||
'        <PREDICATE>' ||
'          <LOGICAL operator="or">' ||
'            <PREDICATE>' ||
'              <RELATIONAL operator="eq">' ||
'                <ATTRIBUTE_TAG>00280004</ATTRIBUTE_TAG>' ||
'                <STRING_VALUE>PALETTE COLOR</STRING_VALUE>' ||
'              </RELATIONAL>' ||
'            </PREDICATE>' ||
'            <PREDICATE>' ||
'              <LOGICAL operator="and">' ||
'                <PREDICATE>' ||
'                  <BOOLEAN_FUNC operator="notEmpty">' ||
'                    <ATTRIBUTE_TAG>00089205</ATTRIBUTE_TAG>' ||
'                  </BOOLEAN_FUNC>' ||
'                </PREDICATE>' ||
'                <PREDICATE>' ||
'                  <RELATIONAL operator="in">' ||
'                    <ATTRIBUTE_TAG>00089205</ATTRIBUTE_TAG>' ||
'                    <STRING_VALUE>COLOR</STRING_VALUE>' ||
'                    <STRING_VALUE>MIXED</STRING_VALUE>' ||
'                  </RELATIONAL>' ||
'                </PREDICATE>' ||
'              </LOGICAL>' ||
'            </PREDICATE>' ||
'          </LOGICAL>' ||
'        </PREDICATE>' ||
'        <PREDICATE>' ||
'          <LOGICAL operator="and">' ||
'            <PREDICATE>' ||
'              <BOOLEAN_FUNC operator="notEmpty">' ||
'                <ATTRIBUTE_TAG>00281101</ATTRIBUTE_TAG>' ||
'              </BOOLEAN_FUNC>' ||
'            </PREDICATE>' ||
'            <PREDICATE>' ||
'              <BOOLEAN_FUNC operator="notEmpty">' ||
'                <ATTRIBUTE_TAG>00281102</ATTRIBUTE_TAG>' ||
'              </BOOLEAN_FUNC>' ||
'            </PREDICATE>' ||
'            <PREDICATE>' ||
'              <BOOLEAN_FUNC operator="notEmpty">' ||
'                <ATTRIBUTE_TAG>00281103</ATTRIBUTE_TAG>' ||
'              </BOOLEAN_FUNC>' ||
'            </PREDICATE>' ||
'            <PREDICATE>' ||
'              <BOOLEAN_FUNC operator="notEmpty">' ||
'                <ATTRIBUTE_TAG>00281201</ATTRIBUTE_TAG>' ||
'              </BOOLEAN_FUNC>' ||
'            </PREDICATE>      ' ||
'            <PREDICATE>' ||
'              <BOOLEAN_FUNC operator="notEmpty">' ||
'                <ATTRIBUTE_TAG>00281202</ATTRIBUTE_TAG>' ||
'              </BOOLEAN_FUNC>' ||
'            </PREDICATE>      ' ||
'            <PREDICATE>' ||
'              <BOOLEAN_FUNC operator="notEmpty">' ||
'                <ATTRIBUTE_TAG>00281203</ATTRIBUTE_TAG>' ||
'              </BOOLEAN_FUNC>' ||
'            </PREDICATE>' ||
'          </LOGICAL>' ||
'        </PREDICATE>' ||
'      </LOGICAL>' ||
'    </PREDICATE>   ' ||
'  </GLOBAL_RULE>' ||
'' ||
'</CONFORMANCE_CONSTRAINT_DEFINITION>';

 sys.dbms_lob.write(ordClob, length(ordcmXml), 1, ordcmXml);

 xt := new sys.XMLType(ordClob);
 ordsys.ord_dicom_admin.insertDocument('ordcmcmd.xml','CONSTRAINT',xt);
 sys.dbms_lob.freeTemporary(ordClob);

 exception
   -- rollback the datamodel 
   when others then
     ord_dicom_admin.rollbackDataModel();
     raise;

end;
/


-- insert the ordcmct.xml into the dicom repos
declare 
 xt sys.XMLtype;
 ex exception;
 pragma exception_init(ex, -53002);
 ordcmXml varchar2(32767);
 ordClob   clob;
begin
 sys.dbms_lob.createTemporary( ordClob, true, sys.dbms_lob.call );
 ordcmXml := '<?xml version="1.0" encoding="UTF-8"?>' ||
'<!-- Copyright (c) 2007, Oracle. All rights reserved.  ' ||
'  NAME' ||
'  ordcmct.xml - Oracle Multimedia DICOM default constraint document' ||
'  ' ||
'   MODIFIED   (MM/DD/YY)' ||
'   dolin       06/06/07 - ' ||
'   dguo        05/18/07 - change product name' ||
'   myalavar    04/09/07 - add major_minor version' ||
'   dguo        08/01/06 - Beta release 1' ||
'   dguo        04/03/05 - Created' ||
'' ||
'' ||
'-->' ||
'' ||
'<CONFORMANCE_CONSTRAINT_DEFINITION xmlns="http://xmlns.oracle.com/ord/dicom/constraint_1_0" xmlns:dt="http://xmlns.oracle.com/ord/dicom/datatype_1_0" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://xmlns.oracle.com/ord/dicom/constraint_1_0 http://xmlns.oracle.com/ord/dicom/constraint_1_0">' ||
'  <DOCUMENT_HEADER>' ||
'    <dt:DOCUMENT_CHANGE_LOG>' ||
'      <dt:DOCUMENT_MODIFIER>Dongbai Guo</dt:DOCUMENT_MODIFIER>' ||
'      <dt:DOCUMENT_MODIFICATION_DATE>2007-04-09</dt:DOCUMENT_MODIFICATION_DATE>' ||
'      <dt:DOCUMENT_VERSION>1.0</dt:DOCUMENT_VERSION>' ||
'      <dt:MODIFICATION_COMMENT>Oracle default constraint rules</dt:MODIFICATION_COMMENT>' ||
'    </dt:DOCUMENT_CHANGE_LOG>' ||
'  </DOCUMENT_HEADER>' ||
' <EXTERNAL_RULE_INCLUDE name="ImagePixelMacro">' ||
'   A subset of Image Pixel Macro defined in DICOM standard,' ||
'   PS 3.3-2007, Table C.7-11b' ||
' </EXTERNAL_RULE_INCLUDE>' ||
' <EXTERNAL_RULE_INCLUDE name="GeneralStudyModule">' ||
'   A subset of General Study Module defined in DICOM standard, ' ||
'   PS 3.3-2007, Table C.7-3' ||
' </EXTERNAL_RULE_INCLUDE>   ' ||
' <EXTERNAL_RULE_INCLUDE name="GeneralSeriesModule">' ||
'   A subset of General Series Module defined in DICOM standard,' ||
'   PS 3.3-2007, Table C.7-5a' ||
' </EXTERNAL_RULE_INCLUDE> ' ||
' <EXTERNAL_RULE_INCLUDE  name="SOPCommonModule">' ||
'   A subset of SOP Common Module defined in DICOM standard,' ||
'   PS 3.3-2007, Table C.12-1' ||
' </EXTERNAL_RULE_INCLUDE>' ||
'' ||
' <GLOBAL_RULE name="OracleOrdDicomImage">' ||
'   <PREDICATE>' ||
'     <GLOBAL_RULE_REF>ImagePixelMacro</GLOBAL_RULE_REF>' ||
'   </PREDICATE>' ||
'   <ACTION action="warning" when="false">missing mandatory image attribute</ACTION>' ||
' </GLOBAL_RULE>' ||
' ' ||
' <GLOBAL_RULE name="OracleOrdObject">' ||
'  <PREDICATE>' ||
'    <GLOBAL_RULE_REF>SOPCommonModule</GLOBAL_RULE_REF>' ||
'  </PREDICATE>' ||
'  <PREDICATE>' ||
'    <GLOBAL_RULE_REF>GeneralSeriesModule</GLOBAL_RULE_REF>' ||
'  </PREDICATE>' ||
'  <PREDICATE>' ||
'    <GLOBAL_RULE_REF>GeneralStudyModule</GLOBAL_RULE_REF>' ||
'  </PREDICATE>  ' ||
' </GLOBAL_RULE>' ||
'</CONFORMANCE_CONSTRAINT_DEFINITION>';

 sys.dbms_lob.write(ordClob, length(ordcmXml), 1, ordcmXml);

 xt := new sys.XMLType(ordClob);
 ordsys.ord_dicom_admin.insertDocument('ordcmct.xml','CONSTRAINT',xt);
 sys.dbms_lob.freeTemporary(ordClob);

 exception
   -- rollback the datamodel 
   when others then
     ord_dicom_admin.rollbackDataModel();
     raise;

end;
/


@?/rdbms/admin/sqlsessend.sql

OHA YOOOO