80: PROCEDURE RESOURCE_EXTNS_ACC_CLEANUP (p_user_id IN NUMBER)
81: IS
82: Cursor c_res(b_user_id NUMBER) IS
83: SELECT resource_id
84: FROM ASG_USER
85: WHERE useR_id=b_user_id;
86:
87: Cursor c_delete(b_resource_id NUMBER) IS
88: SELECT user_id
128: FUNCTION PROFILE_VALUE(p_user_id IN NUMBER) RETURN NUMBER
129: IS
130: CURSOR c_get_resp_id IS
131: SELECT APP_ID, RESPONSIBILITY_ID
132: FROM ASG_USER
133: WHERE USER_ID=p_user_id;
134:
135: l_resp_id NUMBER;
136: l_app_id NUMBER;
154: FROM CSM_RS_RESOURCE_EXTNS_ACC ACC
155: WHERE user_id=p_user_id
156: AND resource_id <> p_resource_id
157: AND NOT EXISTS (SELECT 1
158: FROM ASG_USER AU,
159: ASG_USER_PUB_RESPS AUPR
160: WHERE AU.RESOURCE_ID=ACC.RESOURCE_ID
161: AND AU.user_name=AUPR.user_name
162: AND AUPR.pub_name='SERVICEP'
155: WHERE user_id=p_user_id
156: AND resource_id <> p_resource_id
157: AND NOT EXISTS (SELECT 1
158: FROM ASG_USER AU,
159: ASG_USER_PUB_RESPS AUPR
160: WHERE AU.RESOURCE_ID=ACC.RESOURCE_ID
161: AND AU.user_name=AUPR.user_name
162: AND AUPR.pub_name='SERVICEP'
163: AND AU.ENABLED='Y');
163: AND AU.ENABLED='Y');
164:
165: CURSOR c_insert_prof0(p_user_id NUMBER) IS
166: SELECT AU.resource_id
167: FROM ASG_USER AU,
168: ASG_USER_PUB_RESPS AUPR
169: WHERE AU.enabled='Y'
170: AND AU.user_name=AUPR.user_name
171: AND AUPR.pub_name='SERVICEP'
164:
165: CURSOR c_insert_prof0(p_user_id NUMBER) IS
166: SELECT AU.resource_id
167: FROM ASG_USER AU,
168: ASG_USER_PUB_RESPS AUPR
169: WHERE AU.enabled='Y'
170: AND AU.user_name=AUPR.user_name
171: AND AUPR.pub_name='SERVICEP'
172: AND AU.user_id <> p_user_id
275: PRAGMA AUTONOMOUS_TRANSACTION;
276:
277: CURSOR c_palm_users IS
278: SELECT USER_ID,RESOURCE_ID
279: FROM ASG_USER au,
280: ASG_USER_PUB_RESPS aupr
281: WHERE au.USER_NAME=aupr.USER_NAME
282: AND au.USER_ID=au.OWNER_ID
283: AND au.ENABLED='Y'
276:
277: CURSOR c_palm_users IS
278: SELECT USER_ID,RESOURCE_ID
279: FROM ASG_USER au,
280: ASG_USER_PUB_RESPS aupr
281: WHERE au.USER_NAME=aupr.USER_NAME
282: AND au.USER_ID=au.OWNER_ID
283: AND au.ENABLED='Y'
284: AND aupr.PUB_NAME='SERVICEP';
325: CURSOR c_grp_palm_members (p_resource_id jtf_rs_group_members.resource_id%TYPE) IS
326: SELECT DISTINCT au.user_id,
327: au.resource_id
328: FROM jtf_rs_group_members jtf_rs_grp,
329: ASG_user au,
330: ASG_USER_PUB_RESPS aupr
331: WHERE EXISTS (SELECT 1
332: FROM jtf_rs_group_members
333: WHERE group_id = jtf_rs_grp.group_id
326: SELECT DISTINCT au.user_id,
327: au.resource_id
328: FROM jtf_rs_group_members jtf_rs_grp,
329: ASG_user au,
330: ASG_USER_PUB_RESPS aupr
331: WHERE EXISTS (SELECT 1
332: FROM jtf_rs_group_members
333: WHERE group_id = jtf_rs_grp.group_id
334: AND resource_id = p_resource_id
341:
342:
343: CURSOR c_all_mfs_users(p_resource_id jtf_rs_group_members.resource_id%TYPE) IS
344: SELECT AU.user_id,AU.resource_id
345: FROM ASG_USER AU,
346: ASG_USER_PUB_RESPS aupr
347: WHERE AU.ENABLED='Y'
348: AND AU.resource_id<>p_resource_id
349: AND au.USER_NAME=aupr.USER_NAME
342:
343: CURSOR c_all_mfs_users(p_resource_id jtf_rs_group_members.resource_id%TYPE) IS
344: SELECT AU.user_id,AU.resource_id
345: FROM ASG_USER AU,
346: ASG_USER_PUB_RESPS aupr
347: WHERE AU.ENABLED='Y'
348: AND AU.resource_id<>p_resource_id
349: AND au.USER_NAME=aupr.USER_NAME
350: AND aupr.PUB_NAME='SERVICEP';
409: CURSOR l_group_members_csr(p_group_id IN number, p_resource_id IN number)
410: IS
411: SELECT au.resource_id, au.user_id
412: FROM jtf_rs_group_members grp,
413: asg_user au,
414: asg_user_pub_resps aupr
415: WHERE grp.group_id = p_group_id
416: AND grp.resource_id = au.resource_id
417: AND grp.delete_flag = 'N'
410: IS
411: SELECT au.resource_id, au.user_id
412: FROM jtf_rs_group_members grp,
413: asg_user au,
414: asg_user_pub_resps aupr
415: WHERE grp.group_id = p_group_id
416: AND grp.resource_id = au.resource_id
417: AND grp.delete_flag = 'N'
418: AND au.enabled='Y'
428:
429: CURSOR l_resource_csr(p_resource_id jtf_rs_resource_extns.resource_id%TYPE)
430: IS
431: SELECT au.user_id
432: FROM asg_user au,
433: asg_user_pub_resps aupr
434: WHERE au.resource_id = p_resource_id
435: AND au.USER_NAME=aupr.USER_NAME
436: AND aupr.PUB_NAME='SERVICEP'
429: CURSOR l_resource_csr(p_resource_id jtf_rs_resource_extns.resource_id%TYPE)
430: IS
431: SELECT au.user_id
432: FROM asg_user au,
433: asg_user_pub_resps aupr
434: WHERE au.resource_id = p_resource_id
435: AND au.USER_NAME=aupr.USER_NAME
436: AND aupr.PUB_NAME='SERVICEP'
437: AND au.enabled='Y';
489: CURSOR l_group_members_csr(p_group_id IN number, p_resource_id IN number)
490: IS
491: SELECT au.resource_id, au.user_id
492: FROM jtf_rs_group_members grp,
493: asg_user au,
494: asg_user_pub_resps aupr
495: WHERE grp.group_id = p_group_id
496: AND grp.resource_id = au.resource_id
497: AND grp.delete_flag = 'N'
490: IS
491: SELECT au.resource_id, au.user_id
492: FROM jtf_rs_group_members grp,
493: asg_user au,
494: asg_user_pub_resps aupr
495: WHERE grp.group_id = p_group_id
496: AND grp.resource_id = au.resource_id
497: AND grp.delete_flag = 'N'
498: AND au.enabled='Y'
508:
509: CURSOR l_resource_csr(p_resource_id jtf_rs_resource_extns.resource_id%TYPE)
510: IS
511: SELECT au.user_id
512: FROM asg_user au,
513: asg_user_pub_resps aupr
514: WHERE au.resource_id = p_resource_id
515: AND au.USER_NAME=aupr.USER_NAME
516: AND aupr.PUB_NAME='SERVICEP'
509: CURSOR l_resource_csr(p_resource_id jtf_rs_resource_extns.resource_id%TYPE)
510: IS
511: SELECT au.user_id
512: FROM asg_user au,
513: asg_user_pub_resps aupr
514: WHERE au.resource_id = p_resource_id
515: AND au.USER_NAME=aupr.USER_NAME
516: AND aupr.PUB_NAME='SERVICEP'
517: AND au.enabled='Y';