The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure insert_dimension_data(
p_instance_id in number,
p_dim_code in varchar2,
p_hier_code in varchar2,
c_dim_data_rec in out nocopy QPR_LOAD_DIM_DATA.DIM_DATA_REC_TYPE);
procedure delete_duplicate_data(
p_instance_id in number);
select distinct dim_code dim, hier_code hier
from qpr_dim_sources
where instance_id = l_dim_src_instance_id
and instance_type = l_inst_type;
select distinct hier_code hier
from qpr_dim_sources
where instance_id = l_dim_src_instance_id
and dim_code = p_dim_code
and instance_type = l_inst_type;
select hsecs into l_start_time from v$timer;
select instance_type into l_inst_type
from qpr_instances
where instance_id = p_instance_id;
select count(*) into l_check_instance
from qpr_dim_sources
where instance_id = p_instance_id;
delete_duplicate_data (p_instance_id);
select hsecs into l_end_time from v$timer;
procedure delete_duplicate_data (p_instance_id in number)
is
Begin
delete from qpr_dimension_values a
where a.instance_id = p_instance_id
and a.rowid >
ANY
(select b.rowid
from qpr_dimension_values b
where a.dim_code = b.dim_code
and a.hierarchy_code = b.hierarchy_code
and a.instance_id = b.instance_id
and a.level1_value = b.level1_value);
l_sql := 'select ';
select count(nvl(user_value_column, value_column)) into l_level_defined
from qpr_dim_sources
where instance_id = l_dim_src_instance_id
and instance_type = l_inst_type
and dim_code = p_dim_code
and hier_code = p_hier_code
and nvl(user_level_number, level_number) = l_count;
select count(nvl(user_attr_column, attr_column)) into l_attr_defined
from qpr_dim_sources
where instance_id = l_dim_src_instance_id
and instance_type = l_inst_type
and dim_code = p_dim_code
and hier_code = p_hier_code
and nvl(user_level_number, level_number) = l_count;
select
nvl(user_value_column, value_column),
nvl(user_desc_column, desc_column),
nvl(user_attr_column, attr_column)
into
l_value_column,
l_desc_column,
l_attr_column
from qpr_dim_sources
where instance_id = l_dim_src_instance_id
and instance_type = l_inst_type
and dim_code = p_dim_code
and hier_code = p_hier_code
and nvl(user_level_number, level_number) = l_count
and nvl(user_attr_number, attr_number) = l_attr_num;
select
nvl(user_value_column, value_column),
nvl(user_desc_column, desc_column)
into
l_value_column,
l_desc_column
from qpr_dim_sources
where instance_id = l_dim_src_instance_id
and instance_type = l_inst_type
and dim_code = p_dim_code
and hier_code = p_hier_code
and nvl(user_level_number, level_number) = l_count;
select
nvl(user_value_column, value_column)
into
l_value_column
from qpr_dim_sources
where instance_id = l_dim_src_instance_id
and instance_type = l_inst_type
and dim_code = p_dim_code
and hier_code = p_hier_code
and nvl(user_level_number, level_number) = 999;
select distinct nvl(user_view_name, view_name)
into l_source_view_name
from qpr_dim_sources
where instance_id = l_dim_src_instance_id
and instance_type = l_inst_type
and dim_code = p_dim_code
and hier_code = p_hier_code;
select nvl(user_value_column, value_column)
into l_date_column
from qpr_dim_sources
where instance_id = l_dim_src_instance_id
and instance_type = l_inst_type
and dim_code = p_dim_code
and hier_code = p_hier_code
and nvl(user_level_number, level_number) = 998
and rownum < 2;
fnd_file.put_line( fnd_file.log, 'Delete arrays ');
c_dim_data_rec.level1_value.delete;
c_dim_data_rec.level1_desc.delete;
c_dim_data_rec.level1_attribute1.delete;
c_dim_data_rec.level1_attribute2.delete;
c_dim_data_rec.level1_attribute3.delete;
c_dim_data_rec.level1_attribute4.delete;
c_dim_data_rec.level1_attribute5.delete;
c_dim_data_rec.level2_value.delete;
c_dim_data_rec.level2_desc.delete;
c_dim_data_rec.level2_attribute1.delete;
c_dim_data_rec.level2_attribute2.delete;
c_dim_data_rec.level2_attribute3.delete;
c_dim_data_rec.level2_attribute4.delete;
c_dim_data_rec.level2_attribute5.delete;
c_dim_data_rec.level3_value.delete;
c_dim_data_rec.level3_desc.delete;
c_dim_data_rec.level3_attribute1.delete;
c_dim_data_rec.level3_attribute2.delete;
c_dim_data_rec.level3_attribute3.delete;
c_dim_data_rec.level3_attribute4.delete;
c_dim_data_rec.level3_attribute5.delete;
c_dim_data_rec.level4_value.delete;
c_dim_data_rec.level4_desc.delete;
c_dim_data_rec.level4_attribute1.delete;
c_dim_data_rec.level4_attribute2.delete;
c_dim_data_rec.level4_attribute3.delete;
c_dim_data_rec.level4_attribute4.delete;
c_dim_data_rec.level4_attribute5.delete;
c_dim_data_rec.level5_value.delete;
c_dim_data_rec.level5_desc.delete;
c_dim_data_rec.level5_attribute1.delete;
c_dim_data_rec.level5_attribute2.delete;
c_dim_data_rec.level5_attribute3.delete;
c_dim_data_rec.level5_attribute4.delete;
c_dim_data_rec.level5_attribute5.delete;
c_dim_data_rec.level6_value.delete;
c_dim_data_rec.level6_desc.delete;
c_dim_data_rec.level6_attribute1.delete;
c_dim_data_rec.level6_attribute2.delete;
c_dim_data_rec.level6_attribute3.delete;
c_dim_data_rec.level6_attribute4.delete;
c_dim_data_rec.level6_attribute5.delete;
c_dim_data_rec.level7_value.delete;
c_dim_data_rec.level7_desc.delete;
c_dim_data_rec.level7_attribute1.delete;
c_dim_data_rec.level7_attribute2.delete;
c_dim_data_rec.level7_attribute3.delete;
c_dim_data_rec.level7_attribute4.delete;
c_dim_data_rec.level7_attribute5.delete;
c_dim_data_rec.level8_value.delete;
c_dim_data_rec.level8_desc.delete;
c_dim_data_rec.level8_attribute1.delete;
c_dim_data_rec.level8_attribute2.delete;
c_dim_data_rec.level8_attribute3.delete;
c_dim_data_rec.level8_attribute4.delete;
c_dim_data_rec.level8_attribute5.delete;
c_dim_data_rec.check_date.delete;
insert_dimension_data(p_instance_id, p_dim_code, p_hier_code, c_dim_data_rec);
procedure insert_dimension_data(
p_instance_id in number,
p_dim_code in varchar2,
p_hier_code in varchar2,
c_dim_data_rec in out nocopy QPR_LOAD_DIM_DATA.DIM_DATA_REC_TYPE)
is
l_request_id number;
fnd_file.put_line(fnd_file.log,'Entering insert dimension data ');
fnd_file.put_line(fnd_file.log,'Inserting dimension data for: '||p_dim_code||'_'||p_hier_code);
delete from QPR_DIMENSION_VALUES
where dim_code = p_dim_code
and hierarchy_code = p_hier_code
and instance_id = p_instance_id
and level1_value = c_dim_data_rec.level1_value(I);
INSERT INTO QPR_DIMENSION_VALUES
(dim_value_id,
instance_id,
dim_code,
hierarchy_code,
level1_value,
level1_desc,
level1_attribute1,
level1_attribute2,
level1_attribute3,
level1_attribute4,
level1_attribute5,
level2_value,
level2_desc,
level2_attribute1,
level2_attribute2,
level2_attribute3,
level2_attribute4,
level2_attribute5,
level3_value,
level3_desc,
level3_attribute1,
level3_attribute2,
level3_attribute3,
level3_attribute4,
level3_attribute5,
level4_value,
level4_desc,
level4_attribute1,
level4_attribute2,
level4_attribute3,
level4_attribute4,
level4_attribute5,
level5_value,
level5_desc,
level5_attribute1,
level5_attribute2,
level5_attribute3,
level5_attribute4,
level5_attribute5,
level6_value,
level6_desc,
level6_attribute1,
level6_attribute2,
level6_attribute3,
level6_attribute4,
level6_attribute5,
level7_value,
level7_desc,
level7_attribute1,
level7_attribute2,
level7_attribute3,
level7_attribute4,
level7_attribute5,
level8_value,
level8_desc,
level8_attribute1,
level8_attribute2,
level8_attribute3,
level8_attribute4,
level8_attribute5,
check_date,
creation_date,
created_by,
last_update_date,
last_updated_by,
last_update_login,
program_application_id,
program_id,
program_login_id,
request_id)
values
(QPR_DIMENSION_VALUES_S.nextval,
p_instance_id,
p_dim_code,
p_hier_code,
c_dim_data_rec.level1_value(I),
c_dim_data_rec.level1_desc(I),
c_dim_data_rec.level1_attribute1(I),
c_dim_data_rec.level1_attribute2(I),
c_dim_data_rec.level1_attribute3(I),
c_dim_data_rec.level1_attribute4(I),
c_dim_data_rec.level1_attribute5(I),
c_dim_data_rec.level2_value(I),
c_dim_data_rec.level2_desc(I),
c_dim_data_rec.level2_attribute1(I),
c_dim_data_rec.level2_attribute2(I),
c_dim_data_rec.level2_attribute3(I),
c_dim_data_rec.level2_attribute4(I),
c_dim_data_rec.level2_attribute5(I),
c_dim_data_rec.level3_value(I),
c_dim_data_rec.level3_desc(I),
c_dim_data_rec.level3_attribute1(I),
c_dim_data_rec.level3_attribute2(I),
c_dim_data_rec.level3_attribute3(I),
c_dim_data_rec.level3_attribute4(I),
c_dim_data_rec.level3_attribute5(I),
c_dim_data_rec.level4_value(I),
c_dim_data_rec.level4_desc(I),
c_dim_data_rec.level4_attribute1(I),
c_dim_data_rec.level4_attribute2(I),
c_dim_data_rec.level4_attribute3(I),
c_dim_data_rec.level4_attribute4(I),
c_dim_data_rec.level4_attribute5(I),
c_dim_data_rec.level5_value(I),
c_dim_data_rec.level5_desc(I),
c_dim_data_rec.level5_attribute1(I),
c_dim_data_rec.level5_attribute2(I),
c_dim_data_rec.level5_attribute3(I),
c_dim_data_rec.level5_attribute4(I),
c_dim_data_rec.level5_attribute5(I),
c_dim_data_rec.level6_value(I),
c_dim_data_rec.level6_desc(I),
c_dim_data_rec.level6_attribute1(I),
c_dim_data_rec.level6_attribute2(I),
c_dim_data_rec.level6_attribute3(I),
c_dim_data_rec.level6_attribute4(I),
c_dim_data_rec.level6_attribute5(I),
c_dim_data_rec.level7_value(I),
c_dim_data_rec.level7_desc(I),
c_dim_data_rec.level7_attribute1(I),
c_dim_data_rec.level7_attribute2(I),
c_dim_data_rec.level7_attribute3(I),
c_dim_data_rec.level7_attribute4(I),
c_dim_data_rec.level7_attribute5(I),
c_dim_data_rec.level8_value(I),
c_dim_data_rec.level8_desc(I),
c_dim_data_rec.level8_attribute1(I),
c_dim_data_rec.level8_attribute2(I),
c_dim_data_rec.level8_attribute3(I),
c_dim_data_rec.level8_attribute4(I),
c_dim_data_rec.level8_attribute5(I),
c_dim_data_rec.check_date(I),
sysdate,
fnd_global.user_id,
sysdate,
fnd_global.user_id,
fnd_global.conc_login_id,
fnd_global.prog_appl_id,
fnd_global.conc_program_id,
null,
l_request_id);
fnd_file.put_line(fnd_file.log, 'UNEXCPECTED ERROR IN INSERT_DIMENSION_DATA:'||sqlerrm);
fnd_file.put_line(fnd_file.log, 'UNEXCPECTED ERROR IN INSERT_DIMENSION_DATA:'||sqlerrm);