The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE UPDATE_ADDITIONAL_STAFF_INFO
(p_api_version IN NUMBER := 1.0 ,
p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
p_commit IN VARCHAR2 := FND_API.G_FALSE ,
p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
p_project_id IN NUMBER ,
p_calendar_id IN NUMBER := FND_API.G_MISS_NUM ,
p_role_list_id IN NUMBER := FND_API.G_MISS_NUM ,
p_adv_action_set_id IN NUMBER := FND_API.G_MISS_NUM ,
p_start_adv_action_set_flag IN VARCHAR2 := FND_API.G_MISS_CHAR ,
p_record_version_number IN NUMBER ,
p_initial_team_template_id IN NUMBER := FND_API.G_MISS_NUM , -- added for bug 2607631
p_proj_req_res_format_id IN NUMBER := FND_API.G_MISS_NUM ,
p_proj_asgmt_res_format_id IN NUMBER := FND_API.G_MISS_NUM ,
p_max_msg_count IN NUMBER := FND_API.G_MISS_NUM ,
x_return_status OUT NOCOPY VARCHAR2 , --File.Sql.39 bug 4440895
x_msg_count OUT NOCOPY NUMBER , --File.Sql.39 bug 4440895
x_msg_data OUT NOCOPY VARCHAR2) --File.Sql.39 bug 4440895
IS
l_error_msg_code VARCHAR2(250);
pa_debug.write(x_module => 'pa.plsql.PA_RESOURCE_SETUP_PVT.update_addition_staff_info'
,x_msg => 'adv_id='||p_adv_action_set_id||
' req_format='||p_proj_req_res_format_id||
' asgmt_format='||p_proj_asgmt_res_format_id
,x_log_level => li_message_level);
SAVEPOINT update_addition_staff_info;
SELECT 'x' INTO l_dummy
FROM pa_projects
WHERE project_id = p_project_id
AND record_version_number = p_record_version_number
FOR UPDATE OF record_version_number NOWAIT;
SELECT 'x' INTO l_dummy
FROM pa_projects
WHERE project_id = p_project_id
AND record_version_number = p_record_version_number;
UPDATE pa_projects_all
SET record_version_number = record_version_number + 1
,calendar_id = decode(p_calendar_id, FND_API.G_MISS_NUM, calendar_id, p_calendar_id)
,role_list_id = decode(p_role_list_id, FND_API.G_MISS_NUM, role_list_id, p_role_list_id)
,adv_action_set_id = decode(p_adv_action_set_id, FND_API.G_MISS_NUM, adv_action_set_id, p_adv_action_set_id)
,start_adv_action_set_flag = decode(p_start_adv_action_set_flag, FND_API.G_MISS_CHAR, start_adv_action_set_flag, p_start_adv_action_set_flag)
,initial_team_template_id = DECODE(p_initial_team_template_id, FND_API.G_MISS_NUM, initial_team_template_id, p_initial_team_template_id) -- added for bug 2607631
,proj_req_res_format_id = DECODE(p_proj_req_res_format_id, FND_API.G_MISS_NUM, proj_req_res_format_id, p_proj_req_res_format_id)
,proj_asgmt_res_format_id = DECODE(p_proj_asgmt_res_format_id, FND_API.G_MISS_NUM, proj_asgmt_res_format_id, p_proj_asgmt_res_format_id)
WHERE project_id = p_project_id;
ROLLBACK TO update_addition_staff_info;
ROLLBACK TO update_addition_staff_info;
p_procedure_name => 'UPDATE_ADDITIONAL_STAFF_INFO',
p_error_text => SUBSTRB(SQLERRM,1,240));
END UPDATE_ADDITIONAL_STAFF_INFO;