The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT project_id
INTO l_project_id
FROM pa_projects_all
WHERE name = p_project_name;
PROCEDURE Update_Subteam
(
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_validation_level IN NUMBER := FND_API.g_valid_level_full,
p_calling_module IN VARCHAR2 := 'SELF_SERVICE',
p_debug_mode IN VARCHAR2 := 'N',
p_max_msg_count IN NUMBER := FND_API.g_miss_num,
p_subteam_row_id IN ROWID := NULL,
p_subteam_id IN pa_project_subteams.project_subteam_id%TYPE := fnd_api.g_miss_num,
p_subteam_name IN pa_project_subteams.name%TYPE := FND_API.g_miss_char,
p_object_type IN pa_project_subteams.object_type%TYPE := FND_API.g_miss_char,
p_object_id IN pa_project_subteams.object_id%TYPE := FND_API.g_miss_num,
p_object_name IN VARCHAR2 := FND_API.g_miss_char,
p_description IN pa_project_subteams.description%TYPE := FND_API.g_miss_char,
p_record_version_number IN pa_project_subteams.record_version_number%TYPE := FND_API.g_miss_num,
p_attribute_category IN pa_project_subteams.attribute_category%TYPE := FND_API.g_miss_char,
p_attribute1 IN pa_project_subteams.attribute1%TYPE := FND_API.G_MISS_CHAR,
p_attribute2 IN pa_project_subteams.attribute2%TYPE := FND_API.G_MISS_CHAR,
p_attribute3 IN pa_project_subteams.attribute3%TYPE := FND_API.G_MISS_CHAR,
p_attribute4 IN pa_project_subteams.attribute4%TYPE := FND_API.G_MISS_CHAR,
p_attribute5 IN pa_project_subteams.attribute5%TYPE := FND_API.G_MISS_CHAR,
p_attribute6 IN pa_project_subteams.attribute6%TYPE := FND_API.G_MISS_CHAR,
p_attribute7 IN pa_project_subteams.attribute7%TYPE := FND_API.G_MISS_CHAR,
p_attribute8 IN pa_project_subteams.attribute8%TYPE := FND_API.G_MISS_CHAR,
p_attribute9 IN pa_project_subteams.attribute9%TYPE := FND_API.G_MISS_CHAR,
p_attribute10 IN pa_project_subteams.attribute10%TYPE := FND_API.G_MISS_CHAR,
p_attribute11 IN pa_project_subteams.attribute11%TYPE := FND_API.G_MISS_CHAR,
p_attribute12 IN pa_project_subteams.attribute12%TYPE := FND_API.G_MISS_CHAR,
p_attribute13 IN pa_project_subteams.attribute13%TYPE := FND_API.G_MISS_CHAR,
p_attribute14 IN pa_project_subteams.attribute14%TYPE := FND_API.G_MISS_CHAR,
p_attribute15 IN pa_project_subteams.attribute15%TYPE := FND_API.G_MISS_CHAR,
--Bug: 4537865
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
--x_record_version_number OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
--Bug: 4537865
)
IS
CURSOR check_record_version IS
SELECT ROWID
FROM pa_project_subteams
WHERE (project_subteam_id = p_subteam_id
OR ROWID = p_subteam_row_id)
AND record_version_number = p_record_version_number;
PA_DEBUG.init_err_stack('PA_PROJECT_SUBTEAMS_PUB.Update_Subteam');
SAVEPOINT SBT_PUB_UPDATE_SUBTEAM;
PA_PROJECT_SUBTEAMS_PVT.Update_Subteam
(
p_api_version => p_api_version
,p_init_msg_list => p_init_msg_list
,p_commit => p_commit
,p_validate_only => p_validate_only
,p_validation_level => p_validation_level
,p_calling_module => p_calling_module
,p_debug_mode => p_debug_mode
,p_max_msg_count => p_max_msg_count
,p_subteam_row_id => l_subteam_row_id
,p_subteam_id => p_subteam_id
,p_subteam_name => p_subteam_name
,p_object_type => p_object_type
,p_object_id => l_object_id
,p_description => p_description
,p_record_version_number => p_record_version_number
,p_attribute_category => p_attribute_category
,p_attribute1 => p_attribute1
,p_attribute2 => p_attribute2
,p_attribute3 => p_attribute3
,p_attribute4 => p_attribute4
,p_attribute5 => p_attribute5
,p_attribute6 => p_attribute6
,p_attribute7 => p_attribute7
,p_attribute8 => p_attribute8
,p_attribute9 => p_attribute9
,p_attribute10 => p_attribute10
,p_attribute11 => p_attribute11
,p_attribute12 => p_attribute12
,p_attribute13 => p_attribute13
,p_attribute14 => p_attribute14
,p_attribute15 => p_attribute15
,x_return_status => x_return_status
,x_msg_count => x_msg_count
-- ,x_record_version_number => x_record_version_number
,x_msg_data => x_msg_data
);
SELECT record_version_number
into x_record_version_number
FROM pa_project_subteams
WHERE project_subteam_id = p_subteam_id;
ROLLBACK TO SBT_PUB_UPDATE_SUBTEAM;
FND_MSG_PUB.add_exc_msg ( p_pkg_name => 'PA_PROJECT_SUBTEAMS_PUB.Update_Subteam'
,p_procedure_name => PA_DEBUG.G_Err_Stack );
END Update_Subteam;
PROCEDURE Delete_Subteam
(
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_validation_level IN NUMBER := FND_API.g_valid_level_full,
p_calling_module IN VARCHAR2
:= 'SELF_SERVICE',
p_debug_mode IN VARCHAR2 := 'N',
p_max_msg_count IN NUMBER := FND_API.g_miss_num,
p_subteam_row_id IN ROWID := NULL,
p_subteam_id IN pa_project_subteams.project_subteam_id%TYPE := FND_API.G_MISS_NUM,
p_object_type IN pa_project_subteams.object_type%TYPE := fnd_api.g_miss_char,
p_object_id IN pa_project_subteams.object_id%TYPE := FND_API.g_miss_num,
p_subteam_name IN pa_project_subteams.name%TYPE := fnd_api.g_miss_char,
p_record_version_number IN NUMBER := FND_API.G_MISS_NUM ,
--Bug: 4537865
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
--Bug: 4537865
) IS
l_subteam_row_id ROWID;
SELECT ROWID
FROM pa_project_subteams
WHERE (project_subteam_id = p_subteam_id AND p_subteam_id IS NOT NULL)
OR (name = p_subteam_name
AND p_subteam_name IS NOT NULL
AND object_type = p_object_type
AND object_id = p_object_id
AND p_object_id IS NOT null)
OR ROWID = p_subteam_row_id ;
PA_DEBUG.init_err_stack('PA_PROJECT_SUBTEAMS_PUB.Delete_Subteam');
SAVEPOINT SBT_PUB_DELETE_SUBTEAM;
PA_PROJECT_SUBTEAMS_PVT.Delete_Subteam
(
p_api_version => p_api_version
,p_init_msg_list => p_init_msg_list
,p_commit => p_commit
,p_validate_only => p_validate_only
,p_validation_level => p_validation_level
,p_calling_module => p_calling_module
,p_debug_mode => p_debug_mode
,p_max_msg_count => p_max_msg_count
,p_subteam_row_id => l_subteam_row_id
,p_subteam_id => p_subteam_id
,p_record_version_number => p_record_version_number
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
);
ROLLBACK TO SBT_PUB_DELETE_SUBTEAM;
FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_PROJECT_SUBTEAMS_PUB.Delete_Subteam'
,p_procedure_name => PA_DEBUG.G_Err_Stack );
END Delete_Subteam;
PROCEDURE Delete_Subteam_By_Obj
(
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_validation_level IN NUMBER := FND_API.g_valid_level_full,
p_calling_module IN VARCHAR2
:= 'SELF_SERVICE',
p_debug_mode IN VARCHAR2 := 'N',
p_max_msg_count IN NUMBER := FND_API.g_miss_num,
p_object_type IN pa_project_subteams.object_type%TYPE := fnd_api.g_miss_char,
p_object_id IN pa_project_subteams.object_id%TYPE := FND_API.g_miss_num,
--Bug: 4537865
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
--Bug: 4537865
) IS
l_subteam_row_id ROWID;
SELECT ROWID
FROM pa_project_subteams
WHERE
object_type = p_object_type
AND object_id = p_object_id ;
PA_DEBUG.init_err_stack('PA_PROJECT_SUBTEAMS_PUB.Delete_Subteam_By_Obj');
SAVEPOINT SBT_PUB_DELETE_SUBTEAM_BY_OBJ;
PA_PROJECT_SUBTEAMS_PVT.Delete_Subteam
(
p_api_version => p_api_version
,p_init_msg_list => p_init_msg_list
,p_commit => p_commit
,p_validate_only => p_validate_only
,p_validation_level => p_validation_level
,p_calling_module => p_calling_module
,p_debug_mode => p_debug_mode
,p_max_msg_count => p_max_msg_count
,p_subteam_row_id => l_subteam_row_id
--,p_subteam_id => p_subteam_id
--,p_record_version_number => p_record_version_number
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
);
ROLLBACK TO SBT_PUB_DELETE_SUBTEAM_BY_OBJ;
FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_PROJECT_SUBTEAMS_PUB.Delete_Subteam_By_Obj'
,p_procedure_name => PA_DEBUG.G_Err_Stack );
END Delete_Subteam_By_Obj;