SQL過程刪除系統權限

Question

我試圖創建一個程序，將刪除某個用戶的系統權限。當我編譯我的代碼，我得到「編譯錯誤」

create or replace procedure deactivate_user 
(
p_username in varchar2 
) 
as 
l_username varchar2(30):=upper(p_username); 
cnmd varchar2(50); 
begin 
    for rec (select privilege, admin_option from dba_sys_privs 
      where grantee = l_username) loop 
      cnmd := 'REVOKE '||rec.privilege||' from '||l_username; 
execute immediate cnmd; 
end loop; 
end; 
/

Answer 1

您在FOR語句中缺少IN;它應該是：

FOR rec IN (SELECT privilege, admin_option FROM dba_sys_privs 
      WHERE grantee = l_username) LOOP 

見http://docs.oracle.com/cd/E11882_01/appdev.112/e17126/static.htm#CIHCGJAD