Oracle中将一个用户的所有对象授权给另一个用户

1. --首先是CPR账号
   
2.     --授权表上的读写权限
   
3.     select 'grant all on '||owner||'.'||table_name||' to hisuser;' from dba_tables
   
4.     where owner = 'CPR';
   
5.     
   
6.     --授权视图上的读写权限
   
7.     select 'grant all on '||owner||'.'||view_name||' to hisuser;' from dba_views
   
8.     where owner = 'CPR';
   
9. 
   
10.     --授权函数和存储过程的读写权限
    
11.     select 'grant execute on '||owner||'.'||name||' to hisuser;' from dba_source
    
12.     where owner = 'CPR' and type in ('PROCEDURE'