The following lines contain the word 'select', 'insert', 'update' or 'delete':
select short_name
into x_level_name
from BIS_levels
where level_id = p_level_id;
l_level_select_list1 Varchar2(2000) :=
'lvl.wf_process,PLan.plan_id, plan.short_name,' ||
'plan.version_no,plan.current_plan_flag' ;
l_level_select_list2 Varchar2(2000) :=
',val.target, val.range1_low, val.range1_high,' ||
'val.range2_low, val.range2_high, val.range3_low, val.range3_high,' ||
'val.role1_id,'||
'val.role2_id,'||
'val.role3_id,'||
'val.role1,'||
'val.role2,'||
'val.role3';
l_level_select_list3 Varchar2(2000);
BIS_debug_pub.add('Selecting row from BIS_target_levels for : '
|| p_ind_level_name);
select *
into l_trg_lvl_rec
from BIS_target_levels
where short_name = p_ind_level_name;
BIS_debug_pub.add('Select Level Name For Time');
l_level_select_list3 := ','||' substr(val.time_level_value,instr(val.time_level_value,''+'',1,1)+1) '
||', '|| ' substr(val.time_level_value,-4), '
|| 'substr(val.time_level_value,1,instr(val.time_level_value,''+'',1,1)-1)';
l_level_select_list3 := ','||'substr(val.time_level_value,instr(val.time_level_value,''+'',1,1)+1) '
||', '||'to_number(' ||'gl.period_year'||')'||','
|| 'substr(val.time_level_value,1,instr(val.time_level_value,''+'',1,1)-1)';
l_level_select_list1 := l_level_select_list1 || ',' || 'val.time_level_value';
BIS_debug_pub.add('Select Level Name For Org');
l_level_select_list1 := l_level_select_list1
|| ',' || 'val.org_level_value';
BIS_debug_pub.add('Select Level Name For Dimension 1');
l_level_select_list1 := l_level_select_list1 || ','
|| 'val.dimension1_level_value';
BIS_debug_pub.add('Select Level Name For Dimension 2');
l_level_select_list1 := l_level_select_list1 || ','
|| 'val.dimension2_level_value';
BIS_debug_pub.add('Select Level Name For Dimension 3');
l_level_select_list1 := l_level_select_list1 || ','
|| 'val.dimension3_level_value';
BIS_debug_pub.add('Select Level Name For Dimension 4');
l_level_select_list1 := l_level_select_list1 || ','
|| 'val.dimension4_level_value';
BIS_debug_pub.add('Select Level Name For Dimension 5');
l_level_select_list1 := l_level_select_list1
|| ',' || 'val.dimension5_level_value';
BIS_debug_pub.add(l_level_col_list3|| ') as select ' );
BIS_debug_pub.add(l_level_select_list1 || l_level_select_list2|| l_level_select_list3);
|| l_level_col_list3 || ') as select '
|| l_level_select_list1
|| l_level_select_list2
|| l_level_select_list3
|| ' ' || l_view_from_stmt ||' '||l_view_from_stmt2||' '||l_view_from_stmt3
,language_flag => DBMS_SQL.Native);
select lvl.short_name
from BIS_target_levels lvl,
BIS_indicators ind
where lvl.indicator_id = ind.indicator_id
and ind.short_name = p_indicator_name;
BIS_debug_pub.add('Select Levels for Indicator:' || p_indicator_name);
select short_name
from BIS_indicators ;
select short_name into l_view_name from bis_target_levels
where target_level_id = p_target_level_id;
l_select_stmt Varchar2(2000);
select level_values_view_name into l_view_name
from bis_levels where level_id = p_dim_level_id;
l_select_stmt := 'select value from '|| l_view_name
||' where id = :dim_level_value_id';
statement => l_select_stmt,
language_flag => DBMS_SQL.Native);
l_select_stmt Varchar2(2000);
select level_values_view_name into l_view_name
from bis_levels where level_id = p_dim_level_id;
l_select_stmt := 'select v.responsibility_id, v.id, f.user_id '
||' from '||l_view_name||' v, fnd_user_responsibility f '
||' where v.responsibility_id = :responsibility_id '
||' and v.id = :organization_id '
||' and f.user_id = :user_id '
||' and v.responsibility_id = f.responsibility_id '
||' and f.start_date <= SYSDATE and nvl(f.end_date,SYSDATE) >= SYSDATE ';
statement => l_select_stmt,
language_flag => DBMS_SQL.NATIVE);