壹佰网|ERP100 - 企业信息化知识门户

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 2702|回复: 3

问如何批量复制用户职责?

[复制链接]
发表于 2007/7/22 22:57:23 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。如果您注册时有任何问题请联系客服QQ: 83569622  。

您需要 登录 才可以下载或查看,没有帐号?注册

x
已经建立了第一个用户,并赋予若干个职责,现需建立另一个或多个用户,每个用户都复制第一个用户的职责。目前我不知道如何将地一个用户的职责批量复制给后面的用户,只能一个一个手工输入,非常麻烦。ORALCE EBS有批量复制用户职责的工具吗?
发表于 2007/7/22 23:05:27 | 显示全部楼层
似乎没有。或者你做一个模板,用dataload导吧。
发表于 2007/7/25 18:00:42 | 显示全部楼层
可以写一段小程序。用API: FND_USER_PKG.

可以参考下列代码:
--create a new user with system admin access
DECLARE
v_session_id INTEGER := USERENV( 'sessionid' );
v_user_name VARCHAR2( 30 ) := UPPER( '&Enter_User_Name' );
BEGIN
--Note, can be executed only when you have apps password.
-- Call the procedure to Creaet FND User
fnd_user_pkg.createuser
( x_user_name => v_user_name,
x_owner => '',
x_unencrypted_password => '123456',
x_session_number => v_session_id,
x_start_date => SYSDATE - 10,
x_end_date => SYSDATE + 100,
x_last_logon_date => SYSDATE - 10,
x_description => 'test',
x_password_date => SYSDATE - 10,
x_password_accesses_left => 10000,
x_password_lifespan_accesses => 10000,
x_password_lifespan_days => 10000
--,x_employee_id => 649
/*Change this id by running below SQL*/
/*
        SELECT person_id
        ,full_name
        FROM per_all_people_f
        WHERE upper(full_name) LIKE '%' || upper('full_name') || '%'
        GROUP BY person_id
        ,full_name
*/
, x_email_address => '',
x_fax => '',
x_customer_id => '',
x_supplier_id => '' );

fnd_user_pkg.addresp( username => v_user_name,
resp_app => 'SYSADMIN',
resp_key => 'SYSTEM_ADMINISTRATOR',
security_group => 'STANDARD',
/*
SELECT fa.application_short_name resp_app,fa.basepath,fa.*
FROM apps.fnd_application fa
WHERE application_short_name = 'SYSADMIN';
SELECT r.responsibility_key resp_key, r.responsibility_id,
r.request_group_id
FROM apps.fnd_responsibility r
WHERE r.responsibility_key = 'SYSTEM_ADMINISTRATOR';
SELECT fsg.security_group_id secid, fsg.*
FROM fnd_security_groups fsg;
*/
description => 'Auto Assignment',
start_date => SYSDATE - 10,
end_date => SYSDATE + 1000 );
commit;
END;

评分

参与人数 1壹佰币 +1 收起 理由
Terence + 1 谢谢分享(^_^)

查看全部评分

发表于 2007/7/25 19:08:17 | 显示全部楼层
谢谢 楼上的
我前段时间也一直思考的问题
谢谢
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|Archiver|小黑屋|手机版|壹佰网 ERP100 ( 京ICP备19053597号-2 )

Copyright © 2005-2012 北京海之大网络技术有限责任公司 服务器托管由互联互通
手机:13911575376
网站技术点击发送消息给对方83569622   广告&合作 点击发送消息给对方27675401   点击发送消息给对方634043306   咨询及人才点击发送消息给对方138011526

GMT+8, 2025/11/30 17:36 , Processed in 0.011895 second(s), 15 queries , File On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表