The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT USER#
INTO user_num
FROM SYS.USER$
WHERE TYPE# = 0
AND DEFROLE = 1
AND NAME = roleName;
SELECT COUNT(*)
INTO num
FROM SYS.OLAP$ALTER_SESSION
WHERE ROLE# = roleNum
AND TEXT = roleName;
INSERT INTO SYS.OLAP$ALTER_SESSION (ROLE#, TEXT) VALUES (role_num, alterStmt);
DBMS_OUTPUT.PUT_LINE('Row inserted');
PROCEDURE delete_alter_session (roleName VARCHAR2, sqlStmt VARCHAR2) IS
role_num INT;
DELETE FROM SYS.OLAP$ALTER_SESSION
WHERE ROLE# = role_num AND TEXT = alterStmt;
END delete_alter_session;
DELETE FROM olap$alter_session where role# NOT IN (
SELECT user# FROM SYS.USER$ WHERE TYPE# = 0 AND DEFROLE = 1);