The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE INSERT_ROW (
P_ROWID IN OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
P_ROLE_CONTROL_CODE IN VARCHAR2,
P_PROJECT_ROLE_ID IN NUMBER,
P_LAST_UPDATE_DATE IN DATE,
P_LAST_UPDATED_BY IN NUMBER,
P_CREATION_DATE IN DATE,
P_CREATED_BY IN NUMBER,
P_LAST_UPDATE_LOGIN IN NUMBER,
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
BEGIN
-- Initialize the Error Stack
PA_DEBUG.init_err_stack('PA_ROLE_CONTROLS_PVT.Insert_Row');
PA_ROLE_CONTROLS_PKG.Insert_Row
(X_ROWID => P_ROWID,
X_ROLE_CONTROL_CODE => P_ROLE_CONTROL_CODE,
X_PROJECT_ROLE_ID => P_PROJECT_ROLE_ID,
X_LAST_UPDATE_DATE => P_LAST_UPDATE_DATE,
X_LAST_UPDATED_BY => P_LAST_UPDATED_BY,
X_CREATION_DATE => P_CREATION_DATE,
X_CREATED_BY => P_CREATED_BY,
X_LAST_UPDATE_LOGIN => P_LAST_UPDATE_LOGIN
);
END INSERT_ROW;
PROCEDURE UPDATE_ROW (
P_ROWID IN OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
P_ROLE_CONTROL_CODE IN VARCHAR2,
P_PROJECT_ROLE_ID IN NUMBER,
P_LAST_UPDATE_DATE IN DATE,
P_LAST_UPDATED_BY IN NUMBER,
P_CREATION_DATE IN DATE,
P_CREATED_BY IN NUMBER,
P_LAST_UPDATE_LOGIN IN NUMBER,
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
BEGIN
-- Initialize the Error Stack
PA_DEBUG.init_err_stack('PA_ROLE_CONTROLS_PVT.Update_Row');
PA_ROLE_CONTROLS_PKG.UPDATE_ROW
(X_ROWID => P_ROWID,
X_ROLE_CONTROL_CODE => P_ROLE_CONTROL_CODE,
X_PROJECT_ROLE_ID => P_PROJECT_ROLE_ID,
X_LAST_UPDATE_DATE => P_LAST_UPDATE_DATE,
X_LAST_UPDATED_BY => P_LAST_UPDATED_BY,
X_CREATION_DATE => P_CREATION_DATE,
X_CREATED_BY => P_CREATED_BY,
X_LAST_UPDATE_LOGIN => P_LAST_UPDATE_LOGIN
);
END UPDATE_ROW;
PROCEDURE DELETE_ROW (
P_ROWID IN VARCHAR2,
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_rowid ROWID;
PA_DEBUG.init_err_stack('PA_ROLE_CONTROLS_PVT.Delete_Row');
SELECT project_role_id, role_control_code
INTO l_project_role_id, l_role_control_code
FROM pa_role_controls
WHERE rowid = l_rowid;
PA_ROLE_CONTROLS_PKG.DELETE_ROW
( X_ROWID => P_ROWID
);
END Delete_Row;