Oracle EBS Add Responsibility to User by the Responsibility reference of Other User.

Oracle EBS 11i Add Responsibility to User by the Responsibility reference of Other User.

Warning: R12 version must be fixed columns sort to insert successfully.

DECLARE

--input parameters

l_reference_user_name VARCHAR2 (50) := 'HKIT_KPWONG';

l_add_resp_user_name VARCHAR2 (50) := 'SZIT_QWR';

l_resp_name VARCHAR2 (300) := 'Application Developer';

-----------------------------------------------------------

l_user_orig_system_id NUMBER := -999999;

l_role_name VARCHAR2 (300) := NULL;

l_add_resp_user_exists NUMBER := 0;

l_insert_role_record NUMBER := 0;

l_insert_role_assign_record NUMBER := 0;

BEGIN

--get responsibility role name

SELECT COUNT (1)

INTO l_add_resp_user_exists

FROM (SELECT u.user_id user_id

, (SELECT responsibility_name

FROM fnd_responsibility_tl

WHERE responsibility_id = wur.role_orig_system_id

AND application_id = fa.application_id

AND language = 'US')

app_responsibility_name

, wur.role_name

, wur.user_orig_system_id

, wur.role_orig_system_id responsibility_id

, fa.application_id responsibility_application_id

, fsg.security_group_id security_group_id

, fnd_date.canonical_to_date ('1000/01/01') start_date

, TO_DATE (NULL) end_date

, TO_CHAR (NULL) description

, TO_NUMBER (NULL) created_by

, TO_DATE (NULL) creation_date

, TO_NUMBER (NULL) last_updated_by

, TO_DATE (NULL) last_update_date

, TO_NUMBER (NULL) last_update_login

FROM fnd_user u

, wf_user_role_assignments_v wura

, wf_user_roles wur

, fnd_application fa

, fnd_security_groups fsg

WHERE wura.user_name = u.user_name

AND wur.role_orig_system = 'FND_RESP'

AND wur.partition_id = 2

AND wura.role_name = wur.role_name

AND wura.user_name = wur.user_name

AND fa.application_short_name = /* Val between 1 st and 2 nd separator */

REPLACE (SUBSTR (wura.role_name

, INSTR (wura.role_name

, '|'

, 1

, 1)

+ 1

, ( INSTR (wura.role_name

, '|'

, 1

, 2)

- INSTR (wura.role_name

, '|'

, 1

, 1)

- 1))

, '%col'

, ':')

AND fsg.security_group_key = /* Val after 3 rd separator */

REPLACE (SUBSTR (wura.role_name

, INSTR (wura.role_name

, '|'

, 1

, 3)

+ 1)

, '%col'

, ':')

AND u.user_name = l_add_resp_user_name) resp

WHERE 1 = 1 AND resp.app_responsibility_name = l_resp_name;

IF (l_add_resp_user_exists > 0)

THEN

DBMS_OUTPUT.put_line (

'Failed !!! Add Responsebility Name: '

|| l_resp_name

|| ' to User: '

|| l_add_resp_user_name

|| ' by reference User: '

|| l_reference_user_name);

DBMS_OUTPUT.put_line (

'The Responsibility exists at Added User: ' || l_add_resp_user_name);

RETURN;

END IF;

--get responsibility role name

SELECT resp.role_name

INTO l_role_name

FROM (SELECT u.user_id user_id

, (SELECT responsibility_name

FROM fnd_responsibility_tl

WHERE responsibility_id = wur.role_orig_system_id

AND application_id = fa.application_id

AND language = 'US')

app_responsibility_name

, wur.role_name

, wur.user_orig_system_id

, wur.role_orig_system_id responsibility_id

, fa.application_id responsibility_application_id

, fsg.security_group_id security_group_id

, fnd_date.canonical_to_date ('1000/01/01') start_date

, TO_DATE (NULL) end_date

, TO_CHAR (NULL) description

, TO_NUMBER (NULL) created_by

, TO_DATE (NULL) creation_date

, TO_NUMBER (NULL) last_updated_by

, TO_DATE (NULL) last_update_date

, TO_NUMBER (NULL) last_update_login

FROM fnd_user u

, wf_user_role_assignments_v wura

, wf_user_roles wur

, fnd_application fa

, fnd_security_groups fsg

WHERE wura.user_name = u.user_name

AND wur.role_orig_system = 'FND_RESP'

AND wur.partition_id = 2

AND wura.role_name = wur.role_name

AND wura.user_name = wur.user_name

AND fa.application_short_name = /* Val between 1 st and 2 nd separator */

REPLACE (SUBSTR (wura.role_name

, INSTR (wura.role_name

, '|'

, 1

, 1)

+ 1

, ( INSTR (wura.role_name

, '|'

, 1

, 2)

- INSTR (wura.role_name

, '|'

, 1

, 1)

- 1))

, '%col'

, ':')

AND fsg.security_group_key = /* Val after 3 rd separator */

REPLACE (SUBSTR (wura.role_name

, INSTR (wura.role_name

, '|'

, 1

, 3)

+ 1)

, '%col'

, ':')

AND u.user_name = l_reference_user_name) resp

WHERE 1 = 1 AND resp.app_responsibility_name = l_resp_name;

IF (l_role_name IS NULL)

THEN

DBMS_OUTPUT.put_line (

'Failed !!! Add Responsebility Name: '

|| l_resp_name

|| ' to User: '

|| l_add_resp_user_name

|| ' by reference User: '

|| l_reference_user_name);

DBMS_OUTPUT.put_line (

'The reference User have not the Responsibility: '

|| l_resp_name

|| '. Please input correct data!');

RETURN;

END IF;

--get user orig system id

SELECT DISTINCT wur.user_orig_system_id

INTO l_user_orig_system_id

FROM wf_user_roles wur

WHERE 1 = 1 AND wur.user_name = l_add_resp_user_name;

IF (l_user_orig_system_id = -999999)

THEN

DBMS_OUTPUT.put_line (

'Failed !!! Add Responsebility Name: '

|| l_resp_name

|| ' to User: '

|| l_add_resp_user_name

|| ' by reference User: '

|| l_reference_user_name);

DBMS_OUTPUT.put_line ('No found User Orig System ID.');

RETURN;

END IF;

INSERT INTO wf_local_user_roles

SELECT l_add_resp_user_name

, wur.role_name

, wur.user_orig_system

, l_user_orig_system_id

, wur.role_orig_system

, wur.role_orig_system_id

, wur.start_date

, wur.expiration_date

, wur.security_group_id

, wur.partition_id

, wur.owner_tag

, wur.created_by

, wur.creation_date

, wur.last_updated_by

, wur.last_update_date

, wur.last_update_login

, wur.assignment_type

, wur.parent_orig_system

, wur.parent_orig_system_id

, wur.user_start_date

, wur.role_start_date

, wur.user_end_date

, wur.role_end_date

, wur.effective_start_date

, wur.effective_end_date

, wur.assignment_reason

FROM wf_local_user_roles wur

WHERE 1 = 1

AND wur.user_name = l_reference_user_name

AND wur.role_name = l_role_name;

l_insert_role_record := SQL%ROWCOUNT;

IF (l_insert_role_record = 0)

THEN

DBMS_OUTPUT.put_line (

'Failed !!! Add Responsebility Name: '

|| l_resp_name

|| ' to User: '

|| l_add_resp_user_name

|| ' by reference User: '

|| l_reference_user_name);

DBMS_OUTPUT.put_line ('No data into Role table.');

RETURN;

END IF;

INSERT INTO wf_user_role_assignments

SELECT l_add_resp_user_name

, wura.role_name

, wura.relationship_id

, wura.assigning_role

, wura.start_date

, wura.end_date

, wura.created_by

, wura.creation_date

, wura.last_updated_by

, wura.last_update_date

, wura.last_update_login

, wura.user_start_date

, wura.role_start_date

, wura.assigning_role_start_date

, wura.user_end_date

, wura.role_end_date

, wura.assigning_role_end_date

, wura.partition_id

, wura.effective_start_date

, wura.effective_end_date

, wura.user_orig_system

, l_user_orig_system_id

, wura.role_orig_system

, wura.role_orig_system_id

, wura.parent_orig_system

, wura.parent_orig_system_id

, wura.owner_tag

, wura.assignment_reason

FROM wf_user_role_assignments wura

WHERE 1 = 1

AND wura.user_name = l_reference_user_name

AND wura.role_name = l_role_name;

l_insert_role_assign_record := SQL%ROWCOUNT;

IF (l_insert_role_record <> l_insert_role_assign_record)

THEN

DBMS_OUTPUT.put_line (

'Failed !!! Add Responsebility Name: '

|| l_resp_name

|| ' to User: '

|| l_add_resp_user_name

|| ' by reference User: '

|| l_reference_user_name);

ROLLBACK;

COMMIT;

END IF;

DBMS_OUTPUT.put_line (

'Successfully !!! Add Responsebility Name: '

|| l_resp_name

|| ' to User: '

|| l_add_resp_user_name

|| ' by reference User: '

|| l_reference_user_name);

COMMIT;

END;

http://www.cnblogs.com/quanweiru/archive/2013/05/21/3090818.html

Oracle EBS Add Responsibility to User by the Responsibility reference of Other User.的更多相关文章

Oracle EBS Standard Package Function Add User & Resp
Oracle EBS Standard Package Function Add User & Resp. fnd_user_pkg.CreateUser; fnd_user_pkg.AddR ...
Oracle EBS R12经验谈（二）
作者: jianping.ni 时间: 2009-2-13 12:52 标题: Oracle EBS R12经验谈(二) OAF页面:银行帐户开户人LOV值列表无值在输入应付超 ...
Oracle EBS应用笔记整理 (转自IT++ flyingkite）
***************************************************** Author: Flyingkite Blog: http://space.itpub. ...
Oracle EBS R12 (12.1.3) Installation Linux(64 bit)
Oracle EBS R12 (12.1.3) Installation Linux(64 bit) Contents Objective. 3 1 Download & Unzip. 3 D ...
[转]oracle EBS 基础100问
from:http://www.cnblogs.com/xiaoL/p/3593691.html http://f.dataguru.cn/thread-51057-1-1.html 1001 OR ...
Oracle EBS Concurrent Request:Gather Schema Statistics[Z]
Oracle EBS 的Concurrent Request"Gather Schema Statistics"是一个和性能相关的Concurrent Program,它会对表,列 ...
Oracle EBS R12多组织（多OU）访问架构
Oracle EBS R12多组织访问架构多组织架构实现了经营单位(OU)的数据安全性,在底层数据表中有一列ORG_ID来记录数据所属的经营单一,所有多OU的基表都是以"_ALL" ...
Using Integrated SOA Gateway in Oracle EBS
FROM:http://blog.csdn.net/pan_tian/article/details/10159935 Oracle EBS如何与第三方系统相集成?比如这样的需求,X系统知道物料编码, ...
Oracle EBS 12.2.6 on VirtualBox
Back in May, Oracle announced the general availability of Oracle VM Virtual Appliance for E-Business ...

随机推荐

selenium phantomjs java无界面浏览器环境搭建
java selenium搭建无界面浏览器 1.http://phantomjs.org/ 下载windows版phantomjs 2.解压后bin目录下会有exe文件 3.测试代码: package ...
python打造文件包含漏洞检测工具
0x00前言: 做Hack the box的题.感觉那个平台得开个VIp 不然得凉.一天只能重置一次...mmp 做的那题毒药是文件包含漏洞的题,涉及到了某个工具看的不错就开发了一个. 0x01代码 ...
django-auth组件的权限管理
一:自定义权限验证 1.在model中的Meta类自定义权限码 class WorkUser(models.Model): username = models.CharField(u'用户名', ma ...
Spring cloud 分布式锁
https://github.com/easonstudy/springboot_demo study目录中
Oracle安装盘空间不足，对.DBF文件进行迁移
一. select * from dba_data_files 使用该条语句可以查看当前库中有多少表空间并且DBF文件的存储位置二. 找到对应的dbf文件,将该文件复制到你需要移动的位置三. 开始 ...
Cardboard Talk01 HeadTracker
操作系统:Windows8.1 显卡:Nivida GTX965M 开发工具:Android studio 3.0.0 | Cardboard 1.0 使用 Google 的 Cardboard开发V ...
cudnn 安装
ubuntu 下载地址 https://developer.nvidia.com/rdp/cudnn-download 安装教程 http://docs.nvidia.com/deeplearning ...
PowerDesigner如何导出建表sql脚本(转)
1 按照数据库类型,切换数据库. Database-> Change Current DBMS... 2 生成sql脚本 Database -> Database Generation 的 ...
使用jpcap获取网卡硬件
ArcEngine调用GP里的Merge工具传参问题
Merge工具inputs参数形式与Python中不同: string startLayerPath= cpj.TempWs.PathName + @"\" + datasetNa ...

Oracle EBS Add Responsibility to User by the Responsibility reference of Other User.

Oracle EBS Add Responsibility to User by the Responsibility reference of Other User.的更多相关文章

随机推荐

热门专题