Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- SELECT DISTINCT 'GRANT DELETE ON ' || O.TABLE || ' TO ' || K.NAME || ';'
- FROM UINGR K, GROUPRIGHTS O
- WHERE K.GR_ID=O.GR_ID AND O.RIGHTS LIKE '%D%' AND
- K.ALATES_KP<=SYSDATE AND (K.KUNI_KP IS NULL OR K.KUNI_KP>=SYSDATE) AND
- O.ALATES_KP<=SYSDATE AND (O.KUNI_KP IS NULL OR O.KUNI_KP>=SYSDATE)
- UNION
- SELECT DISTINCT 'GRANT UPDATE ON ' || O.TABLE || ' TO ' || K.NAME || ';'
- FROM UINGR K, GROUPRIGHTS O
- WHERE K.GR_ID=O.GR_ID AND O.RIGHTS LIKE '%U%' AND
- K.ALATES_KP<=SYSDATE AND (K.KUNI_KP IS NULL OR K.KUNI_KP>=SYSDATE) AND
- O.ALATES_KP<=SYSDATE AND (O.KUNI_KP IS NULL OR O.KUNI_KP>=SYSDATE)
- UNION
- SELECT DISTINCT 'GRANT INSERT ON ' || O.TABLE || ' TO ' || K.NAME || ';'
- FROM UINGR K, GROUPRIGHTS O
- WHERE K.GR_ID=O.GR_ID AND O.RIGHTS LIKE '%I%' AND
- K.ALATES_KP<=SYSDATE AND (K.KUNI_KP IS NULL OR K.KUNI_KP>=SYSDATE) AND
- O.ALATES_KP<=SYSDATE AND (O.KUNI_KP IS NULL OR O.KUNI_KP>=SYSDATE)
- UNION
- SELECT DISTINCT 'GRANT SELECT ON ' || O.TABLE || ' TO ' || K.NAME || ';'
- FROM UINGR K, GROUPRIGHTS O
- WHERE K.GR_ID=O.GR_ID AND O.RIGHTS LIKE '%S%' AND
- K.ALATES_KP<=SYSDATE AND (K.KUNI_KP IS NULL OR K.KUNI_KP>=SYSDATE) AND
- O.ALATES_KP<=SYSDATE AND (O.KUNI_KP IS NULL OR O.KUNI_KP>=SYSDATE)
- UNION
- SELECT DISTINCT 'REVOKE DELETE ON ' || O.NAME || ' FROM ' || K.NAME || ';'
- FROM SYSUSERAUTH K, SYSTABLES O
- WHERE O.NAME NOT LIKE 'SYS%' AND K.NAME NOT LIKE'SYS%' AND
- NOT EXISTS (SELECT 1 FROM GROUPRIGHTS X, UINGR Y
- WHERE X.RIGHTS LIKE '%D%' AND X.GR_ID=Y.GR_ID AND X.TABLE=O.NAME AND Y.NAME=K.NAME AND
- X.ALATES_KP<=SYSDATE AND (X.KUNI_KP IS NULL OR X.KUNI_KP>=SYSDATE))
- UNION
- SELECT DISTINCT 'REVOKE SELECT ON ' || O.NAME || ' FROM ' || K.NAME || ';'
- FROM SYSUSERAUTH K, SYSTABLES O
- WHERE O.NAME NOT LIKE 'SYS%' AND K.NAME NOT LIKE'SYS%' AND
- NOT EXISTS (SELECT 1 FROM GROUPRIGHTS X, UINGR Y
- WHERE X.RIGHTS LIKE '%S%' AND X.GR_ID=Y.GR_ID AND X.TABLE=O.NAME AND Y.NAME=K.NAME AND
- X.ALATES_KP<=SYSDATE AND (X.KUNI_KP IS NULL OR X.KUNI_KP>=SYSDATE))
- UNION
- SELECT DISTINCT 'REVOKE INSERT ON ' || O.NAME || ' FROM ' || K.NAME || ';'
- FROM SYSUSERAUTH K, SYSTABLES O
- WHERE O.NAME NOT LIKE 'SYS%' AND K.NAME NOT LIKE'SYS%' AND
- NOT EXISTS (SELECT 1 FROM GROUPRIGHTS X, UINGR Y
- WHERE X.RIGHTS LIKE '%I%' AND X.GR_ID=Y.GR_ID AND X.TABLE=O.NAME AND Y.NAME=K.NAME AND
- X.ALATES_KP<=SYSDATE AND (X.KUNI_KP IS NULL OR X.KUNI_KP>=SYSDATE))
- UNION
- SELECT DISTINCT 'REVOKE UPDATE ON ' || O.NAME || ' FROM ' || K.NAME || ';'
- FROM SYSUSERAUTH K, SYSTABLES O
- WHERE O.NAME NOT LIKE 'SYS%' AND K.NAME NOT LIKE'SYS%' AND
- NOT EXISTS (SELECT 1 FROM GROUPRIGHTS X, UINGR Y
- WHERE X.RIGHTS LIKE '%U%' AND X.GR_ID=Y.GR_ID AND X.TABLE=O.NAME AND Y.NAME=K.NAME AND
- X.ALATES_KP<=SYSDATE AND (X.KUNI_KP IS NULL OR X.KUNI_KP>=SYSDATE));
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement