[Home] [Help]
53: -- Restrict access to payrolls.
54: --
55: insert into pay_payroll_list (payroll_id, security_profile_id)
56: select p_payroll_id, psp.security_profile_id
57: from per_security_profiles psp
58: where psp.view_all_flag <> 'Y'
59: and (( psp.view_all_payrolls_flag <> 'Y'
60: and business_group_id = p_business_group_id)
61: or ( psp.view_all_payrolls_flag <> 'Y'
95: ,program_application_id, program_id
96: ,program_update_date)
97: select p_person_id, psp.security_profile_id, l_req_id, l_appl_id,
98: l_prog_id, l_upd_date
99: from per_security_profiles psp
100: where psp.view_all_flag <> 'Y'
101: and (((psp.view_all_contacts_flag <> 'Y' or
102: (psp.view_all_contacts_flag = 'Y' and
103: psp.view_all_candidates_flag = 'X')) and
161: ,PROGRAM_ID
162: ,PROGRAM_UPDATE_DATE)
163: select p_person_id, psp.security_profile_id, l_request_id,
164: l_program_application_id, l_program_id, l_update_date
165: from per_security_profiles psp
166: where psp.view_all_flag <> 'Y'
167: and ((
168: ( (psp.view_all_organizations_flag <> 'Y' and
169: nvl(psp.top_organization_method, 'S') <> 'U')
372: --
373: l_collection_index number:=0;
374:
375: -- This is used as a temp variable to collect the values for each Select Sql.
376: TYPE l_security_profie_type_temp IS TABLE OF per_security_profiles.security_profile_id%TYPE INDEX BY BINARY_INTEGER;
377: l_security_profie_table_temp l_security_profie_type_temp;
378:
379: -- This is used to store all the Records which need to be inserted after the
380: -- completion of the bulk select.
377: l_security_profie_table_temp l_security_profie_type_temp;
378:
379: -- This is used to store all the Records which need to be inserted after the
380: -- completion of the bulk select.
381: TYPE l_security_profie_type IS TABLE OF per_security_profiles.security_profile_id%TYPE INDEX BY BINARY_INTEGER;
382: l_security_profie_table l_security_profie_type;
383:
384: -- This procedure is used to populate the final copy of the PL/Sql table
385: -- before inserting the records in the table.
546: if g_debug then
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
645: if g_debug then
646: hr_utility.set_location(l_proc, 70);
647: end if;
648: --
649: l_from_str := ' from per_security_profiles sec ';
650: --
651: -- Changed for bug 11737636
652: l_cond_str := ' sec.view_all_organizations_flag = :l_all
653: and ((sec.view_all_positions_flag = :l_Restrict
741: if g_debug then
742: hr_utility.set_location(l_proc, 100);
743: end if;
744: --
745: l_from_str := ' from per_security_profiles sec ';
746: --
747: l_cond_str := ' sec.view_all_organizations_flag = :l_all
748: and sec.view_all_positions_flag = :l_all
749: and sec.view_all_payrolls_flag = :l_all
836: if g_debug then
837: hr_utility.set_location(l_proc, 130);
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
935: if g_debug then
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
1029: if g_debug then
1030: hr_utility.set_location(l_proc, 190);
1031: end if;
1032: --
1033: l_from_str := ' from per_security_profiles sec,
1034: pay_payroll_list pay ';
1035: --
1036: l_cond_str := ' pay.security_profile_id = sec.security_profile_id
1037: and pay.payroll_id = :l_payroll_id
1117: if g_debug then
1118: hr_utility.set_location(l_proc, 220);
1119: end if;
1120: --
1121: l_from_str := ' from per_security_profiles sec ';
1122: --
1123: l_cond_str := ' sec.view_all_organizations_flag = :l_all
1124: and sec.view_all_payrolls_flag = :l_all
1125: and sec.view_all_positions_flag = :l_Restrict
1221: if g_debug then
1222: hr_utility.set_location(l_proc, 250);
1223: end if;
1224: --
1225: l_from_str := ' from per_security_profiles sec ';
1226: --
1227: l_cond_str := ' sec.view_all_organizations_flag = :l_all
1228: and sec.view_all_positions_flag = :l_all
1229: and sec.view_all_payrolls_flag = :l_all
1325: if g_debug then
1326: hr_utility.set_location(l_proc, 280);
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
1441: if g_debug then
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
1544: if g_debug then
1545: hr_utility.set_location(l_proc, 340);
1546: end if;
1547: --
1548: l_from_str := ' from per_security_profiles sec ';
1549: -- Changed for bug 11737636
1550: l_cond_str := ' sec.view_all_organizations_flag = :l_all
1551: and sec.view_all_positions_flag = :l_all
1552: and sec.view_all_payrolls_flag <> :l_Restrict and ';
1636: if g_debug then
1637: hr_utility.set_location(l_proc, 370);
1638: end if;
1639: --
1640: l_from_str := ' from per_security_profiles sec,
1641: per_position_list posl ';
1642: --
1643: l_cond_str := ' posl.security_profile_id = sec.security_profile_id
1644: and posl.position_id = :l_position_id
1745: if g_debug then
1746: hr_utility.set_location(l_proc, 400);
1747: end if;
1748: --
1749: l_from_str := ' from per_security_profiles sec ';
1750: --
1751: l_cond_str := ' sec.view_all_organizations_flag = :l_all
1752: and sec.view_all_positions_flag = :l_all
1753: and sec.view_all_payrolls_flag = :l_all
1845: if g_debug then
1846: hr_utility.set_location(l_proc, 430);
1847: end if;
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: --
1966: if g_debug then
1967: hr_utility.set_location(l_proc, 460);
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
2080: if g_debug then
2081: hr_utility.set_location(l_proc, 490);
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
2188: if g_debug then
2189: hr_utility.set_location(l_proc, 520);
2190: end if;
2191: --
2192: l_from_str := ' from per_security_profiles sec,
2193: pay_payroll_list pay,
2194: per_position_list posl ';
2195: --
2196: l_cond_str := ' posl.security_profile_id = sec.security_profile_id
2297: if g_debug then
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
2401: if g_debug then
2402: hr_utility.set_location(l_proc, 580);
2403: end if;
2404: --
2405: l_from_str := ' from per_security_profiles sec,
2406: per_position_list posl ';
2407: --
2408: l_cond_str := ' posl.security_profile_id = sec.security_profile_id
2409: and posl.position_id = :l_position_id
2504: if g_debug then
2505: hr_utility.set_location(l_proc, 610);
2506: end if;
2507: --
2508: l_from_str := ' from per_security_profiles sec,
2509: pay_payroll_list pay ';
2510: --
2511: l_cond_str := ' pay.security_profile_id = sec.security_profile_id
2512: and pay.payroll_id = :l_payroll_id
2606: if g_debug then
2607: hr_utility.set_location(l_proc, 640);
2608: end if;
2609: --
2610: l_from_str := ' from per_security_profiles sec ';
2611: --
2612: l_cond_str := ' sec.view_all_organizations_flag = :l_all
2613: and sec.view_all_positions_flag = :l_all
2614: and sec.view_all_payrolls_flag = :l_all
2699: if g_debug then
2700: hr_utility.set_location(l_proc, 670);
2701: end if;
2702: --
2703: l_from_str := ' from per_security_profiles sec ';
2704: --
2705: l_cond_str := ' sec.view_all_organizations_flag = :l_all
2706: and sec.view_all_positions_flag = :l_all
2707: and sec.view_all_payrolls_flag = :l_all
4622: l_proc VARCHAR2(72) := g_package||'add_people_to_cache';
4623: l_org_restriction VARCHAR2(1) := 'N';
4624: l_pos_restriction VARCHAR2(1) := 'N';
4625: l_pay_restriction VARCHAR2(1) := 'N';
4626: l_custom_per per_security_profiles.custom_restriction_flag%TYPE;
4627: l_temp_asg_tbl g_number_t;
4628: l_temp_per_tbl g_number_t;
4629: l_ex_emp_security varchar2(1) := 'N';
4630: l_supervisor_levels NUMBER;
9249: WHERE ou.business_group_id = p_business_group_id
9250: and ou.organization_id = ol.organization_id);
9251: --
9252: hr_utility.set_location('hr_delete.delete_security_list_for_bg',7);
9253: DELETE FROM per_security_profiles psp
9254: WHERE psp.business_group_id = p_business_group_id
9255: AND psp.view_all_flag = 'N';
9256: --
9257: hr_utility.set_location('hr_delete.delete_security_list_for_bg',8);
9266: --
9267: hr_utility.set_location('hr_delete.delete_security_list_for_bg',9);
9268: DELETE FROM per_security_users psu
9269: WHERE psu.security_profile_id IN (SELECT sp.security_profile_id
9270: FROM per_security_profiles sp
9271: WHERE sp.business_group_id = p_business_group_id);
9272: --
9273: END delete_security_list_for_bg;
9274: --