Vous pouvez écrire une procédure simple pour ce faire :
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;
Je ne sais pas exactement ce que vous demandez d'autre. Vous pouvez modifier ce qui précède pour ajouter des autorisations supplémentaires et/ou des types d'objets pour les privilèges que vous souhaitez fournir à l'utilisateur cible. Comme @stili l'implique, vous pouvez faire beaucoup avec les rôles, mais soyez prudent :certaines autorisations ne fonctionnent pas lorsqu'elles sont accordées via des rôles.
