The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Insert_Row(
p_role_privilege_record IN Role_Privilege_Type,
x_rowid OUT NOCOPY VARCHAR2,
x_role_privilege_id OUT NOCOPY NUMBER,
x_return_status OUT NOCOPY VARCHAR2) IS
CURSOR c_new_role_privilege_id IS
SELECT wsh_role_privileges_s.nextval FROM DUAL;
SELECT rowid FROM WSH_ROLE_PRIVILEGES WHERE role_privilege_id = x_role_privilege_id;
l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'INSERT_ROW';
INSERT INTO WSH_ROLE_PRIVILEGES (
ROLE_PRIVILEGE_ID,
ROLE_ID,
PRIVILEGE_CODE,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN
) VALUES (
l_role_privilege_id,
p_role_privilege_record.ROLE_ID,
p_role_privilege_record.PRIVILEGE_CODE,
p_role_privilege_record.CREATED_BY,
p_role_privilege_record.CREATION_DATE,
p_role_privilege_record.LAST_UPDATED_BY,
p_role_privilege_record.LAST_UPDATE_DATE,
p_role_privilege_record.LAST_UPDATE_LOGIN
);
wsh_util_core.default_handler('WSH_RU_ROLE_PRIVILEGES_PVT.INSERT_ROW',l_module_name);
END Insert_Row;
SELECT * FROM WSH_ROLE_PRIVILEGES
WHERE rowid = p_rowid
FOR UPDATE OF ROLE_PRIVILEGE_ID NOWAIT;
FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
WSH_DEBUG_SV.log(l_module_name,'FORM_RECORD_DELETED');
AND (l_db_rec.LAST_UPDATED_BY = p_role_privilege_record.LAST_UPDATED_BY)
AND (l_db_rec.LAST_UPDATE_DATE = p_role_privilege_record.LAST_UPDATE_DATE)
AND ((l_db_rec.LAST_UPDATE_LOGIN = p_role_privilege_record.LAST_UPDATE_LOGIN)
OR ( l_db_rec.LAST_UPDATE_LOGIN IS NULL
AND p_role_privilege_record.LAST_UPDATE_LOGIN IS NULL))
THEN
--
IF l_debug_on THEN
WSH_DEBUG_SV.pop(l_module_name,'Noting Changed');
PROCEDURE Update_Row(
p_rowid IN VARCHAR2,
p_role_privilege_record IN Role_Privilege_Type,
x_return_status OUT NOCOPY VARCHAR2) IS
--
l_debug_on BOOLEAN;
l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'UPDATE_ROW';
UPDATE WSH_ROLE_PRIVILEGES
SET
ROLE_ID = p_role_privilege_record.ROLE_ID,
PRIVILEGE_CODE = p_role_privilege_record.PRIVILEGE_CODE,
CREATED_BY = p_role_privilege_record.CREATED_BY,
CREATION_DATE = p_role_privilege_record.CREATION_DATE,
LAST_UPDATED_BY = p_role_privilege_record.LAST_UPDATED_BY,
LAST_UPDATE_DATE = p_role_privilege_record.LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN = p_role_privilege_record.LAST_UPDATE_LOGIN
WHERE rowid = p_rowid;
WSH_DEBUG_SV.log(l_module_name,'Rows Updated',SQL%ROWCOUNT);
wsh_util_core.default_handler('WSH_RU_ROLE_PRIVILEGES_PVT.UPDATE_ROW',l_module_name);
END Update_Row;
PROCEDURE Delete_Row(
p_rowid IN VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2) IS
--
l_debug_on BOOLEAN;
l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'DELETE_ROW';
DELETE FROM WSH_ROLE_PRIVILEGES
WHERE rowid = p_rowid;
WSH_DEBUG_SV.log(l_module_name,'Rows Deleted',SQL%ROWCOUNT);
wsh_util_core.default_handler('WSH_RU_ROLE_PRIVILEGES_PVT.DELETE_ROW',l_module_name);
END Delete_Row;
PROCEDURE Delete_Role_Privileges(p_role_id in NUMBER,
x_return_status OUT NOCOPY VARCHAR2)
IS
l_debug_on BOOLEAN;
l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'DELETE_ROLE';
DELETE FROM WSH_ROLE_PRIVILEGES
WHERE role_id = p_role_id
AND privilege_code
IN('TRIP_VIEW','TRIP_EDIT',
'STOP_VIEW','STOP_EDIT',
'DLVY_VIEW','DLVY_EDIT',
'DLVB_VIEW','DLVB_EDIT',
'GENR_VIEW','GENR_EDIT'); -- Added AND condition for R12
WSH_DEBUG_SV.log(l_module_name,'Rows Deleted',SQL%ROWCOUNT);
wsh_util_core.default_handler('WSH_RU_ROLE_PRIVILEGES_PVT.DELETE_ROLR',l_module_name);
END Delete_Role_Privileges;