The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE delete_scenario_plans
(p_api_version IN NUMBER ,
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
p_commit IN VARCHAR2 := FND_API.G_FALSE ,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
p_role_plan_id IN CN_SCENARIO_PLANS_ALL.ROLE_PLAN_ID%TYPE := NULL,
p_comp_plan_id IN CN_SCENARIO_PLANS_ALL.COMP_PLAN_ID%TYPE := NULL,
p_role_id IN CN_SCENARIO_PLANS_ALL.ROLE_ID%TYPE := NULL,
x_return_status OUT NOCOPY VARCHAR2 ,
x_msg_count OUT NOCOPY NUMBER ,
x_msg_data OUT NOCOPY VARCHAR2 ) IS
l_api_name CONSTANT VARCHAR2(30) := 'delete_scenario_plans';
SAVEPOINT delete_scenario_plans;
delete from cn_scenario_plans_all where role_plan_id = p_role_plan_id;
delete from cn_scenario_plans_all where role_id = p_role_id;
delete from cn_scenario_plans_all where comp_plan_id = p_comp_plan_id;
ROLLBACK TO delete_scenario_plans;
ROLLBACK TO delete_scenario_plans;
ROLLBACK TO delete_scenario_plans;