The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE DeleteNode(x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
r_enumId IN ieu_uwq_sel_enumerators.sel_enum_id%type)
As
v_cursor1 NUMBER;
l_delete_param_property_id IEU_WP_PARAM_PROPS_B.param_property_id%type;
select distinct a.action_param_set_id
from ieu_wp_action_maps a, ieu_uwq_sel_enumerators b
where b.sel_enum_id = r_enumId
and a.action_map_code = b.enum_type_uuid;
fnd_msg_pub.delete_msg();
Execute IMMEDIATE ' delete from ieu_wp_node_section_maps where enum_type_uuid in '||
' (select enum_type_uuid from ieu_uwq_sel_enumerators '||
' where sel_enum_id = :1 ) '
USING r_enumId;
PROCEDURE Delete_Action_From_Node (
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
x_param_set_id IN NUMBER,
x_node_id IN NUMBER,
x_maction_id IN NUMBER,// if no maction_id information, provide -1
x_maction_def_flag IN VARCHAR2
);
IEU_WORK_ACTION_PVT.Delete_Action_From_Node(x_return_status,
x_msg_count ,
x_msg_data ,
cur_rec.action_param_set_id,
r_enumId,
'-1',
'W');
EXECUTE IMMEDIATE ' delete from fnd_profile_options_tl where profile_option_name '||
' in (select work_q_enable_profile_option from ieu_uwq_sel_enumerators '||
' where sel_enum_id = :1 ) '
USING r_enumId;
EXECUTE IMMEDIATE ' delete from fnd_profile_options_tl where profile_option_name '||
' in (select work_q_order_profile_option from ieu_uwq_sel_enumerators '||
' where sel_enum_id = :1 ) '
USING r_enumId;
EXECUTE IMMEDIATE ' delete from fnd_profile_options where profile_option_name '||
' in (select work_q_enable_profile_option from ieu_uwq_sel_enumerators '||
' where sel_enum_id = :1 ) '
USING r_enumId;
EXECUTE IMMEDIATE ' delete from fnd_profile_options where profile_option_name '||
' in (select work_q_order_profile_option from ieu_uwq_sel_enumerators '||
' where sel_enum_id = :1 ) '
USING r_enumId;
EXECUTE IMMEDIATE 'delete from fnd_lookup_values where (lookup_type, lookup_code) in '||
' (select work_q_label_lu_type, work_q_label_lu_code ' ||
' from ieu_uwq_sel_enumerators where sel_enum_id = :1 )'
USING r_enumId;
EXECUTE IMMEDIATE ' delete from ieu_uwq_sel_enumerators '||
' where sel_enum_id = :1 '
USING r_enumId;
end DeleteNode;