[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: l_cond_str := ' org.security_profile_id = sec.security_profile_id
554: and org.organization_id = :l_organization_id
555: and sec.view_all_organizations_flag = :l_Restrict
827: end if;
828: --
829: l_from_str := ' from per_security_profiles sec,
830: pay_payroll_list pay,
831: per_organization_list org ';
832: --
833: l_cond_str := ' org.security_profile_id = sec.security_profile_id
834: and pay.security_profile_id = sec.security_profile_id
835: and pay.security_profile_id = org.security_profile_id
924: hr_utility.set_location(l_proc, 160);
925: end if;
926: --
927: l_from_str := ' from per_security_profiles sec,
928: per_organization_list org ';
929: --
930: l_cond_str := ' org.security_profile_id = sec.security_profile_id
931: and org.organization_id = :l_organization_id
932: and sec.view_all_organizations_flag = :l_Restrict
1311: end if;
1312: --
1313: l_from_str := ' from per_security_profiles sec,
1314: per_position_list posl,
1315: per_organization_list org ';
1316: --
1317: l_cond_str := ' org.security_profile_id = sec.security_profile_id
1318: and posl.security_profile_id = sec.security_profile_id
1319: and posl.security_profile_id = org.security_profile_id
1421: hr_utility.set_location(l_proc, 310);
1422: end if;
1423: --
1424: l_from_str := ' from per_security_profiles sec,
1425: per_organization_list org ';
1426: --
1427: l_cond_str := ' org.security_profile_id = sec.security_profile_id
1428: and org.organization_id = :l_organization_id
1429: and sec.view_all_organizations_flag = :l_Restrict
1817: --
1818: l_from_str := ' from per_security_profiles sec,
1819: pay_payroll_list pay,
1820: per_position_list posl,
1821: per_organization_list org ';
1822: --
1823: l_cond_str := ' org.security_profile_id = sec.security_profile_id
1824: and posl.security_profile_id = sec.security_profile_id
1825: and pay.security_profile_id = sec.security_profile_id
1936: end if;
1937: --
1938: l_from_str := ' from per_security_profiles sec,
1939: per_position_list posl,
1940: per_organization_list org ';
1941: --
1942: l_cond_str := ' org.security_profile_id = sec.security_profile_id
1943: and posl.security_profile_id = sec.security_profile_id
1944: and posl.security_profile_id = org.security_profile_id
2049: end if;
2050: --
2051: l_from_str := ' from per_security_profiles sec,
2052: pay_payroll_list pay,
2053: per_organization_list org ';
2054: --
2055: l_cond_str := ' org.security_profile_id = sec.security_profile_id
2056: and pay.security_profile_id = sec.security_profile_id
2057: and org.organization_id = :l_organization_id
2263: hr_utility.set_location(l_proc, 550);
2264: end if;
2265: --
2266: l_from_str := ' from per_security_profiles sec,
2267: per_organization_list org ';
2268: --
2269: l_cond_str := ' org.security_profile_id = sec.security_profile_id
2270: and org.organization_id = :l_organization_id
2271: and sec.view_all_organizations_flag = :l_Restrict
5487: -- security profile and therefore different access rights.
5488: --
5489: CURSOR csr_get_static_orgs_for_user IS
5490: SELECT pol.organization_id
5491: FROM per_organization_list pol
5492: WHERE pol.security_profile_id IS NOT NULL
5493: AND pol.user_id IS NOT NULL
5494: AND pol.security_profile_id = p_security_profile_id
5495: AND pol.user_id = p_user_id;
5500: -- not in use.
5501: --
5502: CURSOR csr_get_static_orgs IS
5503: SELECT pol.organization_id
5504: FROM per_organization_list pol
5505: WHERE pol.security_profile_id IS NOT NULL
5506: AND pol.user_id IS NULL
5507: AND pol.security_profile_id = p_security_profile_id;
5508:
5519: -- If this is user-based, look for a user and
5520: -- security profile pair. Generally speaking, the static
5521: -- user lists will only be cached when it is known that
5522: -- this user is in the list of users to build static
5523: -- lists for AND they have rows in per_organization_list.
5524: --
5525: IF g_dbg THEN op(l_proc, 20); END IF;
5526:
5527: IF NVL(p_top_organization_method, 'S') = 'U' THEN
6314: IF g_dbg THEN op(l_proc, 30); END IF;
6315:
6316: SELECT pol.organization_id
6317: INTO l_organization_id
6318: FROM per_organization_list pol
6319: WHERE pol.user_id IS NOT NULL
6320: AND pol.security_profile_id IS NOT NULL
6321: AND pol.user_id = p_user_id
6322: AND pol.security_profile_id = p_security_profile_id
6536:
6537: IF p_user_id IS NOT NULL AND p_security_profile_id IS NOT NULL THEN
6538:
6539: --
6540: -- Delete all orgs in per_organization_list for this user
6541: -- and this security profile.
6542: --
6543: IF g_dbg THEN op(l_proc, 20); END IF;
6544:
6541: -- and this security profile.
6542: --
6543: IF g_dbg THEN op(l_proc, 20); END IF;
6544:
6545: DELETE FROM per_organization_list pol
6546: WHERE pol.user_id IS NOT NULL
6547: AND pol.security_profile_id IS NOT NULL
6548: AND pol.user_id = p_user_id
6549: AND pol.security_profile_id = p_security_profile_id;
6784: -- delete_org_list_for_user) prior to insertion.
6785: --
6786: IF g_dbg THEN op(l_proc||'('||to_char(i)||'):'); END IF;
6787:
6788: INSERT INTO per_organization_list
6789: (security_profile_id
6790: ,organization_id
6791: ,user_id
6792: ,request_id
7133: -- Here organization security is evaluated on the fly.
7134: -- This is done dynamically because:
7135: -- a) user-based org security is in use and the user does
7136: -- not have their permissions stored in static tables, or
7137: -- b) the per_organization_list table is not to be used.
7138: --
7139: IF NOT p_use_static_lists
7140: OR (NVL(p_sec_prof_rec.top_organization_method, 'S') = 'U'
7141: AND NOT user_in_static_org_list(p_user_id
8185: -- Organization List.
8186: --
8187: IF g_dbg THEN op(l_proc, 20); END IF;
8188:
8189: DELETE FROM per_organization_list pol
8190: WHERE pol.user_id IS NOT NULL
8191: AND pol.security_profile_id IS NOT NULL
8192: AND pol.user_id = p_user_id
8193: AND pol.security_profile_id = p_security_profile_id;
8378: -- Delete statement modified to improve performance.
8379:
8380: -- Bug fix 4889068.
8381: -- SQL Tuned to improve performance.
8382: DELETE FROM per_organization_list ol
8383: WHERE EXISTS ( SELECT null
8384: FROM hr_all_organization_units ou
8385: WHERE ou.business_group_id = p_business_group_id
8386: and ou.organization_id = ol.organization_id);
8451: p_program_id := fnd_profile.value('CONC_PROGRAM_ID');
8452: p_program_application_id := fnd_profile.value('CONC_PROGRAM_APPLICATION_ID');
8453: END IF;
8454:
8455: insert into per_organization_list
8456: (organization_id
8457: ,security_profile_id
8458: ,request_id
8459: ,program_application_id
8467: ,p_program_id
8468: ,p_update_date
8469: from sys.dual
8470: where not exists(select 1
8471: from per_organization_list pol
8472: where pol.organization_id = p_organization_id
8473: and pol.security_profile_id = p_security_profile_Id
8474: );
8475: --
8485: --
8486: l_proc varchar2(80) := 'HR_SECURITY_INTERNAL.DELETE_ORG_FROM_SECURITY_LIST';
8487: begin
8488: hr_utility.set_location('Entering:'|| l_proc, 10);
8489: DELETE FROM PER_ORGANIZATION_LIST
8490: WHERE organization_id = P_Organization_Id;
8491: exception
8492: when NO_DATA_FOUND then
8493: hr_utility.set_location(l_proc, 20);