oracle把一个用户的权限赋给另一个用户

在plsql中的command window下输入ed，输入以下代码块的内容，然后点击OK，在输入"/"回车执行。

DECLARE 
      p_grantee       VARCHAR2   (30)   :=   'username'; 
BEGIN 
      FOR   rec   IN   (SELECT   object_name,   object_type 
                                        ,   DECODE   (object_type 
                                                        ,   'TABLE ',   'ALL ' 
                                                        ,   'VIEW ',   'SELECT ' 
                                                        ,   'EXECUTE ' 
                                                          )   grant_type 
                              FROM       user_objects) 
      LOOP 
            BEGIN 
                  EXECUTE   IMMEDIATE   'grant   all   on   '   ||   rec.object_name   ||   '   to   '   ||   p_grantee; 
            EXCEPTION 
                  WHEN   OTHERS 
                  THEN 
                        dbms_output.put_line   (SUBSTR   (SQLERRM,   1,   240)); 
            END; 
      END   LOOP; 
END;