[Home] [Help]
547: hr_utility.set_location(l_proc, 40);
548: end if;
549: --
550: l_from_str := ' from per_security_profiles sec,
551: per_organization_list org ';
552: --
553: -- Modified for bug 11737636
554: l_cond_str := ' org.security_profile_id = sec.security_profile_id
555: and org.organization_id = :l_organization_id
838: end if;
839: --
840: l_from_str := ' from per_security_profiles sec,
841: pay_payroll_list pay,
842: per_organization_list org ';
843: --
844: l_cond_str := ' org.security_profile_id = sec.security_profile_id
845: and pay.security_profile_id = sec.security_profile_id
846: and pay.security_profile_id = org.security_profile_id
936: hr_utility.set_location(l_proc, 160);
937: end if;
938: --
939: l_from_str := ' from per_security_profiles sec,
940: per_organization_list org ';
941: --
942: l_cond_str := ' org.security_profile_id = sec.security_profile_id
943: and org.organization_id = :l_organization_id
944: and sec.view_all_organizations_flag = :l_Restrict
1327: end if;
1328: --
1329: l_from_str := ' from per_security_profiles sec,
1330: per_position_list posl,
1331: per_organization_list org ';
1332: --
1333: -- Modified for bug 11737636
1334: l_cond_str := ' org.security_profile_id = sec.security_profile_id
1335: and posl.security_profile_id = sec.security_profile_id
1442: hr_utility.set_location(l_proc, 310);
1443: end if;
1444: --
1445: l_from_str := ' from per_security_profiles sec,
1446: per_organization_list org ';
1447: -- Changed for bug 11737636
1448: l_cond_str := ' org.security_profile_id = sec.security_profile_id
1449: and org.organization_id = :l_organization_id
1450: and sec.view_all_organizations_flag = :l_Restrict
1848: --
1849: l_from_str := ' from per_security_profiles sec,
1850: pay_payroll_list pay,
1851: per_position_list posl,
1852: per_organization_list org ';
1853: --
1854: l_cond_str := ' org.security_profile_id = sec.security_profile_id
1855: and posl.security_profile_id = sec.security_profile_id
1856: and pay.security_profile_id = sec.security_profile_id
1968: end if;
1969: --
1970: l_from_str := ' from per_security_profiles sec,
1971: per_position_list posl,
1972: per_organization_list org ';
1973: --
1974: l_cond_str := ' org.security_profile_id = sec.security_profile_id
1975: and posl.security_profile_id = sec.security_profile_id
1976: and posl.security_profile_id = org.security_profile_id
2082: end if;
2083: --
2084: l_from_str := ' from per_security_profiles sec,
2085: pay_payroll_list pay,
2086: per_organization_list org ';
2087: --
2088: l_cond_str := ' org.security_profile_id = sec.security_profile_id
2089: and pay.security_profile_id = sec.security_profile_id
2090: and org.organization_id = :l_organization_id
2298: hr_utility.set_location(l_proc, 550);
2299: end if;
2300: --
2301: l_from_str := ' from per_security_profiles sec,
2302: per_organization_list org ';
2303: --
2304: l_cond_str := ' org.security_profile_id = sec.security_profile_id
2305: and org.organization_id = :l_organization_id
2306: and sec.view_all_organizations_flag = :l_Restrict
5731: -- security profile and therefore different access rights.
5732: --
5733: CURSOR csr_get_static_orgs_for_user IS
5734: SELECT pol.organization_id
5735: FROM per_organization_list pol
5736: WHERE pol.security_profile_id IS NOT NULL
5737: AND pol.user_id IS NOT NULL
5738: AND pol.security_profile_id = p_security_profile_id
5739: AND pol.user_id = p_user_id;
5744: -- not in use.
5745: --
5746: CURSOR csr_get_static_orgs IS
5747: SELECT pol.organization_id
5748: FROM per_organization_list pol
5749: WHERE pol.security_profile_id IS NOT NULL
5750: AND pol.user_id IS NULL
5751: AND pol.security_profile_id = p_security_profile_id;
5752:
5763: -- If this is user-based, look for a user and
5764: -- security profile pair. Generally speaking, the static
5765: -- user lists will only be cached when it is known that
5766: -- this user is in the list of users to build static
5767: -- lists for AND they have rows in per_organization_list.
5768: --
5769: IF g_dbg THEN op(l_proc, 20); END IF;
5770:
5771: IF NVL(p_top_organization_method, 'S') = 'U' THEN
6558: IF g_dbg THEN op(l_proc, 30); END IF;
6559:
6560: SELECT pol.organization_id
6561: INTO l_organization_id
6562: FROM per_organization_list pol
6563: WHERE pol.user_id IS NOT NULL
6564: AND pol.security_profile_id IS NOT NULL
6565: AND pol.user_id = p_user_id
6566: AND pol.security_profile_id = p_security_profile_id
6780:
6781: IF p_user_id IS NOT NULL AND p_security_profile_id IS NOT NULL THEN
6782:
6783: --
6784: -- Delete all orgs in per_organization_list for this user
6785: -- and this security profile.
6786: --
6787: IF g_dbg THEN op(l_proc, 20); END IF;
6788:
6785: -- and this security profile.
6786: --
6787: IF g_dbg THEN op(l_proc, 20); END IF;
6788:
6789: DELETE FROM per_organization_list pol
6790: WHERE pol.user_id IS NOT NULL
6791: AND pol.security_profile_id IS NOT NULL
6792: AND pol.user_id = p_user_id
6793: AND pol.security_profile_id = p_security_profile_id;
7028: -- delete_org_list_for_user) prior to insertion.
7029: --
7030: IF g_dbg THEN op(l_proc||'('||to_char(i)||'):'); END IF;
7031:
7032: INSERT INTO per_organization_list
7033: (security_profile_id
7034: ,organization_id
7035: ,user_id
7036: ,request_id
7377: -- Here organization security is evaluated on the fly.
7378: -- This is done dynamically because:
7379: -- a) user-based org security is in use and the user does
7380: -- not have their permissions stored in static tables, or
7381: -- b) the per_organization_list table is not to be used.
7382: --
7383: IF NOT p_use_static_lists
7384: OR (NVL(p_sec_prof_rec.top_organization_method, 'S') = 'U'
7385: AND NOT user_in_static_org_list(p_user_id
9049: -- Organization List.
9050: --
9051: IF g_dbg THEN op(l_proc, 20); END IF;
9052:
9053: DELETE FROM per_organization_list pol
9054: WHERE pol.user_id IS NOT NULL
9055: AND pol.security_profile_id IS NOT NULL
9056: AND pol.user_id = p_user_id
9057: AND pol.security_profile_id = p_security_profile_id;
9242: -- Delete statement modified to improve performance.
9243:
9244: -- Bug fix 4889068.
9245: -- SQL Tuned to improve performance.
9246: DELETE FROM per_organization_list ol
9247: WHERE EXISTS ( SELECT null
9248: FROM hr_all_organization_units ou
9249: WHERE ou.business_group_id = p_business_group_id
9250: and ou.organization_id = ol.organization_id);
9315: p_program_id := fnd_profile.value('CONC_PROGRAM_ID');
9316: p_program_application_id := fnd_profile.value('CONC_PROGRAM_APPLICATION_ID');
9317: END IF;
9318:
9319: insert into per_organization_list
9320: (organization_id
9321: ,security_profile_id
9322: ,request_id
9323: ,program_application_id
9331: ,p_program_id
9332: ,p_update_date
9333: from sys.dual
9334: where not exists(select 1
9335: from per_organization_list pol
9336: where pol.organization_id = p_organization_id
9337: and pol.security_profile_id = p_security_profile_Id
9338: );
9339: --
9349: --
9350: l_proc varchar2(80) := 'HR_SECURITY_INTERNAL.DELETE_ORG_FROM_SECURITY_LIST';
9351: begin
9352: hr_utility.set_location('Entering:'|| l_proc, 10);
9353: DELETE FROM PER_ORGANIZATION_LIST
9354: WHERE organization_id = P_Organization_Id;
9355: exception
9356: when NO_DATA_FOUND then
9357: hr_utility.set_location(l_proc, 20);