The following lines contain the word 'select', 'insert', 'update' or 'delete':
p_last_update_login IN NUMBER DEFAULT fnd_global.login_id,
x_ci_type_usage_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
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_message_code VARCHAR2(100);
SELECT project_type_id
INTO l_project_type_id
FROM pa_project_types_all
WHERE project_type like p_project_type
AND TRUNC(sysdate) BETWEEN TRUNC(start_date_active)
AND TRUNC(NVL(end_date_active, sysdate));
p_last_update_login => p_last_update_login,
x_ci_type_usage_id => x_ci_type_usage_id,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data);
PROCEDURE update_ci_type_usage (
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_max_msg_count IN NUMBER := FND_API.g_miss_num,
p_ci_type_usage_id IN NUMBER,
p_project_type IN VARCHAR2 := NULL,
p_project_type_id IN NUMBER := NULL,
p_ci_type_name IN VARCHAR2 := NULL,
p_ci_type_id IN NUMBER := NULL,
p_last_updated_by IN NUMBER DEFAULT fnd_global.user_id,
p_last_update_date IN DATE DEFAULT SYSDATE,
p_last_update_login IN NUMBER DEFAULT fnd_global.user_id,
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_message_code VARCHAR2(100);
pa_debug.set_err_stack ('PA_CI_TYPE_USAGE_PUB.UPDATE_CI_TYPE_USAGE');
SAVEPOINT update_ci_type_usage;
SELECT project_type_id
INTO l_project_type_id
FROM pa_project_types_all
WHERE project_type like p_project_type
AND TRUNC(sysdate) BETWEEN TRUNC(start_date_active)
AND TRUNC(NVL(end_date_active, sysdate));
pa_ci_type_usage_pvt.update_ci_type_usage (
p_init_msg_list => 'F',
p_commit => 'F',
p_validate_only => 'F',
p_max_msg_count => p_max_msg_count,
p_ci_type_usage_id => p_ci_type_usage_id,
p_project_type_id => l_project_type_id,
p_ci_type_id => l_ci_type_id,
p_last_update_date => p_last_update_date,
p_last_updated_by => p_last_updated_by,
p_last_update_login => p_last_update_login,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data);
ROLLBACK TO update_ci_type_usage;
ROLLBACK TO update_ci_type_usage;
p_procedure_name => 'UPDATE_CI_TYPE_USAGE',
p_error_text => SUBSTRB(SQLERRM,1,240));
END update_ci_type_usage;
PROCEDURE delete_ci_type_usage (
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_max_msg_count IN NUMBER := FND_API.g_miss_num,
p_ci_type_usage_id IN NUMBER,
p_project_type IN VARCHAR2 := NULL,
p_project_type_id IN NUMBER := NULL,
p_ci_type_name IN VARCHAR2 := NULL,
p_ci_type_id IN NUMBER := NULL,
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_message_code VARCHAR2(100);
pa_debug.set_err_stack ('PA_CI_TYPE_USAGE_PUB.DELETE_CI_TYPE_USAGE');
SAVEPOINT delete_ci_type_usage;
SELECT project_type_id
INTO l_project_type_id
FROM pa_project_types_all
WHERE project_type like p_project_type
AND TRUNC(sysdate) BETWEEN TRUNC(start_date_active)
AND TRUNC(NVL(end_date_active, sysdate));
pa_ci_type_usage_pvt.delete_ci_type_usage (
p_init_msg_list => 'F',
p_commit => 'F',
p_validate_only => 'F',
p_max_msg_count => p_max_msg_count,
p_ci_type_usage_id => p_ci_type_usage_id,
p_project_type_id => l_project_type_id,
p_ci_type_id => l_ci_type_id,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data);
ROLLBACK TO delete_ci_type_usage;
ROLLBACK TO delete_ci_type_usage;
p_procedure_name => 'DELETE_CI_TYPE_USAGE',
p_error_text => SUBSTRB(SQLERRM,1,240));
END delete_ci_type_usage;