Dazu können Sie eine einfache Prozedur schreiben:
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;
Ich bin mir nicht sicher, was Sie sonst noch verlangen. Sie können das Obige ändern, um zusätzliche Berechtigungen und/oder Objekttypen für die Berechtigungen hinzuzufügen, die Sie dem Zielbenutzer bereitstellen möchten. Wie @stili andeutet, können Sie mit Rollen eine Menge machen, aber seien Sie vorsichtig - einige Berechtigungen funktionieren nicht, wenn sie über Rollen erteilt werden.