The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE INSERT_ROW(p_project_id IN NUMBER,
p_template_flag IN VARCHAR2,
p_project_name IN VARCHAR2,
p_project_number IN VARCHAR2,
p_project_long_name IN VARCHAR2 default null,
p_project_description IN VARCHAR2 default null,
x_return_status OUT NOCOPY VARCHAR2) --File.Sql.39 bug 4440895
IS
l_project_long_name PA_PROJECTS_ALL.long_name%TYPE;
SELECT 'Y' into l_exists
FROM PA_PROJECT_CTX_SEARCH
WHERE project_id = p_project_id;
PA_PROJECT_CTX_SEARCH_PKG.INSERT_ROW
(p_project_id => p_project_id,
p_ctx_description => l_ctx_description,
x_return_status => x_return_status);
, p_procedure_name => 'INSERT_ROW'
, p_error_text => SUBSTRB(SQLERRM,1,240));
END INSERT_ROW;
PROCEDURE UPDATE_ROW(p_project_id IN NUMBER,
p_template_flag IN VARCHAR2,
p_project_name IN VARCHAR2,
p_project_number IN VARCHAR2,
p_project_long_name IN VARCHAR2 default null,
p_project_description IN VARCHAR2 default null,
x_return_status OUT NOCOPY VARCHAR2) --File.Sql.39 bug 4440895
IS
l_project_long_name PA_PROJECTS_ALL.long_name%TYPE;
SELECT 'Y',ctx_description INTO l_exists,l_old_ctx_description
FROM PA_PROJECT_CTX_SEARCH
WHERE project_id = p_project_id;
INSERT_ROW(p_project_id => p_project_id,
p_template_flag => p_template_flag,
p_project_name => p_project_name,
p_project_number => p_project_number,
p_project_long_name => p_project_long_name,
p_project_description => p_project_description,
x_return_status => x_return_status);
PA_PROJECT_CTX_SEARCH_PKG.UPDATE_ROW
(p_project_id => p_project_id,
p_ctx_description => l_ctx_description,
x_return_status => x_return_status);
, p_procedure_name => 'UPDATE_ROW'
, p_error_text => SUBSTRB(SQLERRM,1,240));
END UPDATE_ROW;
PROCEDURE DELETE_ROW(p_project_id IN VARCHAR2,
p_template_flag IN VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2) --File.Sql.39 bug 4440895
IS
BEGIN
x_return_status := FND_API.G_RET_STS_SUCCESS;
PA_PROJECT_CTX_SEARCH_PKG.DELETE_ROW
(p_project_id => p_project_id,
x_return_status => x_return_status);
, p_procedure_name => 'DELETE_ROW'
, p_error_text => SUBSTRB(SQLERRM,1,240));
END DELETE_ROW;