Oracle EBS 复制用户职责

内容导读

互联网集市收集整理的这篇技术教程文章主要介绍了Oracle EBS 复制用户职责，小编现在分享给大家，供广大互联网技能从业者学习和参考。文章包含1653字，纯文字阅读大概需要3分钟。

内容图文

l_new_user_name VARCHAR2(100) := ‘HAND_HYL‘; l_new_password VARCHAR2(100) := ‘54321‘; l_new_user_id NUMBER; l_user_name_copy_from VARCHAR2(100) := ‘SYSADMIN‘; BEGIN -- Test statements here IF fnd_user_pkg.userExists(x_user_name => l_new_user_name) THEN NULL; ELSE fnd_user_pkg.CreateUser(x_user_name => l_new_user_name, x_unencrypted_password => l_new_password, x_owner => NULL); END IF; SELECT user_id INTO l_new_user_id FROM fnd_user fu WHERE fu.user_name = l_new_user_name; FOR rec IN (SELECT d.RESPONSIBILITY_ID ,d.RESPONSIBILITY_APPLICATION_ID ,d.START_DATE ,d.END_DATE FROM fnd_user_resp_groups_direct d ,fnd_user u WHERE d.user_id = u.user_id AND u.user_name = l_user_name_copy_from AND SYSDATE BETWEEN nvl(d.START_DATE, SYSDATE - 1) AND nvl(d.END_DATE, SYSDATE + 1)) LOOP IF fnd_user_resp_groups_api.Assignment_Exists(user_id => l_new_user_id, responsibility_id => rec.responsibility_id, responsibility_application_id => rec.responsibility_application_id) THEN NULL; ELSE fnd_user_resp_groups_api.Insert_Assignment(user_id => l_new_user_id, responsibility_id => rec.responsibility_id, responsibility_application_id => rec.responsibility_application_id, start_date => rec.START_DATE, end_date => rec.END_DATE, description => NULL); END IF; END LOOP; END;

 

Oracle EBS 复制用户职责

标签：into   null   dmi   style   rect   dir   creat   varchar2   nbsp   

本文系统来源：https://www.cnblogs.com/jenrry/p/10006823.html

内容总结

以上是互联网集市为您收集整理的Oracle EBS 复制用户职责全部内容，希望文章能够帮你解决Oracle EBS 复制用户职责所遇到的程序开发问题。 如果觉得互联网集市技术教程内容还不错，欢迎将互联网集市网站推荐给程序员好友。

内容备注

版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 gblab@vip.qq.com 举报，一经查实，本站将立刻删除。

内容手机端

---