|
|

楼主 |
发表于 2005/5/10 11:08:15
|
显示全部楼层
解决方法如下:declare
sqltext varchar2(400);
c integer;
begin
for userlist in (select user_id,username from all_users where username not in ('SYS','SYSTEM','APPLSYS','APPS'))
loop
for tablelist in (select owner,table_name from dba_tables where owner = userlist.username and table_name not like '%IOT_OVER%')
loop
sqltext := 'grant all on '||tablelist.owner||'.'||tablelist.table_name ||' to apps with grant option';
c := sys.dbms_sys_sql.open_cursor();
sys.dbms_sys_sql.parse_as_user( c,sqltext,dbms_sql.native,userlist.user_id);
sys.dbms_sys_sql.close_cursor(c);
end loop;
end loop;
end;
/
|
|