ut_curr_usr_compound_helper

UT_CURR_USR_COMPOUND_HELPER

• Variables

• Exceptions

Variables

Name	Code	Description
end	end if;
return	return ut_key_anyval_pair(a_desc_rec.col_name,l_data);
end	end loop;
return	return l_result;
l_columns_count	l_columns_count pls_integer;
l_columns_desc	l_columns_desc dbms_sql.desc_tab3;
l_columns_tab	l_columns_tab ut_key_anyval_pairs;
end	end if;
l_cursor_number := dbms_sql.to_cursor_number( a_cursor );
a_cursor := dbms_sql.to_refcursor( l_cursor_number );
l_columns_tab := get_columns_info( l_columns_desc, l_columns_count,a_desc_user_types);
return	return l_columns_tab;
l_columns_count	l_columns_count pls_integer;
l_columns_desc	l_columns_desc dbms_sql.desc_tab3;
a_join_by_tab := null;
end	end if;
l_cursor_number := dbms_sql.to_cursor_number( a_cursor );
a_cursor := dbms_sql.to_refcursor( l_cursor_number );
a_columns_tab := get_columns_info( l_columns_desc, l_columns_count,false);
a_join_by_tab := get_columns_info( l_columns_desc, l_columns_count,true);
l_join_by_info	l_join_by_info xmltype;
l_result_tmp	l_result_tmp xmltype;
l_columns_tab	l_columns_tab ut_key_anyval_pairs;
l_join_by_tab	l_join_by_tab ut_key_anyval_pairs;
begin	begin get_descr_cursor(a_cursor,l_columns_tab,l_join_by_tab);
select	select xmlconcat(l_columns_info,l_result_tmp) into l_columns_info from dual;
end	end loop;
select	select xmlconcat(l_join_by_info,l_result_tmp) into l_join_by_info from dual;
end	end loop;
a_contains_collection := ut_utils.boolean_to_int(g_is_collection);
l_result_tmp	l_result_tmp xmltype;
l_columns_tab	l_columns_tab ut_key_anyval_pairs;
begin	begin l_columns_tab := get_descr_cursor(a_cursor,a_desc_user_types);
select	select xmlconcat(l_result,l_result_tmp) into l_result from dual;
end	end loop;
return	return l_result;
l_schema_name	l_schema_name varchar2(32767);
l_version	l_version varchar2(32767);
l_type_name	l_type_name varchar2(32767);
l_attributes	l_attributes pls_integer;
l_prec	l_prec pls_integer;
l_scale	l_scale pls_integer;
l_len	l_len pls_integer;
l_csid	l_csid pls_integer;
l_csfrm	l_csfrm pls_integer;
return	return l_attributes;
l_attribute_typecode	l_attribute_typecode pls_integer;
l_aname	l_aname varchar2(32767);
l_prec	l_prec pls_integer;
l_scale	l_scale pls_integer;
l_len	l_len pls_integer;
l_csid	l_csid pls_integer;
l_csfrm	l_csfrm pls_integer;
l_attr_elt_type	l_attr_elt_type anytype;
end	end if;
end	end loop;
return	return l_result;
l_anytype	l_anytype anytype;
l_typecode	l_typecode pls_integer;
l_result	l_result xmltype;
l_columns_tab	l_columns_tab ut_key_value_pairs := ut_key_value_pairs();
begin :anydata := anydata.convertobject(l_v);
l_typecode := l_anydata.gettype(l_anytype);
l_columns_tab := get_anytype_attributes_info(l_anytype);
return	return l_result;
begin	begin g_anytype_name_map(dbms_types.typecode_date) :=' DATE';

Exceptions

Name	Code	Description
end	end if;
return	return ut_key_anyval_pair(a_desc_rec.col_name,l_data);
end	end loop;
return	return l_result;
l_columns_count	l_columns_count pls_integer;
l_columns_desc	l_columns_desc dbms_sql.desc_tab3;
l_columns_tab	l_columns_tab ut_key_anyval_pairs;
end	end if;
l_cursor_number := dbms_sql.to_cursor_number( a_cursor );
a_cursor := dbms_sql.to_refcursor( l_cursor_number );
l_columns_tab := get_columns_info( l_columns_desc, l_columns_count,a_desc_user_types);
return	return l_columns_tab;
l_columns_count	l_columns_count pls_integer;
l_columns_desc	l_columns_desc dbms_sql.desc_tab3;
a_join_by_tab := null;
end	end if;
l_cursor_number := dbms_sql.to_cursor_number( a_cursor );
a_cursor := dbms_sql.to_refcursor( l_cursor_number );
a_columns_tab := get_columns_info( l_columns_desc, l_columns_count,false);
a_join_by_tab := get_columns_info( l_columns_desc, l_columns_count,true);
l_join_by_info	l_join_by_info xmltype;
l_result_tmp	l_result_tmp xmltype;
l_columns_tab	l_columns_tab ut_key_anyval_pairs;
l_join_by_tab	l_join_by_tab ut_key_anyval_pairs;
begin	begin get_descr_cursor(a_cursor,l_columns_tab,l_join_by_tab);
select	select xmlconcat(l_columns_info,l_result_tmp) into l_columns_info from dual;
end	end loop;
select	select xmlconcat(l_join_by_info,l_result_tmp) into l_join_by_info from dual;
end	end loop;
a_contains_collection := ut_utils.boolean_to_int(g_is_collection);
l_result_tmp	l_result_tmp xmltype;
l_columns_tab	l_columns_tab ut_key_anyval_pairs;
begin	begin l_columns_tab := get_descr_cursor(a_cursor,a_desc_user_types);
select	select xmlconcat(l_result,l_result_tmp) into l_result from dual;
end	end loop;
return	return l_result;
l_schema_name	l_schema_name varchar2(32767);
l_version	l_version varchar2(32767);
l_type_name	l_type_name varchar2(32767);
l_attributes	l_attributes pls_integer;
l_prec	l_prec pls_integer;
l_scale	l_scale pls_integer;
l_len	l_len pls_integer;
l_csid	l_csid pls_integer;
l_csfrm	l_csfrm pls_integer;
return	return l_attributes;
l_attribute_typecode	l_attribute_typecode pls_integer;
l_aname	l_aname varchar2(32767);
l_prec	l_prec pls_integer;
l_scale	l_scale pls_integer;
l_len	l_len pls_integer;
l_csid	l_csid pls_integer;
l_csfrm	l_csfrm pls_integer;
l_attr_elt_type	l_attr_elt_type anytype;
end	end if;
end	end loop;
return	return l_result;
l_anytype	l_anytype anytype;
l_typecode	l_typecode pls_integer;
l_result	l_result xmltype;
l_columns_tab	l_columns_tab ut_key_value_pairs := ut_key_value_pairs();
begin :anydata := anydata.convertobject(l_v);
l_typecode := l_anydata.gettype(l_anytype);
l_columns_tab := get_anytype_attributes_info(l_anytype);
return	return l_result;
begin	begin g_anytype_name_map(dbms_types.typecode_date) :=' DATE';