Bạn có thể viết một thủ tục đơn giản để thực hiện việc này:
BEGIN
FOR Rec IN (SELECT object_name, object_type FROM all_objects WHERE owner='SOURCEUSER' AND object_type IN ('TABLE','VIEW','PROCEDURE','FUNCTION','PACKAGE')) LOOP
IF Rec.object_type IN ('TABLE','VIEW') THEN
EXECUTE IMMEDIATE 'GRANT SELECT, UPDATE, INSERT, DELETE ON SOURCEUSER.'||Rec.object_name||' TO TARGETUSER';
ELSIF Rec.object_type IN ('PROCEDURE','FUNCTION','PACKAGE') THEN
EXECUTE IMMEDIATE 'GRANT EXECUTE ON SOURCEUSER.'||Rec.object_name||' TO TARGETUSER';
END IF;
END LOOP;
END;
Không chắc chắn chính xác những gì khác bạn đang yêu cầu. Bạn có thể sửa đổi ở trên để thêm các khoản trợ cấp bổ sung và / hoặc object_types cho các đặc quyền bạn muốn cung cấp cho người dùng mục tiêu. Như @stili ngụ ý, bạn có thể làm được nhiều việc với các vai trò, nhưng hãy cẩn thận - một số quyền không hoạt động khi được cấp qua các vai trò.
