Essbase error maximum number of columns [1] exceeded [15]

I am getting Essbase error: maximum number of columns [1]exceeded [15]This message started appearing after HBR 3.5.1 installWhen I retireve from the same excel spreadsheet on a machinewhich does not have HBR installed it works. I do need to use HBRso, how do I resolve this?

Retrieving more than 500,000 rows in excel are you sure you are using the correct tool, sounds like you are just trying to data dump out of essbase, have a look at other export options.
Cheers
John
http://john-goodwin.blogspot.com/

Similar Messages

Maximum number of columns 90 exceeded

Hi,
after implementation SP SAPKH60409 we have problem with ALV reports FBL1N (3,5).
When I choose a button "select layout" I get the message:
Maximum number of columns 90 exceeded ( Message no. 0K114). It is not true because the layout has less columns.
I have set an user parameter FIT_ALVC = 'X' and it solved the problem but halfway the only.
In FBL1N we can change display layout via "Switch list". The first uses FM REUSE_ALV_GRID_DISPLAY, the second REUSE_ALV_LIST_DISPLAY. In the first it works, but it doesnt in the second.
Did you identify such problems?
regards

We had the same issue occurring where message OK114 was being issued. We had loaded note 1566394 in our system but only had the first correction for this note. SAP applied a 2nd correction to this note on the 28th of March 2011 which has now fixed our issue. Get your developer(s) to check the ABAP include LKKBLF01. At line no. 5946 there is a message being issued "message w114(0k) with con_max_columns." The 2nd correction of the note puts this message within the following IF statement "if l_no_out_count > con_max_columns.". Hopefully this 2nd correction fixes your issue.
Michael Arter

Maximum Number of Columns Error

Okay, I've searched the discussion groups and did not see an answer to this so if anybody can help, it would be greatly appreciated. I have a user trying to pull back numbers from Essbase to an Excel spreadsheet and is getting "Maximum number of columns [1] exceeded [3].There is no Essbase error message associated with the error. I can pull back the same data on my set and do not get the error. Any help......thanks.

I have to disagree with the last comment; there is no "patch" for Hyperion to send. It's a simple version incompatibility. This situation usually occurs when you either upgrade the Essbase version or Excel, usually Essbase. The problem is that the "old" version of the Add-In isn't compatible with the new Essbase kernel, or in some cases the Excel version. Try this: In Excel, uncheck the OLAP Server DLL checkbox and install it again. To do so, browse to the server's hard drive, then to the ...\hyperion\essbase\bin directory and select the Essexcln.xll file. This will get a new copy of the Add-in from the server. This situation has also occurred when version 6 Essbase is used with Excel 2003 and there's a different solution for that. If the above doesn't work, provide me with the Essbase version and the Excel version, along with what (if anything) has recently changed and I'll field it from there.

"Maximum number of application files exceeded or file names too long"...help!!!

Hi there…
I am trying to create a game for my mobile.
The “problem” is that I have more than 500 swfs that I want to pack using the Adobe Mobile Packager. And I am getting this error:
“Maximum number of application files exceeded or file names too long”
How could I solve this problem?
Thanks everyone!
Cheers.
Leo.

500?? What are there so many files?
The problem is that the CAB format only allows for 300 files maximum, so there's nothing that we can do about that I'm afraid.
Mark
www.flashmobileblog.com

Error message "Maximum number of drilldown characteristics exceeded"

Hello,
an user created a Web report. In the navigation block there are nearly 100 selection fields. If you make either "drilldown in the rows" or "drilldown in the columns" you recieve after 50 drilldowns the error message "Maximum number of drilldown characteristics exceeded" and it is not possible to proceed further. Does anybody has got an idea what this can be?
Thanks!
Regards,
Christian

Hi Check SAP Note No -
Note 144478 - BEx: Termination/Message at 10th/20th drilldown characterstc
1. Terminations occur when you drill down a large number of characteristics at the same time during interactive navigation in the Business Explorer Analyzer (Excel).
2. In the global query definition, the system displays message 'Termination: the maximum number (10/20) of drilldown characteristics is exceeded' if the total of the characteristics and structures you are using exceeds
              - 10 objects in Release 1.2B
              - 20 objects in Release 2.0A/2.0B/2. 1C
              during the definition of a query.
Hope it helps
regards
Vikash

ASM issue ORA-00020: maximum number of processes (%s) exceeded (DBD ERROR)

Hi All,
i am running 10.2.0.3 with ASM (10.2.0.3) on SunOS (solaris 5.9)
+ASM1> ps -ef | grep pmon
oraunity 6174     1   0   Jan 01 ?         298:37 ora_pmon_UNITYQ1
oraunity 6480     1   0   Dec 31 ?          84:21 asm_pmon_+ASM1
oraunity 6085     1   0   Mar 09 ?         127:05 ora_pmon_UNIINFQ1
oraunity 11442     1   0   Jan 01 ?         253:54 ora_pmon_UNIDWHQ1One of rdbms instanace UNIINFQ1 got some failuer due to archival error 'ORA-00257:Archiver error:connect internal only:until freed.'
To drill down that, i tried to log in to +ASM1 instance to see space utilization under ARCH destination
SQL> show parameter db_name
NAME                                 TYPE        VALUE
db_name                              string      UNIINFQ1
log_archive_dest                     string      +UNITY_DG1/UNIINFQ1/archi tried following to log in to +ASM1
UNITYQ1> export ORACLE_SID=+ASM1
+ASM1> echo $ORACLE_SID
+ASM1
+ASM1> export ORACLE_HOME=/unity-rc001-q/ora01/app/oracle/product/10.2.0/asm10g
+ASM1> echo $ORACLE_HOME
/unity-rc001-q/ora01/app/oracle/product/10.2.0/asm10g
+ASM1> sqlplus / as sysdba
SQL*Plus: Release 10.2.0.3.0 - Production on Wed Jun 10 00:44:35 2009
Copyright (c) 1982, 2006, Oracle. All Rights Reserved.
Connected.
SQL> select * from v$instance;
select * from v$instance
ERROR at line 1:
ORA-01012: not logged onthen i did following
+ASM1> asmcmd
ORA-00020: maximum number of processes (%s) exceeded (DBD ERROR: OCISessionBegin)
[oraunity] mhs-clust5-qa:/unity-rc001-q/ora01/app/oracle/admin/UNIINFQ1/bdump:i have also noticed high number of BEQUETH connections to +ASM1 instance
+ASM1> ps -ef | grep +ASM1
oraunity 6486     1   0   Dec 31 ?         193:20 asm_lmon_+ASM1
oraunity 6533     1   0   Dec 31 ?          11:49 asm_ckpt_+ASM1
oraunity 6482     1   0   Dec 31 ?         108:29 asm_diag_+ASM1
oraunity 6527     1   0   Dec 31 ?           9:28 asm_mman_+ASM1
oraunity 6210     1   0   Mar 09 ?           8:03 oracle+ASM1 (DESCRIPTION=(LOCAL=YES)(ADDRESS=(PROTOCOL=beq)))
oraunity 6484     1   0   Dec 31 ?           7:40 asm_psp0_+ASM1
oraunity 6488     1   0   Dec 31 ?         221:17 asm_lmd0_+ASM1
oraunity 6480     1   0   Dec 31 ?          84:21 asm_pmon_+ASM1
oraunity 6529     1   0   Dec 31 ?           8:42 asm_dbw0_+ASM1
oraunity 6535     1   0   Dec 31 ?           6:45 asm_smon_+ASM1
oraunity 6523     1   0   Dec 31 ?         241:24 asm_lms0_+ASM1
oraunity 6531     1   0   Dec 31 ?           9:22 asm_lgwr_+ASM1
oraunity 6537     1   0   Dec 31 ?           9:03 asm_rbal_+ASM1
oraunity 6539     1   0   Dec 31 ?          14:36 asm_gmon_+ASM1
oraunity 6575     1   0   Dec 31 ?          45:59 asm_lck0_+ASM1
oraunity 6328     1   0   Jan 01 ?          15:08 oracle+ASM1 (DESCRIPTION=(LOCAL=YES)(ADDRESS=(PROTOCOL=beq)))
oraunity 7866     1   0 16:09:10 ?           0:00 oracle+ASM1 (DESCRIPTION=(LOCAL=YES)(ADDRESS=(PROTOCOL=beq)))
oraunity 6941     1   0 16:24:30 ?           0:00 oracle+ASM1 (DESCRIPTION=(LOCAL=YES)(ADDRESS=(PROTOCOL=beq)))
oraunity 11553     1   0   Jan 01 ?          42:00 oracle+ASM1 (DESCRIPTION=(LOCAL=YES)(ADDRESS=(PROTOCOL=beq)))
oraunity 5010     1   0 16:23:30 ?           0:00 oracle+ASM1 (DESCRIPTION=(LOCAL=YES)(ADDRESS=(PROTOCOL=beq)))
oraunity 1171     1   0 16:21:30 ?           0:00 oracle+ASM1 (DESCRIPTION=(LOCAL=YES)(ADDRESS=(PROTOCOL=beq)))
oraunity 26147     1   0 16:18:49 ?           0:00 oracle+ASM1 (DESCRIPTION=(LOCAL=YES)(ADDRESS=(PROTOCOL=beq)))
oraunity 17948     1   0 16:14:30 ?           0:00 oracle+ASM1 (DESCRIPTION=(LOCAL=YES)(ADDRESS=(PROTOCOL=beq)))
oraunity 16097     1   0 16:13:30 ?           0:00 oracle+ASM1 (DESCRIPTION=(LOCAL=YES)(ADDRESS=(PROTOCOL=beq)))
oraunity 19867     1   0 16:15:30 ?           0:00 oracle+ASM1 (DESCRIPTION=(LOCAL=YES)(ADDRESS=(PROTOCOL=beq)))
oraunity 14221     1   0 16:12:30 ?           0:00 oracle+ASM1 (DESCRIPTION=(LOCAL=YES)(ADDRESS=(PROTOCOL=beq)))
oraunity 25640 4784   0 02:36:15 pts/4       0:00 grep +ASM1
oraunity 8513     1   0 16:09:30 ?           0:00 oracle+ASM1 (DESCRIPTION=(LOCAL=YES)(ADDRESS=(PROTOCOL=beq)))
oraunity 23732     1   0 16:17:30 ?           0:00 oracle+ASM1 (DESCRIPTION=(LOCAL=YES)(ADDRESS=(PROTOCOL=beq)))
oraunity 7864     1   0 16:09:09 ?           0:19 oracle+ASM1 (DESCRIPTION=(LOCAL=YES)(ADDRESS=(PROTOCOL=beq)))
oraunity 3109     1   0 16:22:30 ?           0:00 oracle+ASM1 (DESCRIPTION=(LOCAL=YES)(ADDRESS=(PROTOCOL=beq)))
oraunity 27439     1   0 16:19:30 ?           0:00 oracle+ASM1 (DESCRIPTION=(LOCAL=YES)(ADDRESS=(PROTOCOL=beq)))
oraunity 10400     1   0 16:10:30 ?           0:00 oracle+ASM1 (DESCRIPTION=(LOCAL=YES)(ADDRESS=(PROTOCOL=beq)))
oraunity 5588     1   0 16:23:49 ?           0:00 oracle+ASM1 (DESCRIPTION=(LOCAL=YES)(ADDRESS=(PROTOCOL=beq)))
oraunity 16667     1   0 16:13:48 ?           0:00 oracle+ASM1 (DESCRIPTION=(LOCAL=YES)(ADDRESS=(PROTOCOL=beq)))
oraunity 21832     1   0 16:16:30 ?           0:00 oracle+ASM1 (DESCRIPTION=(LOCAL=YES)(ADDRESS=(PROTOCOL=beq)))
oraunity 12308     1   0 16:11:30 ?           0:00 oracle+ASM1 (DESCRIPTION=(LOCAL=YES)(ADDRESS=(PROTOCOL=beq)))
oraunity 29330     1   0 16:20:30 ?           0:00 oracle+ASM1 (DESCRIPTION=(LOCAL=YES)(ADDRESS=(PROTOCOL=beq)))
oraunity 25581     1   0 16:18:30 ?           0:00 oracle+ASM1 (DESCRIPTION=(LOCAL=YES)(ADDRESS=(PROTOCOL=beq)))Can anyone help me to solve this issue without shutting down +ASM1. (this instance is used by rest 3 databases as well..so down time is not feasible)
Regards,
Bhavik Desai

You should check alert log file on database like Alex told you.
And please post Error ;)
But If You can access +ASM, Or ...by the way... if you stop database ... try to check ASM diskgroup.
$ export ORACLE_SID=+ASM1
$ sqlplus / as sysdba
SQL> set lines 130
SQL> set pages 10000
SQL> select NAME, TOTAL_MB, FREE_MB from v$asm_diskgroup;
If your DISKGROUPs for archivelog on DB full... backup or delete them
(please start database mount mode)
$ export ORACLE_SID=DB1
$ sqlplus / as sysdba
SQL> startup mount;
SQL> show parameter log_archive_dest
backup archivelog
$ rman target /
RMAN> backup ARCHIVELOG ALL DELETE INPUT format 'ARCH_%d_%U' ;
or delete
$ rman target /
RMAN> delete ARCHIVELOG ALL ;
After that ...
$ sqlplus / as sysdba
SQL> alter database open
This justs my suggestion, if your database has the problem with ASM diskgroup full ... because archvielog...
By the way... please post your result from ASM query and alert log file
Good Luck

ORA-Error: Maximum number of Processes exceeds

Hi,
Today we got one Oracle error: Maximum number of Processes exceeds while connects to our Oracle Database.
We have application running on our DB, which have 50 threads running and making connection to Oracle Schema.
In our init.ora file the Processes Parameter is set to 50.
But we also have another init<Schema Name>.ora file which has Processes Parameter as 50.
When I search on this error, I got that it is due to no. of user processes on Oracle instance.
What are these user processes exactly?
If we set the Processes Parameter as 150, and we have RAC environment with 3 Cluster, does it means we have 150*3 processes can run at a time.
The other doubt I have is that: Is this parameter is instance based, SID based or cluster based?
Please provide some input on this.
Thanks in Advance.
Manoj Macwan

If you don't issue
alter system set processes=150 scope=both sid='<your instance 1>'
all instances will be allowed to fork 150 processes.
The other poster is incorrect.
Sybrand Bakker
Senior Oracle DBA

Registerschema gives ORA-01792: maximum number of columns...

Hi,
DB: Oracle9i Enterprise Edition Release 9.2.0.6.0
Opp Sys: HP-UX
I've just increased the size of an XSD we have loaded in a customers database and attempting to reload using dbms_xmlschema.registerschema gives the following error:
ORA-31084: error while creating table "SOLO"."LetterRoot5799_TAB" for element "LetterRoot"
ORA-01792: maximum number of columns in a table or view is 1000
ORA-02310: exceeded maximum number of allowable columns in table
ORA-06512: at "XDB.DBMS_XMLSCHEMA_INT", line 0
ORA-06512: at "XDB.DBMS_XMLSCHEMA", line 26
ORA-06512: at "SOLO.WORK_TEST_LETTERS_XSD", line 23
ORA-06512: at line 2
Is there a work around for this?
Thanks,
Mike Moore

Hi! I faced the same problem as author of a thread. At first it was just the same and I used solution that was offered - add attribute xdb:SQLInline="false".
But now this error (ORA-01792: maximum number of columns in a table or view is 1000) became to rise on element that doesn't have a lot of attributes or subelements that coul exceed limit of 1000! Moreover it is based on complex type that already exists! It was created during another schema registration, which is included in schema that I'm trying to register now!
Does anyone challenged this problem?
I use Oracle9i Enterprise Edition Release 9.2.0.5.0

ORA 01792 maximum number of columns in a table or view is 1000

Hello every1, I wish to register a large xmlschema doc, I am using the command
begin
dbms_xmlschema.registerschema(
schemaurl=>'xxxx',
schemadoc=>bfilename('XMLDIR','xxxxxx.xsd'),
csid=>nls_charset_id('AL32UTF8'));
end;
But the schema file exists 1000 col and it gives me the error msg of
ORA-01792: maximum number of columns in a table or view is 1000
is there anyway to solve the problems without edit the original schema document?
Thanks for your help

First create this package
create or replace package XDB_ANALYZE_XMLSCHEMA_10200
authid CURRENT_USER
as
function analyzeStorageModel(P_COMPLEX_TYPE_NAME VARCHAR2) return XMLTYPE;
function analyzeComplexType(COMPLEX_TYPE VARCHAR2) return XMLTYPE;
procedure renameCollectionTable (XMLTABLE varchar2, XPATH varchar2, COLLECTION_TABLE_PREFIX varchar2);
function printNestedTables(XML_TABLE varchar2) return XMLType;
function getComplexTypeElementList(P_SQLTYPE VARCHAR2, P_SQLSCHEMA VARCHAR2) return XDB.XDB$XMLTYPE_REF_LIST_T;
procedure scopeXMLReferences;
procedure indexXMLReferences(INDEX_NAME VARCHAR2);
function generateSchemaFromTable(P_TABLE_NAME varchar2, P_OWNER varchar2 default USER) return XMLTYPE;
function showSQLTypes(schemaFolder varchar2) return XMLType;
function generateCreateTableStatement(XML_TABLE_NAME varchar2, NEW_TABLE_NAME varchar2) return CLOB;
end XDB_ANALYZE_XMLSCHEMA_10200;
show errors
create or replace package body XDB_ANALYZE_XMLSCHEMA_10200
as
G_DEPTH_COUNT NUMBER(2) := 0;
TYPE BASETYPE_T is RECORD
SUBTYPE varchar2(128),
SUBTYPE_OWNER varchar2(32),
BASETYPE varchar2(128),
BASETYPE_OWNER varchar2(32)
TYPE BASETYPE_LIST_T IS TABLE OF BASETYPE_T;
BASETYPE_LIST BASETYPE_LIST_T := BASETYPE_LIST_T();
function findStorageModel(P_TYPE_NAME VARCHAR2, P_TYPE_OWNER VARCHAR2, P_INCLUDE_SUBTYPES VARCHAR2 DEFAULT 'YES') return XMLType;
function getLocalAttributes(P_TYPE_NAME varchar2, P_TYPE_OWNER VARCHAR2) return XMLType;
function makeElement(P_NAME varchar2)
return xmltype
as
V_NAME varchar2(4000) := P_NAME;
begin
-- -- dbms_output.put_line('Processing : ' || P_NAME);
if (P_NAME LIKE '%$') then
 V_NAME := SUBSTR(V_NAME,1,LENGTH(V_NAME) - 1);
end if;
if (P_NAME LIKE '%$%') then
 V_NAME := REPLACE(V_NAME,'$','_0x22_');
end if;
return XMLTYPE( '<' || V_NAME || '/>');
end;
function getPathToRoot(SUBTYPE VARCHAR2, SUBTYPE_OWNER VARCHAR2)
return varchar2
as
TYPE_HIERARCHY varchar2(4000);
begin
 SELECT sys_connect_by_path( OWNER || '.' || TYPE_NAME , '/')
 INTO TYPE_HIERARCHY
 FROM ALL_TYPES
 WHERE TYPE_NAME = SUBTYPE
 AND OWNER = SUBTYPE_OWNER
 CONNECT BY SUPERTYPE_NAME = PRIOR TYPE_NAME
 AND SUPERTYPE_OWNER = PRIOR OWNER
 START WITH SUPERTYPE_NAME IS NULL
 AND SUPERTYPE_OWNER IS NULL;
 return TYPE_HIERARCHY;
end;
function expandSQLType(ATTR_NAME VARCHAR2, SUBTYPE VARCHAR2, SUBTYPE_OWNER VARCHAR2)
return XMLType
as
STORAGE_MODEL XMLTYPE;
ATTRIBUTES XMLTYPE;
EXTENDED_TYPE XMLTYPE;
ATTR_COUNT NUMBER := 0;
CURSOR FIND_EXTENDED_TYPES
is
select TYPE_NAME, OWNER
 from ALL_TYPES
 where SUPERTYPE_NAME = SUBTYPE
 and SUPERTYPE_OWNER = SUBTYPE_OWNER;
begin
-- dbms_output.put_line('Processing SQLType : "' || SUBTYPE_OWNER || '.' || SUBTYPE || '".' );
STORAGE_MODEL := makeElement(ATTR_NAME);
select insertChildXML(STORAGE_MODEL,'/' || STORAGE_MODEL.getRootElement(),'@type',SUBTYPE)
 into STORAGE_MODEL
 from dual;
select insertChildXML(STORAGE_MODEL,'/' || STORAGE_MODEL.getRootElement(),'@typeOwner',SUBTYPE_OWNER)
 into STORAGE_MODEL
 from dual;
ATTRIBUTES := getLocalAttributes(SUBTYPE, SUBTYPE_OWNER);
ATTR_COUNT := ATTR_COUNT + ATTRIBUTES.extract('/' || ATTRIBUTES.getRootElement() || '/@columns').getNumberVal();
select appendChildXML(STORAGE_MODEL,'/' || STORAGE_MODEL.getRootElement(),ATTRIBUTES)
 into STORAGE_MODEL
 from DUAL;
for t in FIND_EXTENDED_TYPES loop
 EXTENDED_TYPE := expandSQLType('ExtendedType',T.TYPE_NAME,T.OWNER);
 ATTR_COUNT := ATTR_COUNT + EXTENDED_TYPE.extract('/' || EXTENDED_TYPE.getRootElement() || '/@columns').getNumberVal();
 select appendChildXML(STORAGE_MODEL,'/' || STORAGE_MODEL.getRootElement(),EXTENDED_TYPE)
 into STORAGE_MODEL
 from DUAL;
end loop;
select insertChildXML(STORAGE_MODEL,'/' || STORAGE_MODEL.getRootElement(),'@columns',ATTR_COUNT)
 into STORAGE_MODEL
 from dual;
return STORAGE_MODEL;
end;
function getLocalAttributes(P_TYPE_NAME varchar2, P_TYPE_OWNER VARCHAR2)
return XMLType
as
V_ATTRIBUTE_COUNT NUMBER := 0;
V_TOTAL_ATTRIBUTES NUMBER := 0;
V_TEMP_RESULT NUMBER;
V_COLLECTION_TYPE varchar2(32);
V_COLLECTION_OWNER varchar2(32);
CURSOR FIND_CHILD_ATTRS
is
select ATTR_NAME, ATTR_TYPE_OWNER, ATTR_TYPE_NAME, INHERITED
 from ALL_TYPE_ATTRS
 where TYPE_NAME = P_TYPE_NAME
 and OWNER = P_TYPE_OWNER
 and INHERITED = 'NO'
 order by ATTR_NO;
V_ATTR DBMS_XMLDOM.DOMATTR;
V_ATTRIBUTE_LIST XMLTYPE;
V_ATTRIBUTE_LIST_DOCUMENT DBMS_XMLDOM.DOMDOCUMENT;
V_ATTRIBUTE_LIST_ROOT DBMS_XMLDOM.DOMELEMENT;
V_ATTRIBUTE XMLTYPE;
V_ATTRIBUTE_DOCUMENT DBMS_XMLDOM.DOMDOCUMENT;
V_ATTRIBUTE_ROOT DBMS_XMLDOM.DOMELEMENT;
V_TYPE_DEFINITION XMLTYPE;
V_TYPE_DEFINITION_DOCUMENT DBMS_XMLDOM.DOMDOCUMENT;
V_TYPE_DEFINITION_ROOT DBMS_XMLDOM.DOMELEMENT;
begin
V_ATTRIBUTE_LIST := makeElement('Attributes');
V_ATTRIBUTE_LIST_DOCUMENT := DBMS_XMLDOM.NEWDOMDOCUMENT(V_ATTRIBUTE_LIST);
V_ATTRIBUTE_LIST_ROOT := DBMS_XMLDOM.GETDOCUMENTELEMENT(V_ATTRIBUTE_LIST_DOCUMENT);
for ATTR in FIND_CHILD_ATTRS loop
 -- Finding Element / Attribute Name could be tricky. Use SQLName
 V_ATTRIBUTE := makeElement(ATTR.ATTR_NAME);
 V_ATTRIBUTE_DOCUMENT := DBMS_XMLDOM.NEWDOMDOCUMENT(V_ATTRIBUTE);
 V_ATTRIBUTE_ROOT := DBMS_XMLDOM.GETDOCUMENTELEMENT(V_ATTRIBUTE_DOCUMENT);
 begin
 -- Check for Attributes based on collection types, With Nested Table storage each Collection will cost 2 columns.
 select ELEM_TYPE_NAME, ELEM_TYPE_OWNER
 into V_COLLECTION_TYPE, V_COLLECTION_OWNER
 from ALL_COLL_TYPES
 where TYPE_NAME = ATTR.ATTR_TYPE_NAME
 and OWNER = ATTR.ATTR_TYPE_OWNER;
 -- -- dbms_output.put_line('Adding "' || ATTR.ATTR_NAME || '". Collection of "' || ATTR.ATTR_TYPE_OWNER || '"."' || ATTR.ATTR_TYPE_NAME || '".');
 -- Attribute is a Collection Type.
 -- Collection will be managed as a NESTED TABLE
 -- Each Collection cost 2 columns.
 -- May want to count the number of columns in the NESTED_TABLE at a later date.
 V_ATTR := DBMS_XMLDOM.CREATEATTRIBUTE(V_ATTRIBUTE_DOCUMENT,'SQLCollType');
 DBMS_XMLDOM.SETVALUE(V_ATTR,ATTR.ATTR_TYPE_NAME);
 V_ATTR := DBMS_XMLDOM.SETATTRIBUTENODE(V_ATTRIBUTE_ROOT,V_ATTR);
 V_ATTR := DBMS_XMLDOM.CREATEATTRIBUTE(V_ATTRIBUTE_DOCUMENT,'SQLCollTypeOwner');
 DBMS_XMLDOM.SETVALUE(V_ATTR,ATTR.ATTR_TYPE_OWNER);
 V_ATTR := DBMS_XMLDOM.SETATTRIBUTENODE(V_ATTRIBUTE_ROOT,V_ATTR);
 V_ATTR := DBMS_XMLDOM.CREATEATTRIBUTE(V_ATTRIBUTE_DOCUMENT,'SQLType');
 DBMS_XMLDOM.SETVALUE(V_ATTR,V_COLLECTION_TYPE);
 V_ATTR := DBMS_XMLDOM.SETATTRIBUTENODE(V_ATTRIBUTE_ROOT,V_ATTR);
 V_ATTR := DBMS_XMLDOM.CREATEATTRIBUTE(V_ATTRIBUTE_DOCUMENT,'SQLTypeOwner');
 DBMS_XMLDOM.SETVALUE(V_ATTR,V_COLLECTION_OWNER);
 V_ATTR := DBMS_XMLDOM.SETATTRIBUTENODE(V_ATTRIBUTE_ROOT,V_ATTR);
 V_ATTR := DBMS_XMLDOM.CREATEATTRIBUTE(V_ATTRIBUTE_DOCUMENT,'columns');
 DBMS_XMLDOM.SETVALUE(V_ATTR,2);
 V_ATTR := DBMS_XMLDOM.SETATTRIBUTENODE(V_ATTRIBUTE_ROOT,V_ATTR);
 exception
 when no_data_found then
 -- Attribute is not a collection type.
 begin
 -- Check for Attributes based on non-scalar types.
 select 1
 into V_TEMP_RESULT
 from ALL_TYPES
 where TYPE_NAME = ATTR.ATTR_TYPE_NAME
 and OWNER = ATTR.ATTR_TYPE_OWNER;
 -- Attribute is based on a non-scalar type. Find the Storage Model for this type.
 V_ATTR := DBMS_XMLDOM.CREATEATTRIBUTE(V_ATTRIBUTE_DOCUMENT,'SQLType');
 DBMS_XMLDOM.SETVALUE(V_ATTR,ATTR.ATTR_TYPE_NAME);
 V_ATTR := DBMS_XMLDOM.SETATTRIBUTENODE(V_ATTRIBUTE_ROOT,V_ATTR);
 V_ATTR := DBMS_XMLDOM.CREATEATTRIBUTE(V_ATTRIBUTE_DOCUMENT,'SQLTypeOwner');
 DBMS_XMLDOM.SETVALUE(V_ATTR,ATTR.ATTR_TYPE_OWNER);
 V_ATTR := DBMS_XMLDOM.SETATTRIBUTENODE(V_ATTRIBUTE_ROOT,V_ATTR);
 V_TYPE_DEFINITION := findStorageModel(ATTR.ATTR_TYPE_NAME, ATTR.ATTR_TYPE_OWNER, 'YES');
 V_TYPE_DEFINITION_DOCUMENT := DBMS_XMLDOM.NEWDOMDOCUMENT(V_TYPE_DEFINITION);
 V_TYPE_DEFINITION_ROOT := DBMS_XMLDOM.GETDOCUMENTELEMENT(V_TYPE_DEFINITION_DOCUMENT);
 V_ATTRIBUTE_COUNT := DBMS_XMLDOM.GETATTRIBUTE(V_TYPE_DEFINITION_ROOT,'columns');
 V_TYPE_DEFINITION_ROOT := DBMS_XMLDOM.MAKEELEMENT(DBMS_XMLDOM.IMPORTNODE(V_ATTRIBUTE_DOCUMENT,DBMS_XMLDOM.MAKENODE(V_TYPE_DEFINITION_ROOT),TRUE));
 V_TYPE_DEFINITION_ROOT := DBMS_XMLDOM.MAKEELEMENT(DBMS_XMLDOM.APPENDCHILD(DBMS_XMLDOM.MAKENODE(V_ATTRIBUTE_ROOT),DBMS_XMLDOM.MAKENODE(V_TYPE_DEFINITION_ROOT)));
 DBMS_XMLDOM.FREEDOCUMENT(V_TYPE_DEFINITION_DOCUMENT);
 if (ATTR.ATTR_TYPE_NAME = 'XDB$ENUM_T' and ATTR.ATTR_TYPE_OWNER = 'XDB') then
 -- The cost of a XDB$ENUM_T is 2 columns
 V_ATTR := DBMS_XMLDOM.CREATEATTRIBUTE(V_ATTRIBUTE_DOCUMENT,'columns');
 DBMS_XMLDOM.SETVALUE(V_ATTR,2);
 V_ATTR := DBMS_XMLDOM.SETATTRIBUTENODE(V_ATTRIBUTE_ROOT,V_ATTR);
 else
 -- The cost of a non scalar Type is the number of attributes plus one for Type and one for the TYPEID.
 V_ATTR := DBMS_XMLDOM.CREATEATTRIBUTE(V_ATTRIBUTE_DOCUMENT,'columns');
 DBMS_XMLDOM.SETVALUE(V_ATTR,V_ATTRIBUTE_COUNT + 2);
 V_ATTR := DBMS_XMLDOM.SETATTRIBUTENODE(V_ATTRIBUTE_ROOT,V_ATTR);
 end if;
 exception
 when no_data_found then
 -- Attribute is based on a scalar type
 V_ATTR := DBMS_XMLDOM.CREATEATTRIBUTE(V_ATTRIBUTE_DOCUMENT,'SQLType');
 DBMS_XMLDOM.SETVALUE(V_ATTR,ATTR.ATTR_TYPE_NAME);
 V_ATTR := DBMS_XMLDOM.SETATTRIBUTENODE(V_ATTRIBUTE_ROOT,V_ATTR);
 V_ATTR := DBMS_XMLDOM.CREATEATTRIBUTE(V_ATTRIBUTE_DOCUMENT,'columns');
 DBMS_XMLDOM.SETVALUE(V_ATTR,1);
 V_ATTR := DBMS_XMLDOM.SETATTRIBUTENODE(V_ATTRIBUTE_ROOT,V_ATTR);
 end;
 end;
 V_TOTAL_ATTRIBUTES := V_TOTAL_ATTRIBUTES + DBMS_XMLDOM.GETATTRIBUTE(V_ATTRIBUTE_ROOT,'columns');
 V_ATTRIBUTE_ROOT := DBMS_XMLDOM.MAKEELEMENT(DBMS_XMLDOM.IMPORTNODE(V_ATTRIBUTE_LIST_DOCUMENT,DBMS_XMLDOM.MAKENODE(V_ATTRIBUTE_ROOT),TRUE));
 V_ATTRIBUTE_ROOT := DBMS_XMLDOM.MAKEELEMENT(DBMS_XMLDOM.APPENDCHILD(DBMS_XMLDOM.MAKENODE(V_ATTRIBUTE_LIST_ROOT),DBMS_XMLDOM.MAKENODE(V_ATTRIBUTE_ROOT)));
 DBMS_XMLDOM.FREEDOCUMENT(V_ATTRIBUTE_DOCUMENT);
 if (V_TOTAL_ATTRIBUTES > 25000) then
 exit;
 end if;
end loop;
V_ATTR := DBMS_XMLDOM.CREATEATTRIBUTE(V_ATTRIBUTE_LIST_DOCUMENT,'columns');
 DBMS_XMLDOM.SETVALUE(V_ATTR,V_TOTAL_ATTRIBUTES);
V_ATTR := DBMS_XMLDOM.SETATTRIBUTENODE(V_ATTRIBUTE_LIST_ROOT,V_ATTR);
return V_ATTRIBUTE_LIST;
end;
function getSubTypes(P_TYPE_NAME VARCHAR2, P_TYPE_OWNER VARCHAR2)
return XMLType
as
CURSOR FIND_SUBTYPES
is
select TYPE_NAME, OWNER
 from ALL_TYPES
 where SUPERTYPE_NAME = P_TYPE_NAME
 and SUPERTYPE_OWNER = P_TYPE_OWNER;
CURSOR FIND_SUBTYPE_HEIRARCHY
is
select LEVEL, TYPE_NAME, OWNER
 from ALL_TYPES
 where TYPE_NAME <> P_TYPE_NAME
 and OWNER <> P_TYPE_OWNER
 connect by SUPERTYPE_NAME = PRIOR TYPE_NAME
 and SUPERTYPE_OWNER = PRIOR OWNER
 start with TYPE_NAME = P_TYPE_NAME
 and OWNER = P_TYPE_OWNER;
V_SUBTYPE_LIST XMLType;
V_SUBTYPE_LIST_DOCUMENT DBMS_XMLDOM.DOMDOCUMENT;
V_SUBTYPE_LIST_ROOT DBMS_XMLDOM.DOMELEMENT;
V_TYPE_DEFINITION XMLType;
V_TYPE_DEFINITION_DOCUMENT DBMS_XMLDOM.DOMDOCUMENT;
V_TYPE_DEFINITION_ROOT DBMS_XMLDOM.DOMELEMENT;
V_SUBTYPE_DEFINITIONS XMLType;
V_SUBTYPE_DEFINITIONS_DOCUMENT DBMS_XMLDOM.DOMDOCUMENT;
V_SUBTYPE_DEFINITIONS_ROOT DBMS_XMLDOM.DOMELEMENT;
V_ATTRIBUTE_LIST XMLType;
V_ATTRIBUTE_LIST_DOCUMENT DBMS_XMLDOM.DOMDOCUMENT;
V_ATTRIBUTE_LIST_ROOT DBMS_XMLDOM.DOMELEMENT;
V_SUBTYPES_EXIST BOOLEAN := FALSE;
V_TOTAL_columns number;
V_ATTRIBUTE_COUNT number;
V_ATTR DBMS_XMLDOM.DOMATTR;
V_COMPLEX_TYPE VARCHAR2(256);
begin
V_SUBTYPE_LIST := makeElement('SubTypeDefinitions');
V_SUBTYPE_LIST_DOCUMENT := DBMS_XMLDOM.NEWDOMDOCUMENT(V_SUBTYPE_LIST);
V_SUBTYPE_LIST_ROOT := DBMS_XMLDOM.GETDOCUMENTELEMENT(V_SUBTYPE_LIST_DOCUMENT);
V_TOTAL_columns := 0;
for t in FIND_SUBTYPES() loop
 V_SUBTYPES_EXIST := TRUE;
 V_TYPE_DEFINITION := makeElement(t.TYPE_NAME);
 V_TYPE_DEFINITION_DOCUMENT := DBMS_XMLDOM.NEWDOMDOCUMENT(V_TYPE_DEFINITION);
 V_TYPE_DEFINITION_ROOT := DBMS_XMLDOM.GETDOCUMENTELEMENT(V_TYPE_DEFINITION_DOCUMENT);
 V_ATTR := DBMS_XMLDOM.CREATEATTRIBUTE(V_TYPE_DEFINITION_DOCUMENT,'SQLTypeOwner');
 DBMS_XMLDOM.SETVALUE(V_ATTR,t.OWNER);
 V_ATTR := DBMS_XMLDOM.SETATTRIBUTENODE(V_TYPE_DEFINITION_ROOT,V_ATTR);
 begin
 select x.XMLDATA.NAME
 into V_COMPLEX_TYPE
 from XDB.XDB$COMPLEX_TYPE x
 where x.XMLDATA.SQLTYPE = t.TYPE_NAME
 and x.XMLDATA.SQLSCHEMA = t.OWNER;
 V_ATTR := DBMS_XMLDOM.CREATEATTRIBUTE(V_TYPE_DEFINITION_DOCUMENT,'type');
 DBMS_XMLDOM.SETVALUE(V_ATTR,V_COMPLEX_TYPE);
 V_ATTR := DBMS_XMLDOM.SETATTRIBUTENODE(V_TYPE_DEFINITION_ROOT,V_ATTR);
 -- Consider adding Schema URL Attribute
 exception
 when no_data_found then
 null;
 when others then
 raise;
 end;
 V_ATTRIBUTE_LIST := getLocalAttributes(t.TYPE_NAME, t.OWNER);
 V_ATTRIBUTE_LIST_DOCUMENT := DBMS_XMLDOM.NEWDOMDOCUMENT(V_ATTRIBUTE_LIST);
 V_ATTRIBUTE_LIST_ROOT := DBMS_XMLDOM.GETDOCUMENTELEMENT(V_ATTRIBUTE_LIST_DOCUMENT);
 V_ATTRIBUTE_COUNT := DBMS_XMLDOM.GETATTRIBUTE(V_ATTRIBUTE_LIST_ROOT,'columns');
 V_ATTRIBUTE_LIST_ROOT := DBMS_XMLDOM.MAKEELEMENT(DBMS_XMLDOM.IMPORTNODE(V_TYPE_DEFINITION_DOCUMENT,DBMS_XMLDOM.MAKENODE(V_ATTRIBUTE_LIST_ROOT),TRUE));
 V_ATTRIBUTE_LIST_ROOT := DBMS_XMLDOM.MAKEELEMENT(DBMS_XMLDOM.APPENDCHILD(DBMS_XMLDOM.MAKENODE(V_TYPE_DEFINITION_ROOT),DBMS_XMLDOM.MAKENODE(V_ATTRIBUTE_LIST_ROOT)));
 DBMS_XMLDOM.FREEDOCUMENT(V_ATTRIBUTE_LIST_DOCUMENT);
 V_SUBTYPE_DEFINITIONS := getSubTypes(t.TYPE_NAME,t.OWNER);
 if (V_SUBTYPE_DEFINITIONS is not NULL) then
 V_SUBTYPE_DEFINITIONS_DOCUMENT := DBMS_XMLDOM.NEWDOMDOCUMENT(V_SUBTYPE_DEFINITIONS);
 V_SUBTYPE_DEFINITIONS_ROOT := DBMS_XMLDOM.GETDOCUMENTELEMENT(V_SUBTYPE_DEFINITIONS_DOCUMENT);
 V_ATTRIBUTE_COUNT := V_ATTRIBUTE_COUNT + DBMS_XMLDOM.GETATTRIBUTE(V_SUBTYPE_DEFINITIONS_ROOT,'columns');
 V_SUBTYPE_DEFINITIONS_ROOT := DBMS_XMLDOM.MAKEELEMENT(DBMS_XMLDOM.IMPORTNODE(V_TYPE_DEFINITION_DOCUMENT,DBMS_XMLDOM.MAKENODE(V_SUBTYPE_DEFINITIONS_ROOT),TRUE));
 V_SUBTYPE_DEFINITIONS_ROOT := DBMS_XMLDOM.MAKEELEMENT(DBMS_XMLDOM.APPENDCHILD(DBMS_XMLDOM.MAKENODE(V_TYPE_DEFINITION_ROOT),DBMS_XMLDOM.MAKENODE(V_SUBTYPE_DEFINITIONS_ROOT)));
 end if;
 V_ATTR := DBMS_XMLDOM.CREATEATTRIBUTE(V_TYPE_DEFINITION_DOCUMENT,'columns');
 DBMS_XMLDOM.SETVALUE(V_ATTR,V_ATTRIBUTE_COUNT);
 V_ATTR := DBMS_XMLDOM.SETATTRIBUTENODE(V_TYPE_DEFINITION_ROOT,V_ATTR);
 V_TYPE_DEFINITION_ROOT := DBMS_XMLDOM.MAKEELEMENT(DBMS_XMLDOM.IMPORTNODE(V_SUBTYPE_LIST_DOCUMENT,DBMS_XMLDOM.MAKENODE(V_TYPE_DEFINITION_ROOT),TRUE));
 V_TYPE_DEFINITION_ROOT := DBMS_XMLDOM.MAKEELEMENT(DBMS_XMLDOM.APPENDCHILD(DBMS_XMLDOM.MAKENODE(V_SUBTYPE_LIST_ROOT),DBMS_XMLDOM.MAKENODE(V_TYPE_DEFINITION_ROOT)));
 V_TOTAL_columns := V_TOTAL_columns + V_ATTRIBUTE_COUNT;
end loop;
if (V_SUBTYPES_EXIST) then
 V_ATTR := DBMS_XMLDOM.CREATEATTRIBUTE(V_SUBTYPE_LIST_DOCUMENT,'columns');
 DBMS_XMLDOM.SETVALUE(V_ATTR,V_TOTAL_columns);
 V_ATTR := DBMS_XMLDOM.SETATTRIBUTENODE(V_SUBTYPE_LIST_ROOT,V_ATTR);
 return V_SUBTYPE_LIST;
else
 return NULL;
end if;
end;
function findSuperTypeModel(P_TYPE_NAME VARCHAR2, P_TYPE_OWNER VARCHAR2)
return XMLType
as
begin
-- dbms_output.put_line('Processing Super Type : "' || P_TYPE_OWNER || '"."' || P_TYPE_NAME || '"');
return findStorageModel(P_TYPE_NAME, P_TYPE_OWNER,'NO');
end;
function getStorageModel(P_TYPE_NAME VARCHAR2, P_TYPE_OWNER VARCHAR2, P_INCLUDE_SUBTYPES VARCHAR2 DEFAULT 'YES')
return XMLType
as
V_TYPE_DEFINITION XMLTYPE;
V_ATTRIBUTE_COUNT NUMBER := 0;
SUBTYPE_STORAGE_MODEL XMLTYPE;
V_SUPERTYPE_DEFINITION XMLTYPE;
V_SUPERTYPE_DOCUMENT DBMS_XMLDOM.DOMDOCUMENT;
V_SUPERTYPE_ROOT DBMS_XMLDOM.DOMELEMENT;
V_SUBTYPE_DEFINITION XMLTYPE;
V_SUBTYPE_DOCUMENT DBMS_XMLDOM.DOMDOCUMENT;
V_SUBTYPE_ROOT DBMS_XMLDOM.DOMELEMENT;
V_ATTRIBUTE_LIST XMLTYPE;
V_ATTRIBUTE_LIST_DOCUMENT DBMS_XMLDOM.DOMDOCUMENT;
V_ATTRIBUTE_LIST_ROOT DBMS_XMLDOM.DOMELEMENT;
cursor FIND_SUPERTYPE_HEIRARCHY
is
select TYPE_NAME, OWNER
 from ALL_TYPES
 where TYPE_NAME <> P_TYPE_NAME
 and OWNER <> P_TYPE_OWNER
 connect by TYPE_NAME = PRIOR SUPERTYPE_NAME
 and OWNER = PRIOR SUPERTYPE_OWNER
 start with TYPE_NAME = P_TYPE_NAME
 and OWNER = P_TYPE_OWNER
 order by LEVEL;
V_COMPLEX_TYPE varchar2(256);
V_SUPERTYPE_NAME varchar2(256);
v_SUPERTYPE_OWNER varchar2(256);
V_DOCUMENT DBMS_XMLDOM.DOMDOCUMENT;
V_ROOT DBMS_XMLDOM.DOMELEMENT;
V_ATTR DBMS_XMLDOM.DOMATTR;
begin
-- dbms_output.put_line('Generating Storage Model for : "' || P_TYPE_OWNER || '"."' || P_TYPE_NAME || '"');
V_TYPE_DEFINITION := makeElement(P_TYPE_NAME);
V_DOCUMENT := DBMS_XMLDOM.NEWDOMDOCUMENT(V_TYPE_DEFINITION);
V_ROOT := DBMS_XMLDOM.GETDOCUMENTELEMENT(V_DOCUMENT);
V_ATTR := DBMS_XMLDOM.CREATEATTRIBUTE(V_DOCUMENT,'SQLTypeOwner');
 DBMS_XMLDOM.SETVALUE(V_ATTR,P_TYPE_OWNER);
V_ATTR := DBMS_XMLDOM.SETATTRIBUTENODE(V_ROOT,V_ATTR);
begin
 select x.XMLDATA.NAME
 into V_COMPLEX_TYPE
 from XDB.XDB$COMPLEX_TYPE x
 where x.XMLDATA.SQLTYPE = P_TYPE_NAME
 and x.XMLDATA.SQLSCHEMA = P_TYPE_OWNER;
 V_ATTR := DBMS_XMLDOM.CREATEATTRIBUTE(V_DOCUMENT,'type');
 DBMS_XMLDOM.SETVALUE(V_ATTR,V_COMPLEX_TYPE);
 V_ATTR := DBMS_XMLDOM.SETATTRIBUTENODE(V_ROOT,V_ATTR);
 -- Consider adding Schema URL Attribute
exception
 when no_data_found then
 null;
 when others then
 raise;
end;
select SUPERTYPE_NAME, SUPERTYPE_OWNER
 into V_SUPERTYPE_NAME, V_SUPERTYPE_OWNER
 from ALL_TYPES
 where TYPE_NAME = P_TYPE_NAME
 and OWNER = P_TYPE_OWNER;
-- Process SuperType.
if (V_SUPERTYPE_NAME is not null) then
 V_ATTR := DBMS_XMLDOM.CREATEATTRIBUTE(V_DOCUMENT,'SQLParentType');
 DBMS_XMLDOM.SETVALUE(V_ATTR,V_SUPERTYPE_NAME);
 V_ATTR := DBMS_XMLDOM.SETATTRIBUTENODE(V_ROOT,V_ATTR);
 V_ATTR := DBMS_XMLDOM.CREATEATTRIBUTE(V_DOCUMENT,'SQLParentTypeOwner');
 DBMS_XMLDOM.SETVALUE(V_ATTR,V_SUPERTYPE_OWNER);
 V_ATTR := DBMS_XMLDOM.SETATTRIBUTENODE(V_ROOT,V_ATTR);
 -- Find the Definition for the super type. Do not include the definition of it's subtypes.
 V_SUPERTYPE_DEFINITION := findSuperTypeModel(V_SUPERTYPE_NAME, V_SUPERTYPE_OWNER);
 -- -- dbms_output.put_line(dbms_lob.substr(V_SUPERTYPE_DEFINITION.getClobVal(),1000,1));
 V_SUPERTYPE_DOCUMENT := DBMS_XMLDOM.NEWDOMDOCUMENT(V_SUPERTYPE_DEFINITION);
 V_SUPERTYPE_ROOT := DBMS_XMLDOM.GETDOCUMENTELEMENT(V_SUPERTYPE_DOCUMENT);
 V_ATTRIBUTE_COUNT := V_ATTRIBUTE_COUNT + DBMS_XMLDOM.GETATTRIBUTE(V_SUPERTYPE_ROOT,'columns');
 V_SUPERTYPE_ROOT := DBMS_XMLDOM.MAKEELEMENT(DBMS_XMLDOM.IMPORTNODE(V_DOCUMENT,DBMS_XMLDOM.MAKENODE(V_SUPERTYPE_ROOT),TRUE));
 V_SUPERTYPE_ROOT := DBMS_XMLDOM.MAKEELEMENT(DBMS_XMLDOM.APPENDCHILD(DBMS_XMLDOM.MAKENODE(V_ROOT),DBMS_XMLDOM.MAKENODE(V_SUPERTYPE_ROOT)));
 DBMS_XMLDOM.FREEDOCUMENT(V_SUPERTYPE_DOCUMENT);
end if;
-- Process Attributes defined directly by the Type.
V_ATTRIBUTE_LIST := getLocalAttributes(P_TYPE_NAME, P_TYPE_OWNER);
V_ATTRIBUTE_LIST_DOCUMENT := DBMS_XMLDOM.NEWDOMDOCUMENT(V_ATTRIBUTE_LIST);
V_ATTRIBUTE_LIST_ROOT := DBMS_XMLDOM.GETDOCUMENTELEMENT(V_ATTRIBUTE_LIST_DOCUMENT);
V_ATTRIBUTE_COUNT := V_ATTRIBUTE_COUNT + DBMS_XMLDOM.GETATTRIBUTE(V_ATTRIBUTE_LIST_ROOT,'columns');
V_ATTRIBUTE_LIST_ROOT := DBMS_XMLDOM.MAKEELEMENT(DBMS_XMLDOM.IMPORTNODE(V_DOCUMENT,DBMS_XMLDOM.MAKENODE(V_ATTRIBUTE_LIST_ROOT),TRUE));
V_ATTRIBUTE_LIST_ROOT := DBMS_XMLDOM.MAKEELEMENT(DBMS_XMLDOM.APPENDCHILD(DBMS_XMLDOM.MAKENODE(V_ROOT),DBMS_XMLDOM.MAKENODE(V_ATTRIBUTE_LIST_ROOT)));
DBMS_XMLDOM.FREEDOCUMENT(V_ATTRIBUTE_LIST_DOCUMENT);
if (P_INCLUDE_SUBTYPES = 'YES') then
 -- Process any Sub-Types...
 V_SUBTYPE_DEFINITION := getSubTypes(P_TYPE_NAME, P_TYPE_OWNER);
 if (V_SUBTYPE_DEFINITION is not null) then
 V_SUBTYPE_DOCUMENT := DBMS_XMLDOM.NEWDOMDOCUMENT(V_SUBTYPE_DEFINITION);
 V_SUBTYPE_ROOT := DBMS_XMLDOM.GETDOCUMENTELEMENT(V_SUBTYPE_DOCUMENT);
 V_ATTRIBUTE_COUNT := V_ATTRIBUTE_COUNT + DBMS_XMLDOM.GETATTRIBUTE(V_SUBTYPE_ROOT,'columns');
 V_SUBTYPE_ROOT := DBMS_XMLDOM.MAKEELEMENT(DBMS_XMLDOM.IMPORTNODE(V_DOCUMENT,DBMS_XMLDOM.MAKENODE(V_SUBTYPE_ROOT),TRUE));
 V_SUBTYPE_ROOT := DBMS_XMLDOM.MAKEELEMENT(DBMS_XMLDOM.APPENDCHILD(DBMS_XMLDOM.MAKENODE(V_ROOT),DBMS_XMLDOM.MAKENODE(V_SUBTYPE_ROOT)));
 DBMS_XMLDOM.FREEDOCUMENT(V_SUBTYPE_DOCUMENT);
 end if;
end if;
V_ATTR := DBMS_XMLDOM.CREATEATTRIBUTE(V_DOCUMENT,'columns');
 DBMS_XMLDOM.SETVALUE(V_ATTR,V_ATTRIBUTE_COUNT);
V_ATTR := DBMS_XMLDOM.SETATTRIBUTENODE(V_ROOT,V_ATTR);
-- Cache the type definition.
-- dbms_output.put_line('Cached Storage Model for "' || P_TYPE_OWNER || '.' || P_TYPE_NAME || '".');
insert into XDBPM.XDBPM_STORAGE_MODEL_CACHE (TYPE_NAME, TYPE_OWNER, EXTENDED_DEFINITION, STORAGE_MODEL) VALUES (P_TYPE_NAME, P_TYPE_OWNER, P_INCLUDE_SUBTYPES, V_TYPE_DEFINITION);
return V_TYPE_DEFINITION;
end;
function findStorageModel(P_TYPE_NAME VARCHAR2, P_TYPE_OWNER VARCHAR2, P_INCLUDE_SUBTYPES VARCHAR2 DEFAULT 'YES')
-- Find the Storage Model for the Base Type.
-- If the type is derived from another type we need the storage model of the Base Type
-- As storage models are calculated they are cached in the global temporary table XDBPM_STORAGE_MODEL_CACHE. This makes
-- the process much more efficient. A global temporary table is used to minimize memory usage.
return XMLType
as
V_STORAGE_MODEL XMLType;
V_STORAGE_MODEL_DOCUMENT DBMS_XMLDOM.DOMDOCUMENT;
V_STORAGE_MODEL_ROOT DBMS_XMLDOM.DOMELEMENT;
V_ATTRIBUTE_COUNT VARCHAR2(10);
begin
dbms_output.put_line('findStorageModel(' || G_DEPTH_COUNT || ') : Processing "' || P_TYPE_OWNER || '"."' || P_TYPE_NAME || '".' );
begin
 SELECT STORAGE_MODEL
 into V_STORAGE_MODEL
 from XDBPM.XDBPM_STORAGE_MODEL_CACHE
 where TYPE_NAME = P_TYPE_NAME
 and TYPE_OWNER = P_TYPE_OWNER
 and EXTENDED_DEFINITION = P_INCLUDE_SUBTYPES;
 -- dbms_output.put_line('Resolved Storage Model from cache.');
exception
 when no_data_found then
 G_DEPTH_COUNT := G_DEPTH_COUNT + 1;
 V_STORAGE_MODEL := getStorageModel(P_TYPE_NAME,P_TYPE_OWNER, P_INCLUDE_SUBTYPES);
 G_DEPTH_COUNT := G_DEPTH_COUNT - 1;
 when others then
 raise;
end;
V_STORAGE_MODEL_DOCUMENT := DBMS_XMLDOM.NEWDOMDOCUMENT(V_STORAGE_MODEL);
V_STORAGE_MODEL_ROOT := DBMS_XMLDOM.GETDOCUMENTELEMENT(V_STORAGE_MODEL_DOCUMENT);
V_ATTRIBUTE_COUNT := DBMS_XMLDOM.GETATTRIBUTE(V_STORAGE_MODEL_ROOT,'columns');
dbms_output.put_line('findStorageModel : Attribute Count for "' || P_TYPE_OWNER || '"."' || P_TYPE_NAME || '" = ' || V_ATTRIBUTE_COUNT || '.' );
return V_STORAGE_MODEL;
end;
function analyzeStorageModel(P_COMPLEX_TYPE_NAME VARCHAR2, P_TYPE_NAME VARCHAR2, P_TYPE_OWNER VARCHAR2)
-- Generate a map showing the number of columns required to persist an instance of the SQL type.
return XMLType
as
V_STORAGE_MODEL XMLTYPE;
V_COUNT NUMBER := 0;
V_DOCUMENT DBMS_XMLDOM.DOMDOCUMENT;
V_ROOT DBMS_XMLDOM.DOMELEMENT;
V_ATTR DBMS_XMLDOM.DOMATTR;
V_MODEL DBMS_XMLDOM.DOMELEMENT;
V_TYPE_DEFINITION DBMS_XMLDOM.DOMELEMENT;
begin
V_STORAGE_MODEL := makeElement(P_COMPLEX_TYPE_NAME);
V_DOCUMENT := DBMS_XMLDOM.NEWDOMDOCUMENT(V_STORAGE_MODEL);
V_ROOT := DBMS_XMLDOM.GETDOCUMENTELEMENT(V_DOCUMENT);
V_ATTR := DBMS_XMLDOM.CREATEATTRIBUTE(V_DOCUMENT,'SQLType');
 DBMS_XMLDOM.SETVALUE(V_ATTR,P_TYPE_NAME);
V_ATTR := DBMS_XMLDOM.SETATTRIBUTENODE(V_ROOT,V_ATTR);
V_ATTR := DBMS_XMLDOM.CREATEATTRIBUTE(V_DOCUMENT,'SQLTypeOwner');
 DBMS_XMLDOM.SETVALUE(V_ATTR,P_TYPE_OWNER);
V_ATTR := DBMS_XMLDOM.SETATTRIBUTENODE(V_ROOT,V_ATTR);
V_TYPE_DEFINITION := DBMS_XMLDOM.GETDOCUMENTELEMENT(DBMS_XMLDOM.NEWDOMDOCUMENT(findStorageModel(P_TYPE_NAME, P_TYPE_OWNER, 'YES')));
V_TYPE_DEFINITION := DBMS_XMLDOM.MAKEELEMENT(DBMS_XMLDOM.IMPORTNODE(V_DOCUMENT,DBMS_XMLDOM.MAKENODE(V_TYPE_DEFINITION),TRUE));
V_TYPE_DEFINITION := DBMS_XMLDOM.MAKEELEMENT(DBMS_XMLDOM.APPENDCHILD(DBMS_XMLDOM.MAKENODE(V_ROOT),DBMS_XMLDOM.MAKENODE(V_TYPE_DEFINITION)));
V_ATTR := DBMS_XMLDOM.CREATEATTRIBUTE(V_DOCUMENT,'columns');
 DBMS_XMLDOM.SETVALUE(V_ATTR,DBMS_XMLDOM.GETATTRIBUTE(V_TYPE_DEFINITION,'columns'));
V_ATTR := DBMS_XMLDOM.SETATTRIBUTENODE(V_ROOT,V_ATTR);
return V_STORAGE_MODEL;
end;
function analyzeStorageModel(P_COMPLEX_TYPE_NAME VARCHAR2)
return XMLTYPE
-- Generate a map showing the number of columns required to persist an instance of the complex type.
as
pragma autonomous_transaction;
V_SQLTYPE VARCHAR2(128);
V_SQLSCHEMA VARCHAR2(32);
V_RESULT XMLType;
begin
G_DEPTH_COUNT := 0;
select ct.XMLDATA.SQLTYPE, ct.XMLDATA.SQLSCHEMA
 into V_SQLTYPE, V_SQLSCHEMA
 from XDB.XDB$COMPLEX_TYPE ct, XDB.XDB$SCHEMA s
 where ct.XMLDATA.NAME = P_COMPLEX_TYPE_NAME
 and ref(s) = ct.XMLDATA.PARENT_SCHEMA
 and s.XMLDATA.SCHEMA_OWNER = USER;
delete from XDBPM.XDBPM_STORAGE_MODEL_CACHE;
-- delete from XDBPM.XDBPM_STORAGE_MODEL;
V_RESULT := analyzeStorageModel(P_COMPLEX_TYPE_NAME,V_SQLTYPE,V_SQLSCHEMA);
COMMIT;
return V_RESULT;
exception
when no_data_found then
 -- dbms_output.put_line('Unable to find SQLType mapping for complexType : "' || USER || '"."' || P_COMPLEX_TYPE_NAME || '".' );
 return null;
when others then
 raise;
end;
function analyzeSQLType(ATTR_NAME VARCHAR2, TARGET_TYPE_NAME VARCHAR2, TARGET_TYPE_OWNER VARCHAR2)
return XMLType
as
 ROOT_NODE_NAME VARCHAR2(128);
 ATTR_DETAIL XMLTYPE;
 XPATH_EXPRESSION VARCHAR2(129);
 CURSOR FIND_CHILD_ATTRS is
 select ATTR_NAME, ATTR_TYPE_OWNER, ATTR_TYPE_NAME, INHERITED
 from ALL_TYPE_ATTRS
 where OWNER = TARGET_TYPE_OWNER
 and TYPE_NAME = TARGET_TYPE_NAME
 order by ATTR_NO;
 CHILD_ATTR XMLTYPE;
 ATTR_COUNT NUMBER := 0;
 TEMP number;
 COLLECTION_TYPE_NAME varchar2(256);
 COLLECTION_TYPE_OWNER varchar2(256);
begin
-- -- dbms_output.put_line('Processing Attribute ' || ATTR_NAME || ' of ' || TARGET_TYPE_OWNER || '.' || TARGET_TYPE_NAME );
ATTR_DETAIL := makeElement(ATTR_NAME);
XPATH_EXPRESSION := '/' || ATTR_DETAIL.GETROOTELEMENT();
for ATTR in FIND_CHILD_ATTRS loop
 begin
 select ELEM_TYPE_NAME, ELEM_TYPE_OWNER
 into COLLECTION_TYPE_NAME, COLLECTION_TYPE_OWNER
 from ALL_COLL_TYPES
 where TYPE_NAME = ATTR.ATTR_TYPE_NAME
 and OWNER = ATTR.ATTR_TYPE_OWNER;
 CHILD_ATTR := analyzeSQLType(ATTR.ATTR_NAME, COLLECTION_TYPE_NAME, COLLECTION_TYPE_OWNER );
 ATTR_COUNT := ATTR_COUNT + CHILD_ATTR.extract('/' || CHILD_ATTR.GETROOTELEMENT() || '/@sqlAttrs').getNumberVal();
 select appendChildXML(ATTR_DETAIL,XPATH_EXPRESSION,CHILD_ATTR)
 into ATTR_DETAIL
 from DUAL;
 exception
 when no_data_found then
 begin
 select 1
 into TEMP
 from ALL_TYPES
 where TYPE_NAME = ATTR.ATTR_TYPE_NAME
 and OWNER = ATTR.ATTR_TYPE_OWNER;
 CHILD_ATTR := analyzeSQLType(ATTR.ATTR_NAME, ATTR.ATTR_TYPE_NAME, ATTR.ATTR_TYPE_OWNER );
 ATTR_COUNT := ATTR_COUNT + CHILD_ATTR.extract('/' || CHILD_ATTR.GETROOTELEMENT() || '/@sqlAttrs').getNumberVal();
 select appendChildXML(ATTR_DETAIL,XPATH_EXPRESSION,CHILD_ATTR)
 into ATTR_DETAIL
 from DUAL;
 exception
 when no_data_found then
 ATTR_COUNT := ATTR_COUNT + 1;
 end;
 end;
end loop;
select insertChildXML(ATTR_DETAIL,XPATH_EXPRESSION,'@sqlAttrs',ATTR_COUNT)
 into ATTR_DETAIL
 from dual;
return ATTR_DETAIL;
end;
function analyzeComplexType(COMPLEX_TYPE VARCHAR2)
return XMLType
as
RESULT xmltype;
SQLTYPE varchar2(128);
SQLTYPE_OWNER varchar2(32);
begin
select SQLTYPE, SQLTYPE_OWNER
 into SQLTYPE, SQLTYPE_OWNER
 from USER_XML_SCHEMAS,
 xmlTable
 xmlnamespaces
 'http://www.w3.org/2001/XMLSchema' as "xsd",
 'http://xmlns.oracle.com/xdb' as "xdb"
 '/xsd:schema/xsd:complexType'
 passing Schema
 columns
 COMPLEX_TYPE_NAME varchar2(4000) path '@name',
 SQLTYPE varchar2(128) path '@xdb:SQLType',
 SQLTYPE_OWNER varchar2(32) path '@xdb:SQLSchema'
 where COMPLEX_TYPE_NAME = COMPLEX_TYPE;
result := analyzeSQLType(COMPLEX_TYPE,SQLTYPE,SQLTYPE_OWNER);
select insertChildXML(RESULT,'/' || COMPLEX_TYPE,'@SQLType',SQLTYPE)
 into result
 from dual;
return result;
end;
function showSQLTypes(schemaFolder varchar2) return XMLType
is
xmlSchema XMLTYPE;
begin
select xmlElement
 "TypeList",
 xmlAgg
 xmlElement
 "Schema",
 xmlElement
 "ResourceName",
 extractValue(res,'/Resource/DisplayName')
 xmlElement
 "complexTypes",
 select xmlAgg
 xmlElement
 "complexType",
 xmlElement
 "name",
 extractValue(value(XML),'/xsd:complexType/@name',XDB_NAMESPACES.XDBSCHEMA_PREFIXES)
 xmlElement
 "SQLType",
 extractValue(value(XML),'/xsd:complexType/@xdb:SQLType',XDB_NAMESPACES.XDBSCHEMA_PREFIXES)
 from table
 xmlsequence
 extract
 xdburitype(p.path).getXML(),
 '/xsd:schema/xsd:complexType',
 XDB_NAMESPACES.XDBSCHEMA_PREFIXES
 ) xml
 -- order by extractValue(value(XML),'/xsd:complexType/@name',XDB_NAMESPACES.XDBSCHEMA_PREFIXES)
 ).extract('/*')
 into xmlSchema
 from path_view p
 where under_path(res,schemaFolder) = 1
 order by extractValue(res,'/Resource/DisplayName');
return xmlSchema;
end;
procedure renameCollectionTable (XMLTABLE varchar2, XPATH varchar2, COLLECTION_TABLE_PREFIX varchar2)
as
 SYSTEM_GENERATED_NAME varchar2(256);
 COLLECTION_TABLE_NAME varchar2(256);
 CLUSTERED_INDEX_NAME varchar2(256);
 PARENT_INDEX_NAME varchar2(256);
 RENAME_STATEMENT varchar2(4000);
begin
 COLLECTION_TABLE_NAME := COLLECTION_TABLE_PREFIX || '_TABLE';
 CLUSTERED_INDEX_NAME := COLLECTION_TABLE_PREFIX || '_DATA';
 PARENT_INDEX_NAME := COLLECTION_TABLE_PREFIX || '_LIST';
 select TABLE_NAME
 into SYSTEM_GENERATED_NAME
 from ALL_NESTED_TABLES
 where PARENT_TABLE_NAME = XMLTABLE
 and PARENT_TABLE_COLUMN = XPATH
 and OWNER = USER;
 RENAME_STATEMENT := 'alter table ' || USER || '."' || SYSTEM_GENERATED_NAME || '" rename to "' ||COLLECTION_TABLE_NAME || '"';
 -- -- dbms_output.put_line(RENAME_STATEMENT);
 execute immediate RENAME_STATEMENT;
 begin
 select INDEX_NAME
 into SYSTEM_GENERATED_NAME
 from ALL_INDEXES
 where TABLE_NAME = COLLECTION_TABLE_NAME
 and INDEX_TYPE = 'IOT - TOP'
 and OWNER = USER;
 RENAME_STATEMENT := 'alter index ' || USER || '."' || SYSTEM_GENERATED_NAME || '" rename to "' || CLUSTERED_INDEX_NAME || '"';
 -- -- dbms_output.put_line(RENAME_STATEMENT);
 execute immediate RENAME_STATEMENT;
 exception
 when NO_DATA_FOUND then
 null;
 end;
 begin
 select INDEX_NAME
 into SYSTEM_GENERATED_NAME
 from ALL_IND_columns
 where COLUMN_NAME = XPATH
 and TABLE_NAME = XMLTABLE
 and TABLE_OWNER = USER;
 RENAME_STATEMENT := 'alter index ' || USER || '."' || SYSTEM_GENERATED_NAME || '" rename to "' || PARENT_INDEX_NAME || '"';
 -- -- dbms_output.put_line(RENAME_STATEMENT);
 execute immediate RENAME_STATEMENT;
 exception
 when NO_DATA_FOUND then
 null;
 end;
end;
function processNestedTable(currentLevel in out number, currentNode in out XMLType, query SYS_REFCURSOR)
return XMLType
is
thisLevel number;
thisNode xmlType;
result xmlType;
begin
thisLevel := currentLevel;
thisNode := currentNode;
fetch query into currentLevel, currentNode;
if (query%NOTFOUND) then
 currentLevel := -1;
end if;
while (currentLevel >= thisLevel) loop
 -- Next Node is a decendant of sibling of this Node.
 if (currentLevel > thisLevel) then
 -- Next Node is a decendant of this Node.
 result := processNestedTable(currentLevel, currentNode, query);
 select xmlElement
 "Collection",
 extract(thisNode,'/Collection/*'),
 xmlElement
 "NestedCollections",
 result
 into thisNode
 from dual;
 else
 -- Next node is a sibling of this Node.
 result := processNestedTable(currentLevel, currentNode, query);
 select xmlconcat(thisNode,result) into thisNode from dual;
 end if;
end loop;
-- Next Node is a sibling of some ancestor of this node.
return thisNode;
end;
function printNestedTables(XML_TABLE varchar2)
return XMLType
is
 query SYS_REFCURSOR;
 result XMLType;
 rootLevel number := 0;
 rootNode xmlType;
begin
 open query for
 select level, xmlElement
 "Collection",
 xmlElement
 "CollectionId",
 PARENT_TABLE_COLUMN
 ) as XML
 from USER_NESTED_TABLES
 connect by PRIOR TABLE_NAME = PARENT_TABLE_NAME
 start with PARENT_TABLE_NAME = XML_TABLE;
 fetch query into rootLevel, rootNode;
 result := processNestedTable(rootLevel, rootNode, query);
 select xmlElement
 "NestedTableStructure",
 result
 into result
 from dual;
 return result;
end;
function generateSchemaFromTable(P_TABLE_NAME varchar2, P_OWNER varchar2 default USER)
return XMLTYPE
as
xmlSchema XMLTYPE;
begin
select xmlElement
 "xsd:schema",
 xmlAttributes
 'http://www.w3.org/2001/XMLSchema' as "xmlns:xsd",
 'http://xmlns.oracle.com/xdb' as "xmlns:xdb"
 xmlElement
 "xsd:element",
 xmlAttributes
 'ROWSET' as "name",
 'rowset' as "type"
 xmlElement
 "xsd:complexType",
 xmlAttributes
 'rowset' as "name"
 xmlElement
 "xsd:sequence",
 xmlElement
 "xsd:element",
 xmlAttributes
 'ROW' as "name",
 table_name || '_T' as "type",
 'unbounded' as "maxOccurs"
 xmlElement
 "xsd:complexType",
 xmlAttributes
 table_name || '_T' as "name"
 xmlElement
 "xsd:sequence",
 xmlAgg(ELEMENT order by INTERNAL_COLUMN_ID)
 into xmlSchema
 from (select TABLE_NAME, INTERNAL_COLUMN_ID,
 case
 when DATA_TYPE in ('VARCHAR2','CHAR') then
 xmlElement
 "xsd:element",
 xmlattributes
 column_name as "name",
 decode(NULLABLE, 'Y', 0, 1) as "minOccurs",
 column_name as "xdb:SQLName",
 DATA_TYPE as "xdb:SQLType"
 xmlElement
 "xsd:simpleType",
 xmlElement
 "xsd:restriction",
 xmlAttributes
 'xsd:string' as "base"
 xmlElement
 "xsd:maxLength",
 xmlAttributes
 DATA_LENGTH as "value"
 when DATA_TYPE = 'NUMBER' then
 xmlElement
 "xsd:element",
 xmlattributes
 column_name as "name",
 decode(NULLABLE, 'Y', 0, 1) as "minOccurs",
 column_name as "xdb:SQLName",
 DATA_TYPE as "xdb:SQLType"
 xmlElement
 "xsd:simpleType",
 xmlElement
 "xsd:restriction",
 xmlAttributes
 decode(DATA_SCALE, 0, 'xsd:integer', 'xsd:double') as "base"
 xmlElement
 "xsd:totalDigits",
 xmlAttributes
 DATA_PRECISION as "value"
 when DATA_TYPE = 'DATE' then
 xmlElement
 "xsd:element",
 xmlattributes
 column_name as "name",
 decode(NULLABLE, 'Y', 0, 1) as "minOccurs",
 'xsd:date' as "type",
 column_name as "xdb:SQLName",
 DATA_TYPE as "xdb:SQLType"
 when DATA_TYPE like 'TIMESTAMP%WITH TIME ZONE' then
 xmlElement
 "xsd:element",
 xmlattributes
 column_name as "name",
 decode(NULLABLE, 'Y', 0, 1) as "minOccurs",
 'xsd:dateTime' as "type",
 column_name as "xdb:SQLName",
 DATA_TYPE as "xdb:SQLType"
 else
 xmlElement
 "xsd:element",
 xmlattributes
 column_name as "name",
 decode(NULLABLE, 'Y', 0, 1) as "minOccurs",
 'xsd:anySimpleType' as "type",
 column_name as "xdb:SQLName",
 DATA_TYPE as "xdb:SQLType"
 end ELEMENT
 from all_tab_cols c
 where c.TABLE_NAME = P_TABLE_NAME
 and c.OWNER = P_OWNER
 group by TABLE_NAME;
return xmlSchema;
end;
function appendElementList(V_ELEMENT_LIST IN OUT XDB.XDB$XMLTYPE_REF_LIST_T, V_CHILD_ELEMENT_LIST XDB.XDB$XMLTYPE_REF_LIST_T) return XDB.XDB$XMLTYPE_REF_LIST_T;
function expandModel(P_MODEL XDB.XDB$MODEL_T) return XDB.XDB$XMLTYPE_REF_LIST_T;
function expandChoiceList(P_CHOICE_LIST XDB.XDB$XMLTYPE_REF_LIST_T) return XDB.XDB$XMLTYPE_REF_LIST_T;
function expandSequenceList(P_SEQUENCE_LIST XDB.XDB$XMLTYPE_REF_LIST_T) return XDB.XDB$XMLTYPE_REF_LIST_T;
function expandGroupList(P_GROUP_LIST XDB.XDB$XMLTYPE_REF_LIST_T) return XDB.XDB$XMLTYPE_REF_LIST_T;
function appendElementList(V_ELEMENT_LIST IN OUT XDB.XDB$XMLTYPE_REF_LIST_T, V_CHILD_ELEMENT_LIST XDB.XDB$XMLTYPE_REF_LIST_T)
return XDB.XDB$XMLTYPE_REF_LIST_T
as
begin
SELECT CAST
 SET
 CAST(V_ELEMENT_LIST as XDBPM.XMLTYPE_REF_TABLE_T)
 MULTISET UNION
 CAST(V_CHILD_ELEMENT_LIST as XDBPM.XMLTYPE_REF_TABLE_T)
 as XDB.XDB$XMLTYPE_REF_LIST_T
 into V_ELEMENT_LIST
 from DUAL;
 return V_ELEMENT_LIST;
end;
function expandModel(P_MODEL XDB.XDB$MODEL_T)
return XDB.XDB$XMLTYPE_REF_LIST_T
as
V_ELEMENT_LIST XDB.XDB$XMLTYPE_REF_LIST_T;
V_CHILD_ELEMENT_LIST XDB.XDB$XMLTYPE_REF_LIST_T;
begin
V_ELEMENT_LIST := XDB.XDB$XMLTYPE_REF_LIST_T();
if P_MODEL.ELEMENTS is not null then
 V_ELEMENT_LIST := P_MODEL.ELEMENTS;
end if;
if (P_MODEL.CHOICE_KIDS is not NULL) then
 V_CHILD_ELEMENT_LIST := expandChoiceList(P_MODEL.CHOICE_KIDS);
 V_ELEMENT_LIST := appendElementList(V_ELEMENT_LIST,V_CHILD_ELEMENT_LIST);
end if;
if (P_MODEL.SEQUENCE_KIDS is not NULL) then
 V_CHILD_ELEMENT_LIST := expandSequenceList(P_MODEL.SEQUENCE_KIDS);
 V_ELEMENT_LIST := appendElementList(V_ELEMENT_LIST,V_CHILD_ELEMENT_LIST);
end if;
-- Process ANYS
if (P_MODEL.GROUPS is not NULL) then
 V_CHILD_ELEMENT_LIST := expandGroupList(P_MODEL.GROUPS);
 V_ELEMENT_LIST := appendElementList(V_ELEMENT_LIST,V_CHILD_ELEMENT_LIST);
end if;
return V_ELEMENT_LIST;
end;
function expandChoiceList(P_CHOICE_LIST XDB.XDB$XMLTYPE_REF_LIST_T)
return XDB.XDB$XMLTYPE_REF_LIST_T
as
V_ELEMENT_LIST XDB.XDB$XMLTYPE_REF_LIST_T;
V_CHILD_ELEMENT_LIST XDB.XDB$XMLTYPE_REF_LIST_T;
cursor getChoices is
select c.XMLDATA MODEL
 from XDB.XDB$CHOICE_MODEL c, TABLE(P_CHOICE_LIST) cl
 where ref(c) = value(cl);
begin
V_ELEMENT_LIST := XDB.XDB$XMLTYPE_REF_LIST_T();
for c in getChoices loop
 V_CHILD_ELEMENT_LIST := expandModel(c.MODEL);
 V_ELEMENT_LIST := appendElementList(V_ELEMENT_LIST,V_CHILD_ELEMENT_LIST);
end loop;
return V_ELEMENT_LIST;
end;
function expandSequenceList(P_SEQUENCE_LIST XDB.XDB$XMLTYPE_REF_LIST_T)
return XDB.XDB$XMLTYPE_REF_LIST_T
as
V_ELEMENT_LIST XDB.XDB$XMLTYPE_REF_LIST_T;
V_CHILD_ELEMENT_LIST XDB.XDB$XMLTYPE_REF_LIST_T;
cursor getSequences is
select s.XMLDATA MODEL
 from XDB.XDB$SEQUENCE_MODEL s, TABLE(P_SEQUENCE_LIST) sl
 where ref(s) = value(sl);
begin
V_ELEMENT_LIST := XDB.XDB$XMLTYPE_REF_LIST_T();
for s in getSequences loop
 V_CHILD_ELEMENT_LIST := expandModel(s.MODEL);
 V_ELEMENT_LIST := appendElementList(V_ELEMENT_LIST,V_CHILD_ELEMENT_LIST);
end loop;
return V_ELEMENT_LIST;
end;
function expandGroupList(P_GROUP_LIST XDB.XDB$XMLTYPE_REF_LIST_T)
return XDB.XDB$XMLTYPE_REF_LIST_T
as
V_ELEMENT_LIST XDB.XDB$XMLTYPE_REF_LIST_T;
V_CHILD_ELEMENT_LIST XDB.XDB$XMLTYPE_REF_LIST_T; V_MODEL XDB.XDB$MODEL_T;
cursor getGroups is
SELECT CASE
 -- Return The MODEL Definition for the CHOICE, ALL or SEQUENCE
 WHEN gd.XMLDATA.ALL_KID is not NULL
 THEN ( SELECT a.XMLDATA from XDB.XDB$ALL_MODEL a where ref(a) = gd.XMLDATA.ALL_KID)
 WHEN gd.XMLDATA.SEQUENCE_KID is not NULL
 THEN ( SELECT s.XMLDATA from XDB.XDB$SEQUENCE_MODEL s where ref(s) = gd.XMLDATA.SEQUENCE_KID)
 WHEN gd.XMLDATA.CHOICE_KID is not NULL
 THEN ( SELECT c.XMLDATA from XDB.XDB$CHOICE_MODEL c where ref(c) = gd.XMLDATA.CHOICE_KID)
 END MODEL
 FROM XDB.XDB$GROUP_DEF gd, XDB.XDB$GROUP_REF gr, TABLE(P_GROUP_LIST) gl
 WHERE ref(gd) = gr.XMLDATA.GROUPREF_REF
 and ref(gr) = value(gl);
begin
V_ELEMENT_LIST := XDB.XDB$XMLTYPE_REF_LIST_T();
for g in getGroups loop
 V_CHILD_ELEMENT_LIST := expandModel(g.MODEL);
 V_ELEMENT_LIST := appendElementList(V_ELEMENT_LIST,V_CHILD_ELEMENT_LIST);
end loop;
return V_ELEMENT_LIST;
end;
function getComplexTypeElementList(P_COMPLEX_TYPE_REF REF XMLTYPE)
return XDB.XDB$XMLTYPE_REF_LIST_T
as
V_MODEL XDB.XDB$MODEL_T;
V_BASE_TYPE REF XMLTYPE;
V_ELEMENT_LIST XDB.XDB$XMLTYPE_REF_LIST_T := XDB.XDB$XMLTYPE_REF_LIST_T();
begin
SELECT ct.XMLDATA.BASE_TYPE,
 CASE
 -- Return The MODEL Definition for the CHOICE, ALL or SEQUENCE
 WHEN ct.XMLDATA.ALL_KID is not NULL
 THEN ( SELECT a.XMLDATA from XDB.XDB$ALL_MODEL a where ref(a) = ct.XMLDATA.ALL_KID)
 WHEN ct.XMLDATA.SEQUENCE_KID is not NULL
 THEN ( SELECT s.XMLDATA from XDB.XDB$SEQUENCE_MODEL s where ref(s) = ct.XMLDATA.SEQUENCE_KID)
 WHEN ct.XMLDATA.CHOICE_KID is not NULL
 THEN ( SELECT c.XMLDATA from XDB.XDB$CHOICE_MODEL c where ref(c) = ct.XMLDATA.CHOICE_KID)
 WHEN ct.XMLDATA.GROUP_KID is not NULL
 -- COMPLEXTYPE is based on a GROUP.
 THEN (
 -- RETURN The CHOICE, ALL or SEQUENCE for GROUP
 SELECT CASE
 WHEN gd.XMLDATA.ALL_KID is not NULL
 THEN ( SELECT a.XMLDATA from XDB.XDB$ALL_MODEL a where ref(a) = gd.XMLDATA.ALL_KID)
 WHEN gd.XMLDATA.SEQUENCE_KID is not NULL
 THEN ( SELECT s.XMLDATA from XDB.XDB$SEQUENCE_MODEL s where ref(s) = gd.XMLDATA.SEQUENCE_KID)
 WHEN gd.XMLDATA.CHOICE_KID is not NULL
 THEN ( SELECT c.XMLDATA from XDB.XDB$CHOICE_MODEL c where ref(c) = gd.XMLDATA.CHOICE_KID)
 END
 FROM XDB.XDB$GROUP_DEF gd, xdb.xdb$GROUP_REF gr
 WHERE ref(gd) = gr.XMLDATA.GROUPREF_REF
 and ref(gr) = ct.XMLDATA.GROUP_KID
-- WHEN ct.XMLDATA.COMPLEXCONTENT.RESTRICTION.ALL_KID is not NULL
-- THEN ( SELECT a.XMLDATA from XDB.XDB$ALL_MODEL a where ref(a) = ct.XMLDATA.COMPLEXCONTENT.RESTRICTION.ALL_KID)
-- WHEN ct.XMLDATA.COMPLEXCONTENT.RESTRICTION.SEQUENCE_KID is not NULL
-- THEN ( SELECT s.XMLDATA from XDB.XDB$SEQUENCE_MODEL s where ref(s) = ct.XMLDATA.COMPLEXCONTENT.RESTRICTION.SEQUENCE_KID)
-- WHEN ct.XMLDATA.COMPLEXCONTENT.RESTRICTION.CHOICE_KID is not NULL
-- THEN ( SELECT c.XMLDATA from XDB.XDB$CHOICE_MODEL c where ref(c) = ct.XMLDATA.COMPLEXCONTENT.RESTRICTION.CHOICE_KID)
-- WHEN ct.XMLDATA.COMPLEXCONTENT.RESTRICTION.GROUP_KID is not NULL
-- -- COMPLEXTYPE is based on a GROUP.
-- THEN (
-- -- RETURN The CHOICE, ALL or SEQUENCE for GROUP
-- SELECT CASE
-- WHEN gd.XMLDATA.ALL_KID is not NULL
-- THEN ( SELECT a.XMLDATA from XDB.XDB$ALL_MODEL a where ref(a) = gd.XMLDATA.ALL_KID)
-- WHEN gd.XMLDATA.SEQUENCE_KID is not NULL
-- THEN ( SELECT s.XMLDATA from XDB.XDB$SEQUENCE_MODEL s where ref(s) = gd.XMLDATA.SEQUENCE_KID)
-- WHEN gd.XMLDATA.CHOICE_KID is not NULL
-- THEN ( SELECT c.XMLDATA from XDB.XDB$CHOICE_MODEL c where ref(c) = gd.XMLDATA.CHOICE_KID)
-- END
-- FROM XDB.XDB$GROUP_DEF gd, xdb.xdb$GROUP_REF gr
-- WHERE ref(gd) = gr.XMLDATA.GROUPREF_REF
-- and ref(gr) = ct.XMLDATA.COMPLEXCONTENT.RESTRICTION.GROUP_KID
 WHEN ct.XMLDATA.COMPLEXCONTENT.EXTENSION.ALL_KID is not NULL
 THEN ( SELECT a.XMLDATA from XDB.XDB$ALL_MODEL a where ref(a) = ct.XMLDATA.COMPLEXCONTENT.EXTENSION.ALL_KID)
 WHEN ct.XMLDATA.COMPLEXCONTENT.EXTENSION.SEQUENCE_KID is not NULL
 THEN ( SELECT s.XMLDATA from XDB.XDB$SEQUENCE_MODEL s where ref(s) = ct.XMLDATA.COMPLEXCONTENT.EXTENSION.SEQUENCE_KID)
 WHEN ct.XMLDATA.COMPLEXCONTENT.EXTENSION.CHOICE_KID is not NULL
 THEN ( SELECT c.XMLDATA from XDB.XDB$CHOICE_MODEL c where ref(c) = ct.XMLDATA.COMPLEXCONTENT.EXTENSION.CHOICE_KID)
 WHEN ct.XMLDATA.COMPLEXCONTENT.EXTENSION.GROUP_KID is not NULL
 -- COMPLEXTYPE is based on a GROUP.
 THEN (
 -- RETURN The CHOICE, ALL or SEQUENCE for GROUP
 SELECT CASE
 WHEN gd.XMLDATA.ALL_KID is not NULL
 THEN ( SELECT a.XMLDATA from XDB.XDB$ALL_MODEL a where ref(a) = gd.XMLDATA.ALL_KID)

Maximum number of columns in a table or view is 1000

Post Author: TinaReifer
CA Forum: Formula
I am trying to create a direct link from Tririga / Oracle database into Crystal XI. The data I am attempting to pull is from the RETransaction (Escalations). The error I keep receiving is shown below. Has anyone run across this problem and found a solution that can be shared?
Very Appreciative for any feedback.
Tina Reifer
"Failed to retrieve data from the database.
Details: HY000:[Oracle][ODBC][Ora]ORA-01792: maximum number of columns in a table or view is 1000
[Database Vendor Code: 1792]"

Post Author: synapsevampire
CA Forum: Formula
Try posting your software, its version, and the type of connectivity you're using for oracle.
Older versions of Crystal used a proprietary Oracle ODBC driver that came with Crystal, but you should SWITCH away from using ODBC anyway, not sure why you elected to use it, it's slower and more problematic.
You'll see Oracle Server listed as a data source, that is generally the best connectivity to use.
Also, what version of Oracle is it, and what Oracle client are you using?
You might need your Oracle dbas assistance here.
Anyway, the error is not a Crystal error, it's being raised by the ODBC driver, and Oracle used to have a maximum of 1024 colums I think it was...been a while...
-k

Java.lang.Exception: ORA-00020: maximum number of processes (150) exceeded?

When i run my web-application with the embedded OC4J server, the following error message is prompted:
java.lang.Exception: ORA-00020: maximum number of processes (150) exceeded
 void MyFolder.objects.MyObject.<init>(oracle.jbo.ApplicationModule, java.lang.String, java.lang.String, javax.servlet.http.HttpServletRequest)
 void MyFolder.servlet.MyServlet.doPost(javax.servlet.http.HttpServletRequest, javax.servlet.http.HttpServletResponse)
 void javax.servlet.http.HttpServlet.service(com.evermind.server.http.EvermindHttpServletRequest, com.evermind.server.http.EvermindHttpServletResponse)
 void javax.servlet.http.HttpServlet.service(javax.servlet.http.HttpServletRequest, javax.servlet.http.HttpServletResponse)
 void javax.servlet.http.HttpServlet.service(javax.servlet.ServletRequest, javax.servlet.ServletResponse)
 void com.evermind.server.http.ServletRequestDispatcher.invoke(javax.servlet.ServletRequest, javax.servlet.ServletResponse)
 void com.evermind.server.http.ServletRequestDispatcher.forwardInternal(javax.servlet.ServletRequest, javax.servlet.http.HttpServletResponse)
 boolean com.evermind.server.http.HttpRequestHandler.processRequest(com.evermind.server.ApplicationServerThread, com.evermind.server.http.EvermindHttpServletRequest, com.evermind.server.http.EvermindHttpServletResponse, java.io.InputStream, java.io.OutputStream, boolean)
 void com.evermind.server.http.HttpRequestHandler.run(java.lang.Thread)
 void com.evermind.util.ThreadPoolThread.run()
Question:
- What is the cause of this error message? How to avoid?
- I intended to deploy my application to 9IAS server. Will the same problem occurs too?
Thanks for your reply!

Hi Pig,
When i run my web-application with the embedded OC4J server, the following error message is prompted:
java.lang.Exception: ORA-00020: maximum number of processes (150) exceeded
 void MyFolder.objects.MyObject.<init>(oracle.jbo.ApplicationModule, java.lang.String, java.lang.String, javax.servlet.http.HttpServletRequest)
 void MyFolder.servlet.MyServlet.doPost(javax.servlet.http.HttpServletRequest, javax.servlet.http.HttpServletResponse)
 void javax.servlet.http.HttpServlet.service(com.evermind.server.http.EvermindHttpServletRequest, com.evermind.server.http.EvermindHttpServletResponse)
 void javax.servlet.http.HttpServlet.service(javax.servlet.http.HttpServletRequest, javax.servlet.http.HttpServletResponse)
 void javax.servlet.http.HttpServlet.service(javax.servlet.ServletRequest, javax.servlet.ServletResponse)
 void com.evermind.server.http.ServletRequestDispatcher.invoke(javax.servlet.ServletRequest, javax.servlet.ServletResponse)
 void com.evermind.server.http.ServletRequestDispatcher.forwardInternal(javax.servlet.ServletRequest, javax.servlet.http.HttpServletResponse)
 boolean com.evermind.server.http.HttpRequestHandler.processRequest(com.evermind.server.ApplicationServerThread, com.evermind.server.http.EvermindHttpServletRequest, com.evermind.server.http.EvermindHttpServletResponse, java.io.InputStream, java.io.OutputStream, boolean)
 void com.evermind.server.http.HttpRequestHandler.run(java.lang.Thread)
 void com.evermind.util.ThreadPoolThread.run()
Question:
- What is the cause of this error message? How to avoid?.
From the Oracle error message documentation:
ORA-00020 maximum number of processes (string) exceeded
Cause: All process state objects are in use.
Action: Increase the value of the PROCESSES initialization parameter.
Another alternative approach may be to configure your Connection pool and/or your ApplicationModule pool to optimize the use of
database connections and/or restrict the number of database connections used by the application. For example, if your application
has declared many root ApplicationModules (i.e. more than one ApplicationModule pool is in use) then it may help to enable the
jbo.doconnectionpooling switch so that each ApplicationModule instance in the pools does not maintain a dedicated database
connection while not in use. Another alternative if you are using the BC4J connection pool (not a JDBC datasource) may be to
restrict the number of connections the pool can create to < 150 with the jbo.maxpoolsize switch. However, please note that this
may have an impact on throughput.
- I intended to deploy my application to 9IAS server. Will the same problem occurs too?.
This is a database issue. So, yes.
Hope this helps.
JR

Error 'Maximum number of sessions reached' while posting an idoc

Hi,
i got one requirement that when ever user enters so many materials with different quantities and version id's and when he executes,it has to post the idocs using FM .but if the number of records increases,iam getting error that 'maximum number of internal sessions exceeded' how can i avoid this for successfful posting.To avoid this i called the FM in background .If i call the FM in background it is not at all posting even one idoc also.Can anybody please help on this .
Thanks & Regards
Roopa

Hi,
i got one requirement that when ever user enters so many materials with different quantities and version id's and when he executes,it has to post the idocs using FM .but if the number of records increases,iam getting error that 'maximum number of internal sessions exceeded' how can i avoid this for successfful posting.To avoid this i called the FM in background .If i call the FM in background it is not at all posting even one idoc also.Can anybody please help on this .
Thanks & Regards
Roopa

A/c Error 'Maximum number of item in FI reached' during invoice posting

Invoice is created with multiple Delevery So no.of entriies has increased and accounting document has not been created due to error 'Maximum number of item in FI reached'.
Accounting document not generated. How it be solved.
Regards,
Sohail

dear
maximum number of accounting line items is 999.
if the total number of line items exceeds that value .. it would cause the error ....
speak to FI guy and abap guy ..may be it could be increased but as far as i know its not changeable.
you just need to reduce the items and processes in parts..
regards

BEX analyzer -Maximum number of rows (65535) exceeded. Result is incomplete

Hello Experts,
I am trying to Run a report on BEx Analyzer.There are around 200,000 records to be displayed in the result.
I am getting the below error.
Maximum number of rows (65535) exceeded. Result is incomplete.
Message no. BRAIN675
We are on SAP GUI 7.X and Excel 2007
Is there any setting that I have to change inorder for BEX analyzer to display all the 200,000 records.
Also any memory setting for the result set to be changed ?
Please let me know your thoughts
Thanks
Doodle

Hi Doodle,
The rows limit for Excel 2007 is 1 million so this is not the problem with row limitation. It seems like you have opened the pre-excel 2007 workbook in excel 2007, check your title bar if it says "Compatible Mode". This will limit you to old standard of 65K.
May be what you can do is , save your file using save as option and try running the workbook.
Your new file extension will be .xlsx
Regards,
Durgesh.
Edited by: Durgesh Gandewar on Jul 14, 2011 10:03 AM

ORA-19921: maximum number of 64 rows exceeded

while trying to connect to the database through rman, I got this error;
Recovery Manager: Release 10.2.0.2.0 - Production on Tue Nov 24 10:59:34 2009
Copyright (c) 1982, 2005, Oracle. All rights reserved.
RMAN-06900: WARNING: unable to generate V$RMAN_STATUS or V$RMAN_OUTPUT row
RMAN-06901: WARNING: disabling update of the V$RMAN_STATUS and V$RMAN_OUTPUT rows
ORACLE error from target database:
ORA-19921: maximum number of 64 rows exceeded
connected to target database: <SID> (DBID=XXXXXXXXXX)
RMAN>
This is Oracle 10g running on AIX server.
Can anyone have an idea of resolving this issue.
Regards
Paul

Tellling the OpsTeam to ignore RMAN jobs that return errors is not an ideal solution.
Similar errors continue after upgrading to 12.0.4.2.
So the fix, does not fix all occurrances.
Have found additional information, and you may be able to look at your errors too for more info.
connected to target database: MyTargetDB (DBID=1591642534)
RMAN-06900: WARNING: unable to generate V$RMAN_STATUS or V$RMAN_OUTPUT row
RMAN-06901: WARNING: disabling update of the V$RMAN_STATUS and V$RMAN_OUTPUT rows
ORACLE error from target database:
ORA-19921: maximum number of 128 rows exceeded
SQL> connect system@mytargetdb
Enter password: *******
Connected.
SQL> select count(*) from v$rman_output;
COUNT(*)
32948
SQL> select * from v$rman_output where rownum <2;
SID RECID STAMP SESSION_RECID SESSION_STAMP
OUTPUT
RMAN_STATUS_RECID RMAN_STATUS_STAMP SESSION_KEY
505 1 709915346 186630 709912681
RMAN-06207: WARNING: 1 objects could not be deleted for SBT_TAPE channel(s) due
187039 709915343 186630
SQL> select count(*) from v$rman_output
where OUTPUT like 'RMAN-06207%'
COUNT(*)
3248 <==== only about 10% of the rows have the same RMAN-06207 error
SQL> select * from v$rman_output where SESSION_KEY <> 186630;
no rows selected <=== All rows appear to have SESSION_KEY 186630
I have opened an SR with Oracle Support to find out how to clear out the error mesage entries in v$rman_output.
I will also need to determine why the RMAN deletion of backups placed these (and other) messages into this table.

Essbase error maximum number of columns [1] exceeded [15]

Similar Messages

Maybe you are looking for