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 ...

随机推荐

An Introduction to Greta
I was surprised by greta. I had assumed that the tensorflow and reticulate packages would eventually ...
java课程设计-坦克大战
团队课程设计博客链接个人负责模块枚举类.工具类.子弹类.图片素材的查找,地图制作 Git管理包名类名的命名详细说明枚举类如单人和双人模式工具类将每个图片的路径使用字符串保存,便于调用 ...
蓝桥杯生命之树【树状dp】
生命之树在X森林里,上帝创建了生命之树. 他给每棵树的每个节点(叶子也称为一个节点)上, 都标了一个整数,代表这个点的和谐值. 上帝要在这棵树内选出一个非空节点集S, 使得对于S中的任意两个点a,b ...
Java 迭代器 Iterator
迭代器模式迭代器模式(Iterator Pattern)是 Java 和 .Net 编程环境中非常常用的设计模式.这种模式用于顺序访问集合对象的元素,不需要知道集合对象的底层表示. 迭代器模式属于行 ...
[转][C#]压缩解压缩类 GZipStream
本文来自:https://msdn.microsoft.com/zh-cn/library/system.io.compression.gzipstream(v=vs.100).aspx using ...
Hibernate中get()和load()的区别
Hibernate中根据Id单条查询获取对象的方式有两种,分别是get()和load(),来看一下这两种方式的区别. 1. get() 使用get()来根据ID进行单条查询: User user=se ...
《Linux内核精髓：精通Linux内核必会的75个绝技》一HACK #12　使用Memory Cgroup限制内存使用量
HACK #12 使用Memory Cgroup限制内存使用量 Memory Cgroup是Cgroup的资源限制功能之一,可以控制特定进程可以使用的内存量.Memory CgroupMemory C ...
使用Javamail发送邮件Util
maven: <dependency> <groupId>javax.mail</groupId> <artifactId>mail</artif ...
leetcode922
public class Solution { public int[] SortArrayByParityII(int[] A) { var len = A.Length; ];//奇数1,3,5, ...
MVC各层的职责
Model(模型):模型代表着核心的业务逻辑和数据(不要理解成Model只是实体类) View(视图):视图应该关注与如何展示数据,而不应该包含任何业务逻辑(业务逻辑应写在Model中) Contro ...

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.的更多相关文章

随机推荐

热门专题