[Home] [Help]
3: --
4: -- Package Variables
5: --
6: g_package constant varchar2(33) := 'hr_applicant_api.';
7: g_debug constant boolean := hr_utility.debug_enabled;
8: --
9: -- Package cursor
10: --
11: CURSOR csr_future_asgs
63: l_future_asgs_count INTEGER := 0;
64: --
65: BEGIN
66: --
67: hr_utility.set_location('Entering:'||l_proc,10);
68: --
69: FOR l_future_asgs_rec IN
70: csr_future_asgs
71: (p_person_id => p_person_id
74: LOOP
75: l_future_asgs_count := l_future_asgs_count + 1;
76: END LOOP;
77: --
78: hr_utility.set_location(' Leaving:'||l_proc,100);
79: --
80: RETURN(l_future_asgs_count);
81: --
82: EXCEPTION
267: --
268: lv_applicant_number varchar2(2000) := p_applicant_number ;
269: --
270: begin
271: hr_utility.set_location('Entering:'|| l_proc, 5);
272: --
273: -- Issue a savepoint.
274: --
275: savepoint create_applicant;
292: 'APL');
293: l_applicant_number := p_applicant_number;
294: l_npw_number := null;
295: --
296: hr_utility.set_location(l_proc, 10);
297: --
298: -- Perform Business Process additional validation, if required derive
299: -- the person_type_id value.
300: --
566: ,p_name_combination_warning => l_name_combination_warning
567: ,p_dob_null_warning => l_dob_null_warning
568: ,p_orig_hire_warning => l_orig_hire_warning
569: );
570: hr_utility.set_location(l_proc, 20);
571: --
572: -- add the new applicant to the security lists
573: --
574: hr_security_internal.populate_new_person(p_business_group_id,l_person_id);
572: -- add the new applicant to the security lists
573: --
574: hr_security_internal.populate_new_person(p_business_group_id,l_person_id);
575: --
576: hr_utility.set_location(l_proc, 25);
577: --
578: -- Insert the application using the application RH...
579: --
580: per_apl_ins.ins(p_application_id => l_application_id
584: ,p_object_version_number => p_apl_object_version_number
585: ,p_effective_date => l_date_received
586: ,p_validate => FALSE
587: );
588: hr_utility.set_location(l_proc, 30);
589: --
590: -- Insert the default applicant assignment using the business support layer
591: -- process create_default_apl_asg.
592: --
610: ,p_assignment_id => l_assignment_id
611: ,p_object_version_number => l_asg_object_version_number
612: ,p_assignment_sequence => l_assignment_sequence
613: );
614: hr_utility.set_location(l_proc, 40);
615: --
616: -- Create a phone row using the newly created person as the parent row.
617: -- This phone row replaces the work_telephone column on the person.
618: --
809: p_orig_hire_warning := l_orig_hire_warning;
810: -- Added for Bug 1275358
811: p_applicant_number := l_applicant_number;
812:
813: hr_utility.set_location(' Leaving:'||l_proc, 50);
814: exception
815: when hr_api.validate_enabled then
816: --
817: -- As the Validate_Enabled exception has been raised
838: p_name_combination_warning := l_name_combination_warning;
839: p_orig_hire_warning := l_orig_hire_warning;
840:
841: --
842: hr_utility.set_location(' Leaving:'||l_proc, 35);
843: when others then
844: --
845: -- A validation or unexpected error has occurred
846: --
991: from per_business_groups pbg
992: where pbg.business_group_id = p_business_group_id;
993: --
994: begin
995: hr_utility.set_location('Entering:'|| l_proc, 5);
996: --
997: -- Validation in addition to Table Handlers
998: --
999: -- Check that the specified business group is valid.
1002: fetch csr_bg
1003: into l_legislation_code;
1004: if csr_bg%notfound then
1005: close csr_bg;
1006: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
1007: hr_utility.raise_error;
1008: end if;
1009: close csr_bg;
1010: --
1003: into l_legislation_code;
1004: if csr_bg%notfound then
1005: close csr_bg;
1006: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
1007: hr_utility.raise_error;
1008: end if;
1009: close csr_bg;
1010: --
1011: -- Check that the legislation of the specified business group is 'GB'.
1010: --
1011: -- Check that the legislation of the specified business group is 'GB'.
1012: --
1013: if l_legislation_code <> 'GB' then
1014: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
1015: hr_utility.set_message_token('LEG_CODE','GB');
1016: hr_utility.raise_error;
1017: end if;
1018:
1011: -- Check that the legislation of the specified business group is 'GB'.
1012: --
1013: if l_legislation_code <> 'GB' then
1014: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
1015: hr_utility.set_message_token('LEG_CODE','GB');
1016: hr_utility.raise_error;
1017: end if;
1018:
1019: hr_utility.set_location(l_proc, 6);
1012: --
1013: if l_legislation_code <> 'GB' then
1014: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
1015: hr_utility.set_message_token('LEG_CODE','GB');
1016: hr_utility.raise_error;
1017: end if;
1018:
1019: hr_utility.set_location(l_proc, 6);
1020: --
1015: hr_utility.set_message_token('LEG_CODE','GB');
1016: hr_utility.raise_error;
1017: end if;
1018:
1019: hr_utility.set_location(l_proc, 6);
1020: --
1021: -- Call the person business process
1022: --
1023: hr_applicant_api.create_applicant
1128: ,p_name_combination_warning => p_name_combination_warning
1129: ,p_orig_hire_warning => p_orig_hire_warning
1130: );
1131: --
1132: hr_utility.set_location(' Leaving:'||l_proc, 7);
1133: end create_gb_applicant;
1134: --
1135: -- ----------------------------------------------------------------------------
1136: -- |-------------------------< create_us_applicant >--------------------------|
1255: from per_business_groups pbg
1256: where pbg.business_group_id = p_business_group_id;
1257: --
1258: begin
1259: hr_utility.set_location('Entering:'|| l_proc, 5);
1260: --
1261: -- Validation in addition to Table Handlers
1262: --
1263: -- Check that the specified business group is valid.
1266: fetch csr_bg
1267: into l_legislation_code;
1268: if csr_bg%notfound then
1269: close csr_bg;
1270: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
1271: hr_utility.raise_error;
1272: end if;
1273: close csr_bg;
1274: --
1267: into l_legislation_code;
1268: if csr_bg%notfound then
1269: close csr_bg;
1270: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
1271: hr_utility.raise_error;
1272: end if;
1273: close csr_bg;
1274: --
1275: -- Check that the legislation of the specified business group is 'US'.
1274: --
1275: -- Check that the legislation of the specified business group is 'US'.
1276: --
1277: if l_legislation_code <> 'US' then
1278: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
1279: hr_utility.set_message_token('LEG_CODE','US');
1280: hr_utility.raise_error;
1281: end if;
1282:
1275: -- Check that the legislation of the specified business group is 'US'.
1276: --
1277: if l_legislation_code <> 'US' then
1278: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
1279: hr_utility.set_message_token('LEG_CODE','US');
1280: hr_utility.raise_error;
1281: end if;
1282:
1283: hr_utility.set_location(l_proc, 6);
1276: --
1277: if l_legislation_code <> 'US' then
1278: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
1279: hr_utility.set_message_token('LEG_CODE','US');
1280: hr_utility.raise_error;
1281: end if;
1282:
1283: hr_utility.set_location(l_proc, 6);
1284: --
1279: hr_utility.set_message_token('LEG_CODE','US');
1280: hr_utility.raise_error;
1281: end if;
1282:
1283: hr_utility.set_location(l_proc, 6);
1284: --
1285: -- Call the person business process
1286: --
1287: hr_applicant_api.create_applicant
1393: ,p_name_combination_warning => p_name_combination_warning
1394: ,p_orig_hire_warning => p_orig_hire_warning
1395: );
1396: --
1397: hr_utility.set_location(' Leaving:'||l_proc, 7);
1398: end create_us_applicant;
1399: --
1400: -- ---------------------------------------------------------------------------
1401: -- |-----------------------------< hire_applicant >---------------------------|
1434: -- l_original_date_of_hire date;
1435: --
1436: begin
1437: --
1438: hr_utility.set_location('Entering:'|| l_proc, 10);
1439: --
1440: l_per_object_version_number:=p_per_object_version_number;
1441: l_employee_number:=p_employee_number;
1442: --
1464: p_per_effective_end_date := l_per_effective_end_date;
1465: p_unaccepted_asg_del_warning := l_unaccepted_asg_del_warning;
1466: p_assign_payroll_warning := l_assign_payroll_warning;
1467: --
1468: hr_utility.set_location('Leaving:'|| l_proc, 20);
1469: --
1470: end hire_applicant;
1471: --
1472: -- ---------------------------------------------------------------------------
1869: ---- Fix For ER: 6136609 Starts ----
1870:
1871: l_autoApprove:=fnd_profile.value('HR_AUTO_APPROVE_FIRST_PROPOSAL');
1872: if(l_autoApprove is null or l_autoApprove ='Y') then
1873: hr_utility.set_location(l_proc, 32);
1874: l_approved_flag:='Y';
1875: end if;
1876:
1877: ---- Fix For ER: 6136609 Ends ----
1890: close csr_payproposal;
1891: END update_salary_proposal;
1892: -- End bug 2833630
1893: begin
1894: hr_utility.set_location('Entering:'|| l_proc, 10);
1895: --
1896: hr_api.mandatory_arg_error
1897: (p_api_name => l_proc
1898: ,p_argument => 'person_id'
1912: fetch csr_pps_ended_ystrdy into l_pps;
1913: --
1914: if csr_pps_ended_ystrdy%found then
1915: --
1916: hr_utility.set_location(l_proc,11);
1917: l_datetrack_mode:='CORRECTION';
1918: end if;
1919: close csr_pps_ended_ystrdy;
1920: --bug no 5105005
1919: close csr_pps_ended_ystrdy;
1920: --bug no 5105005
1921: savepoint hire_applicant;
1922: --
1923: hr_utility.set_location(l_proc, 80);
1924: --
1925: -- Process Logic
1926: --
1927: l_per_object_version_number := p_per_object_version_number;
1934: -- #2978566
1935: --
1936: -- Get the derived details for the person DT instance
1937: --
1938: hr_utility.set_location(l_proc,40);
1939:
1940: open csr_get_devived_details;
1941: fetch csr_get_devived_details
1942: into l_system_person_type,
1949: l_original_date_of_hire;
1950: if csr_get_devived_details%NOTFOUND
1951: then
1952: --
1953: hr_utility.set_location(l_proc,50);
1954: --
1955: close csr_get_devived_details;
1956: --
1957: hr_utility.set_message(800,'PER_52097_APL_INV_PERSON_ID');
1953: hr_utility.set_location(l_proc,50);
1954: --
1955: close csr_get_devived_details;
1956: --
1957: hr_utility.set_message(800,'PER_52097_APL_INV_PERSON_ID');
1958: hr_utility.raise_error;
1959: --
1960: end if;
1961: close csr_get_devived_details;
1954: --
1955: close csr_get_devived_details;
1956: --
1957: hr_utility.set_message(800,'PER_52097_APL_INV_PERSON_ID');
1958: hr_utility.raise_error;
1959: --
1960: end if;
1961: close csr_get_devived_details;
1962: --
2004: fetch csr_future_asg_changes into l_exists;
2005: --
2006: if csr_future_asg_changes%FOUND then
2007: --
2008: hr_utility.set_location(l_proc,30);
2009: close csr_future_asg_changes;
2010: --
2011: hr_utility.set_message(801,'HR_7975_ASG_INV_FUTURE_ASA');
2012: hr_utility.raise_error;
2007: --
2008: hr_utility.set_location(l_proc,30);
2009: close csr_future_asg_changes;
2010: --
2011: hr_utility.set_message(801,'HR_7975_ASG_INV_FUTURE_ASA');
2012: hr_utility.raise_error;
2013: --
2014: end if;
2015: --
2008: hr_utility.set_location(l_proc,30);
2009: close csr_future_asg_changes;
2010: --
2011: hr_utility.set_message(801,'HR_7975_ASG_INV_FUTURE_ASA');
2012: hr_utility.raise_error;
2013: --
2014: end if;
2015: --
2016: --
2013: --
2014: end if;
2015: --
2016: --
2017: hr_utility.set_location(l_proc,270);
2018: --
2019: -- Validation in addition to Row Handlers
2020: --
2021: -- If the specified person type id is not null then check that it
2028: ,p_business_group_id => l_business_group_id
2029: ,p_expected_sys_type => 'EMP'
2030: );
2031: --
2032: hr_utility.set_location(l_proc,60);
2033: --
2034: -- Check that corresponding person is of 'APL', 'APL_EX_APL' or 'EX_EMP_APL'
2035: -- system person type.
2036: --
2038: l_system_person_type <> 'APL_EX_APL' and
2039: l_system_person_type <> 'EX_EMP_APL'
2040: then
2041: --
2042: hr_utility.set_location(l_proc,70);
2043: --
2044: hr_utility.set_message(800,'PER_52096_APL_INV_PERSON_TYPE');
2045: hr_utility.raise_error;
2046: end if;
2040: then
2041: --
2042: hr_utility.set_location(l_proc,70);
2043: --
2044: hr_utility.set_message(800,'PER_52096_APL_INV_PERSON_TYPE');
2045: hr_utility.raise_error;
2046: end if;
2047: --
2048: hr_utility.set_location(l_proc,80);
2041: --
2042: hr_utility.set_location(l_proc,70);
2043: --
2044: hr_utility.set_message(800,'PER_52096_APL_INV_PERSON_TYPE');
2045: hr_utility.raise_error;
2046: end if;
2047: --
2048: hr_utility.set_location(l_proc,80);
2049: --
2044: hr_utility.set_message(800,'PER_52096_APL_INV_PERSON_TYPE');
2045: hr_utility.raise_error;
2046: end if;
2047: --
2048: hr_utility.set_location(l_proc,80);
2049: --
2050: -- Bug# 2273304 Start Here
2051: --
2052: open csr_date_of_birth;
2060: close csr_bg_age_range;
2061:
2062: if l_age not between nvl(l_minimum_age,l_age) and
2063: nvl(l_maximum_age,l_age) then
2064: hr_utility.set_message(801, 'HR_7426_EMP_AGE_ILLEGAL');
2065: hr_utility.set_message_token('MIN',to_char(l_minimum_age));
2066: hr_utility.set_message_token('MAX',to_char(l_maximum_age));
2067: hr_utility.raise_error;
2068: end if;
2061:
2062: if l_age not between nvl(l_minimum_age,l_age) and
2063: nvl(l_maximum_age,l_age) then
2064: hr_utility.set_message(801, 'HR_7426_EMP_AGE_ILLEGAL');
2065: hr_utility.set_message_token('MIN',to_char(l_minimum_age));
2066: hr_utility.set_message_token('MAX',to_char(l_maximum_age));
2067: hr_utility.raise_error;
2068: end if;
2069: hr_utility.set_location('age:'||l_age||'min:'||l_minimum_age||'max:'||l_maximum_age,91);
2062: if l_age not between nvl(l_minimum_age,l_age) and
2063: nvl(l_maximum_age,l_age) then
2064: hr_utility.set_message(801, 'HR_7426_EMP_AGE_ILLEGAL');
2065: hr_utility.set_message_token('MIN',to_char(l_minimum_age));
2066: hr_utility.set_message_token('MAX',to_char(l_maximum_age));
2067: hr_utility.raise_error;
2068: end if;
2069: hr_utility.set_location('age:'||l_age||'min:'||l_minimum_age||'max:'||l_maximum_age,91);
2070:
2063: nvl(l_maximum_age,l_age) then
2064: hr_utility.set_message(801, 'HR_7426_EMP_AGE_ILLEGAL');
2065: hr_utility.set_message_token('MIN',to_char(l_minimum_age));
2066: hr_utility.set_message_token('MAX',to_char(l_maximum_age));
2067: hr_utility.raise_error;
2068: end if;
2069: hr_utility.set_location('age:'||l_age||'min:'||l_minimum_age||'max:'||l_maximum_age,91);
2070:
2071: --
2065: hr_utility.set_message_token('MIN',to_char(l_minimum_age));
2066: hr_utility.set_message_token('MAX',to_char(l_maximum_age));
2067: hr_utility.raise_error;
2068: end if;
2069: hr_utility.set_location('age:'||l_age||'min:'||l_minimum_age||'max:'||l_maximum_age,91);
2070:
2071: --
2072: -- Bug# 2273304 End Here
2073: --
2078: open csr_chk_asg_status;
2079: fetch csr_chk_asg_status into l_count;
2080: if l_count = 0 then
2081: --
2082: hr_utility.set_location(l_proc,90);
2083: --
2084: close csr_chk_asg_status;
2085: --
2086: hr_utility.set_message(800,'PER_52098_APL_INV_ASG_STATUS');
2082: hr_utility.set_location(l_proc,90);
2083: --
2084: close csr_chk_asg_status;
2085: --
2086: hr_utility.set_message(800,'PER_52098_APL_INV_ASG_STATUS');
2087: hr_utility.raise_error;
2088: --
2089: end if;
2090: --
2083: --
2084: close csr_chk_asg_status;
2085: --
2086: hr_utility.set_message(800,'PER_52098_APL_INV_ASG_STATUS');
2087: hr_utility.raise_error;
2088: --
2089: end if;
2090: --
2091: -- If the accepted assignment record is multiple, ASSIGNMENT_ID
2092: -- must be not null.
2093: --
2094: if l_count > 1 then
2095: --
2096: hr_utility.set_location(l_proc,100);
2097: --
2098: --close csr_chk_asg_status;
2099: --
2100: hr_api.mandatory_arg_error
2102: ,p_argument => 'assignment_id'
2103: ,p_argument_value => p_assignment_id
2104: );
2105: --
2106: hr_utility.set_location(l_proc,110);
2107: --
2108: l_multi_flag := TRUE;
2109: --
2110: end if;
2110: end if;
2111: --
2112: close csr_chk_asg_status;
2113: --
2114: hr_utility.set_location(l_proc,120);
2115: --
2116: -- Check p_assignment is corresponding data.
2117: -- The assignment record specified by P_ASSIGNMENT_ID on the hire
2118: -- date in the PER_ASSIGNMENTS_F table has assignment status
2119: -- 'ACCEPTED'.
2120: --
2121: if p_assignment_id is not null then
2122: --
2123: hr_utility.set_location(l_proc,130);
2124: --
2125: open csr_chk_assignment_id;
2126: fetch csr_chk_assignment_id
2127: into l_chk_person_id,
2127: into l_chk_person_id,
2128: l_chk_system_status;
2129: if csr_chk_assignment_id%NOTFOUND then
2130: --
2131: hr_utility.set_location(l_proc,140);
2132: --
2133: close csr_chk_assignment_id;
2134: --
2135: hr_utility.set_message(800,'PER_52099_ASG_INV_ASG_ID');
2131: hr_utility.set_location(l_proc,140);
2132: --
2133: close csr_chk_assignment_id;
2134: --
2135: hr_utility.set_message(800,'PER_52099_ASG_INV_ASG_ID');
2136: hr_utility.raise_error;
2137: --
2138: end if;
2139: --
2132: --
2133: close csr_chk_assignment_id;
2134: --
2135: hr_utility.set_message(800,'PER_52099_ASG_INV_ASG_ID');
2136: hr_utility.raise_error;
2137: --
2138: end if;
2139: --
2140: if l_chk_person_id <> p_person_id then
2138: end if;
2139: --
2140: if l_chk_person_id <> p_person_id then
2141: --
2142: hr_utility.set_location(l_proc,150);
2143: --
2144: close csr_chk_assignment_id;
2145: --
2146: hr_utility.set_message(800,'PER_52101_ASG_INV_PER_ID_COMB');
2142: hr_utility.set_location(l_proc,150);
2143: --
2144: close csr_chk_assignment_id;
2145: --
2146: hr_utility.set_message(800,'PER_52101_ASG_INV_PER_ID_COMB');
2147: hr_utility.raise_error;
2148: --
2149: end if;
2150: --
2143: --
2144: close csr_chk_assignment_id;
2145: --
2146: hr_utility.set_message(800,'PER_52101_ASG_INV_PER_ID_COMB');
2147: hr_utility.raise_error;
2148: --
2149: end if;
2150: --
2151: if l_chk_system_status <> 'ACCEPTED' then
2149: end if;
2150: --
2151: if l_chk_system_status <> 'ACCEPTED' then
2152: --
2153: hr_utility.set_location(l_proc,150);
2154: --
2155: close csr_chk_assignment_id;
2156: --
2157: hr_utility.set_message(800,'PER_52100_ASG_INV_PER_TYPE');
2153: hr_utility.set_location(l_proc,150);
2154: --
2155: close csr_chk_assignment_id;
2156: --
2157: hr_utility.set_message(800,'PER_52100_ASG_INV_PER_TYPE');
2158: hr_utility.raise_error;
2159: --
2160: end if;
2161: --
2154: --
2155: close csr_chk_assignment_id;
2156: --
2157: hr_utility.set_message(800,'PER_52100_ASG_INV_PER_TYPE');
2158: hr_utility.raise_error;
2159: --
2160: end if;
2161: --
2162: hr_utility.set_location(l_proc,160);
2158: hr_utility.raise_error;
2159: --
2160: end if;
2161: --
2162: hr_utility.set_location(l_proc,160);
2163: --
2164: close csr_chk_assignment_id;
2165: --
2166: end if;
2173: fetch csr_pps_not_ended into l_pps;
2174: --
2175: if csr_pps_not_ended%found then
2176: --
2177: hr_utility.set_location(l_proc,165);
2178: close csr_pps_not_ended;
2179: --
2180: -- Fix 5196352 - Now we allow rehire before FPD
2181: -- hence do not throw error PER_289308_FUTURE_ENDED_FPD
2181: -- hence do not throw error PER_289308_FUTURE_ENDED_FPD
2182: -- Here we just check FPD should never be null.
2183:
2184: if l_pps is null then
2185: hr_utility.set_message('800','HR_449756_FPD_PREV_PDS');
2186: hr_utility.raise_error;
2187: end if;
2188: end if;
2189: --
2182: -- Here we just check FPD should never be null.
2183:
2184: if l_pps is null then
2185: hr_utility.set_message('800','HR_449756_FPD_PREV_PDS');
2186: hr_utility.raise_error;
2187: end if;
2188: end if;
2189: --
2190: -- Fix for bug 2881076 end.
2187: end if;
2188: end if;
2189: --
2190: -- Fix for bug 2881076 end.
2191: hr_utility.set_location(l_proc,170);
2192: --
2193: -- Lock the person record in PER_ALL_PEOPLE_F ready for UPDATE at a later point.
2194: -- (Note: This is necessary because calling the table handlers in locking
2195: -- ladder order invokes an error in per_apl_upd.upd due to the person
2204: ,p_validation_start_date => l_validation_start_date
2205: ,p_validation_end_date => l_validation_end_date
2206: );
2207: --
2208: hr_utility.set_location(l_proc,180);
2209: --
2210: --start changes for i-rec enhancement ww bug # 2675202
2211: --
2212: if (p_migrate) then
2218: ,p_object_version_number => l_add_ovn
2219: ,p_effective_date => l_hire_date);
2220: end loop;
2221: --
2222: hr_utility.set_location(l_proc,181);
2223: --
2224: for phn_rec in csr_phn(per_per_shd.g_old_rec.party_id) loop
2225: l_phn_ovn:=phn_rec.object_version_number;
2226: l_parent_table := 'PER_ALL_PEOPLE_F';
2230: ,p_object_version_number => l_phn_ovn
2231: ,p_effective_date => l_hire_date);
2232: end loop;
2233: --
2234: hr_utility.set_location(l_proc,182);
2235: --
2236: for pem_rec in csr_pem(per_per_shd.g_old_rec.party_id) loop
2237: l_pem_ovn:=pem_rec.object_version_number;
2238: per_pem_upd.upd(p_previous_employer_id => pem_rec.previous_employer_id
2241: ,p_object_version_number => l_pem_ovn
2242: ,p_effective_date => l_hire_date);
2243: end loop;
2244: --
2245: hr_utility.set_location(l_proc,183);
2246: --
2247: for qua_rec in csr_qua(per_per_shd.g_old_rec.party_id) loop
2248: l_qua_ovn:=qua_rec.object_version_number;
2249: per_qua_upd.upd(p_qualification_id => qua_rec.qualification_id
2252: ,p_object_version_number => l_qua_ovn
2253: ,p_effective_date => l_hire_date);
2254: end loop;
2255: --
2256: hr_utility.set_location(l_proc,184);
2257: --
2258: for esa_rec in csr_esa(per_per_shd.g_old_rec.party_id) loop
2259: l_esa_ovn:=esa_rec.object_version_number;
2260: per_esa_upd.upd(p_attendance_id => esa_rec.attendance_id
2263: ,p_object_version_number => l_esa_ovn
2264: ,p_effective_date => l_hire_date);
2265: end loop;
2266: --
2267: hr_utility.set_location(l_proc,185);
2268: --
2269: end if;
2270: --
2271: --End changes for i-rec enhancement ww bug # 2675202
2280: ,p_object_version_number => l_apl_object_version_number
2281: ,p_effective_date => l_hire_date
2282: ,p_validate => false
2283: );
2284: hr_utility.set_location(l_proc,190);
2285: -- PTU : Commented
2286: -- Added to terminate APL record
2287: -- Bug 1253785
2288: -- hr_per_type_usage_internal.maintain_ptu(
2301: into l_assignment_id,
2302: l_asg_object_version_number;
2303: exit when csr_get_un_accepted%NOTFOUND;
2304: --
2305: hr_utility.set_location(l_proc,210);
2306: --
2307: hr_utility.set_location(l_proc,240);
2308: --
2309: per_asg_del.del
2303: exit when csr_get_un_accepted%NOTFOUND;
2304: --
2305: hr_utility.set_location(l_proc,210);
2306: --
2307: hr_utility.set_location(l_proc,240);
2308: --
2309: per_asg_del.del
2310: (p_assignment_id => l_assignment_id
2311: ,p_effective_start_date => l_effective_start_date
2332: , p_status_change_date => l_hire_date -- Fix for bug 6036285
2333: , p_assignment_status_id => l_assignment_status_id
2334: , p_object_version_number => l_asg_status_ovn);
2335:
2336: hr_utility.set_location(l_proc,250);
2337: --
2338: -- Added the below api call for bug 7540870.
2339: IRC_OFFERS_API.close_offer
2340: ( p_validate => false
2348: end loop;
2349: --
2350: close csr_get_un_accepted;
2351: --
2352: hr_utility.set_location(l_proc, 260);
2353:
2354: -- bug3572499
2355: open csr_get_legislation_code;
2356: fetch csr_get_legislation_code into l_legislation_code;
2367: ,'EMP');
2368:
2369:
2370: if (l_legislation_code <> 'US') then
2371: hr_utility.set_location(l_proc, 270);
2372: per_per_upd.upd(p_person_id => p_person_id
2373: ,p_effective_date => l_hire_date
2374: ,p_applicant_number => l_applicant_number
2375: ,p_person_type_id => l_person_type_id1
2390: ,p_npw_number => l_npw_number
2391: ,p_original_date_of_hire => l_original_date_of_hire
2392: );
2393: else
2394: hr_utility.set_location(l_proc, 272);
2395: -- start of bug3572499
2396: --
2397: -- US legislation specific
2398: --
2411:
2412: --Fix For Bug 5749371 Ends
2413:
2414: if (l_new_hire_code is NULL) then
2415: hr_utility.set_location(l_proc,274);
2416: l_new_hire_code := 'INCL';
2417: end if;
2418: per_per_upd.upd(p_person_id => p_person_id
2419: ,p_effective_date => l_hire_date
2439: );
2440: end if;
2441: -- end of bug3572499
2442: --
2443: hr_utility.set_location(l_proc,284);
2444: --
2445: -- PTU : Following Code has been added
2446:
2447: hr_per_type_usage_internal.maintain_person_type_usage
2452: ,p_datetrack_update_mode=> l_datetrack_mode
2453: --bug no 5105005
2454: );
2455: --
2456: hr_utility.set_location(l_proc,286);
2457: --
2458: l_person_type_id1 :=
2459: hr_person_type_usage_info.get_default_person_type_id
2460: (l_business_group_id
2459: hr_person_type_usage_info.get_default_person_type_id
2460: (l_business_group_id
2461: ,'EX_APL');
2462:
2463: hr_utility.set_location(l_proc,288);
2464: --
2465: hr_per_type_usage_internal.maintain_person_type_usage
2466: (p_effective_date => l_hire_date
2467: ,p_person_id => p_person_id
2469: );
2470:
2471: -- PTU : End of changes
2472:
2473: hr_utility.set_location(l_proc,290);
2474: --
2475: -- Insert the period of service into per_periods_of_service by calling the
2476: -- Periods of Service table handler:
2477: --
2485: ,p_object_version_number => l_pds_object_version_number
2486: ,p_validate_df_flex => false
2487: );
2488: --
2489: hr_utility.set_location(l_proc,310);
2490: -- -----------------------------------------------------------------------+
2491: -- Processing ACCEPTED APL ASG +
2492: -- -----------------------------------------------------------------------+
2493: --
2509: ,p_legislation_code => l_legislation_code
2510: ,p_expected_system_status => 'ACTIVE_ASSIGN'
2511: );
2512: --
2513: hr_utility.set_location(l_proc,320);
2514: l_oversubscribed_vacancy_id:=null;
2515: --
2516: --
2517: -- start of bug 4681211
2520: if p_assignment_id is not null then
2521: -- first process the primary assignment id
2522: -- so that it can generate the assignment Number correctly.
2523: -- bug 4681211 added
2524: hr_utility.set_location(l_proc,321);
2525: open csr_get_accepted_pmry;
2526: fetch csr_get_accepted_pmry
2527: into l_assignment_id,
2528: l_asg_object_version_number,
2528: l_asg_object_version_number,
2529: l_vacancy_id;
2530: if csr_get_accepted_pmry%FOUND then
2531: --
2532: hr_utility.set_location(l_proc,340);
2533: --
2534: l_primary_flag := 'Y';
2535: --
2536: if l_multi_flag = TRUE then
2536: if l_multi_flag = TRUE then
2537: --
2538: if l_assignment_id <> p_assignment_id then
2539: --
2540: hr_utility.set_location(l_proc,360);
2541: --
2542: l_primary_flag := 'N';
2543: --
2544: end if;
2542: l_primary_flag := 'N';
2543: --
2544: end if;
2545: --
2546: hr_utility.set_location(l_proc,370);
2547: --
2548: end if;
2549: --
2550: hr_utility.set_location(l_proc,380);
2546: hr_utility.set_location(l_proc,370);
2547: --
2548: end if;
2549: --
2550: hr_utility.set_location(l_proc,380);
2551: --
2552:
2553: --Fix For Bug 5749371 Starts
2554:
2590: --
2591: --
2592: -- 115.71 (START)
2593: --
2594: hr_utility.set_location(l_proc,385);
2595: --
2596: -- Handle potentially overlapping PDS due to rehire before FPD
2597: --
2598: hr_employee_api.manage_rehire_primary_asgs
2638: l_oversubscribed_vacancy_id:=l_vacancy_id;
2639: else
2640: close csr_vacs;
2641: end if;
2642: hr_utility.set_location(l_proc,390);
2643: --
2644: -- 2833630: Any salary proposals attached to the APL assignment should have
2645: -- the salary change date updated to be >= the hire date.
2646: --
2647: if p_source = false then
2648: update_salary_proposal(l_assignment_id, l_hire_date);
2649: end if;--fix for bug 5354681
2650: --
2651: hr_utility.set_location(l_proc,395);
2652: --
2653: hr_utility.set_location(l_proc,410);
2654: --
2655: close csr_get_accepted_pmry;
2649: end if;--fix for bug 5354681
2650: --
2651: hr_utility.set_location(l_proc,395);
2652: --
2653: hr_utility.set_location(l_proc,410);
2654: --
2655: close csr_get_accepted_pmry;
2656: else
2657: close csr_get_accepted_pmry;
2656: else
2657: close csr_get_accepted_pmry;
2658: end if;
2659:
2660: hr_utility.set_location(l_proc,322);
2661: open csr_get_accepted_non;
2662: loop
2663: fetch csr_get_accepted_non
2664: into l_assignment_id,
2665: l_asg_object_version_number,
2666: l_vacancy_id;
2667: exit when csr_get_accepted_non%NOTFOUND;
2668: --
2669: hr_utility.set_location(l_proc,340);
2670: --
2671: l_primary_flag := 'Y';
2672: --
2673: if l_multi_flag = TRUE then
2673: if l_multi_flag = TRUE then
2674: --
2675: if l_assignment_id <> p_assignment_id then
2676: --
2677: hr_utility.set_location(l_proc,360);
2678: --
2679: l_primary_flag := 'N';
2680: --
2681: end if;
2679: l_primary_flag := 'N';
2680: --
2681: end if;
2682: --
2683: hr_utility.set_location(l_proc,370);
2684: --
2685: end if;
2686: --
2687: hr_utility.set_location(l_proc,380);
2683: hr_utility.set_location(l_proc,370);
2684: --
2685: end if;
2686: --
2687: hr_utility.set_location(l_proc,380);
2688: --
2689:
2690: --Fix For Bug 5749371 Starts
2691:
2727: --
2728: --
2729: -- 115.71 (START)
2730: --
2731: hr_utility.set_location(l_proc,385);
2732: --
2733: -- Handle potentially overlapping PDS due to rehire before FPD
2734: --
2735: hr_employee_api.manage_rehire_primary_asgs
2774: l_oversubscribed_vacancy_id:=l_vacancy_id;
2775: else
2776: close csr_vacs;
2777: end if;
2778: hr_utility.set_location(l_proc,390);
2779: --
2780: -- 2833630: Any salary proposals attached to the APL assignment should have
2781: -- the salary change date updated to be >= the hire date.
2782: --
2783: if p_source = false then
2784: update_salary_proposal(l_assignment_id, l_hire_date);
2785: end if;--fix for bug 5354681
2786: --
2787: hr_utility.set_location(l_proc,395);
2788: end loop;
2789: --
2790: hr_utility.set_location(l_proc,410);
2791: --
2786: --
2787: hr_utility.set_location(l_proc,395);
2788: end loop;
2789: --
2790: hr_utility.set_location(l_proc,410);
2791: --
2792: close csr_get_accepted_non;
2793:
2794: else
2793:
2794: else
2795: -- case when p_assignment_id is null
2796: -- this works as how it was previoulsy
2797: hr_utility.set_location(l_proc,323);
2798: hr_utility.set_location('inside the else part',910);
2799: open csr_get_accepted;
2800: loop
2801: fetch csr_get_accepted
2794: else
2795: -- case when p_assignment_id is null
2796: -- this works as how it was previoulsy
2797: hr_utility.set_location(l_proc,323);
2798: hr_utility.set_location('inside the else part',910);
2799: open csr_get_accepted;
2800: loop
2801: fetch csr_get_accepted
2802: into l_assignment_id,
2803: l_asg_object_version_number,
2804: l_vacancy_id;
2805: exit when csr_get_accepted%NOTFOUND;
2806: --
2807: hr_utility.set_location(l_proc,340);
2808: --
2809: l_primary_flag := 'Y';
2810: --
2811: if l_multi_flag = TRUE then
2811: if l_multi_flag = TRUE then
2812: --
2813: if l_assignment_id <> p_assignment_id then
2814: --
2815: hr_utility.set_location(l_proc,360);
2816: --
2817: l_primary_flag := 'N';
2818: --
2819: end if;
2817: l_primary_flag := 'N';
2818: --
2819: end if;
2820: --
2821: hr_utility.set_location(l_proc,370);
2822: --
2823: end if;
2824: --
2825: hr_utility.set_location(l_proc,380);
2821: hr_utility.set_location(l_proc,370);
2822: --
2823: end if;
2824: --
2825: hr_utility.set_location(l_proc,380);
2826: --
2827: per_asg_upd.upd
2828: (p_assignment_id => l_assignment_id,
2829: p_object_version_number => l_asg_object_version_number,
2849: --
2850: --
2851: -- 115.71 (START)
2852: --
2853: hr_utility.set_location(l_proc,385);
2854: --
2855: -- Handle potentially overlapping PDS due to rehire before FPD
2856: --
2857: hr_employee_api.manage_rehire_primary_asgs
2886: ,p_applicant_assignment_id => l_assignment_id
2887: ,p_change_reason => 'APL_HIRED'
2888: );
2889:
2890: hr_utility.set_location(l_proc,386);
2891: open csr_vacs(l_vacancy_id);
2892: fetch csr_vacs into l_dummy;
2893: if csr_vacs%found then
2894: close csr_vacs;
2895: l_oversubscribed_vacancy_id:=l_vacancy_id;
2896: else
2897: close csr_vacs;
2898: end if;
2899: hr_utility.set_location(l_proc,390);
2900: --
2901: -- 2833630: Any salary proposals attached to the APL assignment should have
2902: -- the salary change date updated to be >= the hire date.
2903: --
2904: if p_source = false then
2905: update_salary_proposal(l_assignment_id, l_hire_date);
2906: end if;--fix for bug 5354681
2907: --
2908: hr_utility.set_location(l_proc,395);
2909: end loop;
2910: --
2911: hr_utility.set_location(l_proc,410);
2912: --
2907: --
2908: hr_utility.set_location(l_proc,395);
2909: end loop;
2910: --
2911: hr_utility.set_location(l_proc,410);
2912: --
2913: close csr_get_accepted;
2914:
2915: end if;
2981: p_unaccepted_asg_del_warning := l_unaccepted_asg_del_warning;
2982: p_assign_payroll_warning := l_assign_payroll_warning;
2983: p_oversubscribed_vacancy_id := l_oversubscribed_vacancy_id;
2984: --
2985: hr_utility.set_location(' Leaving:'||l_proc, 250);
2986: --
2987: exception
2988: when hr_api.validate_enabled then
2989: --
3004: p_unaccepted_asg_del_warning := l_unaccepted_asg_del_warning;
3005: p_assign_payroll_warning := l_assign_payroll_warning;
3006: p_oversubscribed_vacancy_id := l_oversubscribed_vacancy_id;
3007: --
3008: hr_utility.set_location(' Leaving:'||l_proc, 250);
3009: --
3010: when others then
3011: --
3012: -- A validation or unexpected error has occurred
3024:
3025: ROLLBACK TO hire_applicant;
3026:
3027: --
3028: hr_utility.set_location(' Leaving:'||l_proc, 255);
3029: raise;
3030: -- End of fix.
3031: --
3032: end hire_applicant;
3276: -- <<
3277: --
3278: BEGIN
3279: --
3280: hr_utility.set_location('Entering:'||l_proc,10);
3281: --
3282: -- Ensure mandatory arguments have been passed
3283: --
3284: hr_api.mandatory_arg_error
3300: -- Issue savepoint
3301: --
3302: SAVEPOINT terminate_applicant;
3303: --
3304: hr_utility.set_location(l_proc,20);
3305: --
3306: -- Call Before Process User Hook
3307: --
3308: BEGIN
3321: ,p_hook_type => 'B'
3322: );
3323: END;
3324: --
3325: hr_utility.set_location(l_proc,30);
3326: --
3327: -- Derive application details
3328: --
3329: OPEN csr_applications
3333: FETCH csr_applications INTO l_application;
3334: IF (csr_applications%NOTFOUND)
3335: THEN
3336: CLOSE csr_applications;
3337: hr_utility.set_message(801,'HR_51011_PER_NOT_EXIST_DATE');
3338: hr_utility.raise_error;
3339: END IF;
3340: CLOSE csr_applications;
3341: --
3334: IF (csr_applications%NOTFOUND)
3335: THEN
3336: CLOSE csr_applications;
3337: hr_utility.set_message(801,'HR_51011_PER_NOT_EXIST_DATE');
3338: hr_utility.raise_error;
3339: END IF;
3340: CLOSE csr_applications;
3341: --
3342: hr_utility.set_location(l_proc,40);
3338: hr_utility.raise_error;
3339: END IF;
3340: CLOSE csr_applications;
3341: --
3342: hr_utility.set_location(l_proc,40);
3343: --
3344: -- If person_type_id is not null check it corresponds to the correct type
3345: -- of ex-applicant is currently active and in the correct business group,
3346: -- otherwise set the person type id the active default for 'ex-applicant'
3356: --
3357: -- IF l_application.system_person_type = 'EMP_APL'
3358: -- THEN
3359: -- l_system_person_type := 'EMP';
3360: -- hr_utility.set_location(l_proc,42);
3361: -- ELSIF l_application.system_person_type = 'EX_EMP_APL'
3362: -- THEN
3363: -- l_system_person_type := 'EX_EMP';
3364: -- hr_utility.set_location(l_proc,44);
3360: -- hr_utility.set_location(l_proc,42);
3361: -- ELSIF l_application.system_person_type = 'EX_EMP_APL'
3362: -- THEN
3363: -- l_system_person_type := 'EX_EMP';
3364: -- hr_utility.set_location(l_proc,44);
3365: -- ELSE
3366: -- l_system_person_type := 'EX_APL';
3367: -- hr_utility.set_location(l_proc,46);
3368: -- END IF;
3363: -- l_system_person_type := 'EX_EMP';
3364: -- hr_utility.set_location(l_proc,44);
3365: -- ELSE
3366: -- l_system_person_type := 'EX_APL';
3367: -- hr_utility.set_location(l_proc,46);
3368: -- END IF;
3369: --
3370: -- End of Bug 2929504.
3371: --
3374: ,p_business_group_id => l_application.business_group_id
3375: ,p_expected_sys_type => 'EX_APL'
3376: );
3377: --
3378: hr_utility.set_location(l_proc,50);
3379: --
3380: --
3381: -- Lock person record
3382: --
3397: ,p_validation_end_date => l_validation_end_date
3398: );
3399: */
3400: --
3401: hr_utility.set_location(l_proc,60);
3402: --
3403: -- Lock application record
3404: --
3405: per_apl_shd.lck
3406: (p_application_id => l_application.application_id
3407: ,p_object_version_number => l_application.object_version_number
3408: );
3409: --
3410: hr_utility.set_location(l_proc,70);
3411: --
3412: -- Terminate all applicant assignments for person
3413: --
3414: -- Remove future-dated assignments
3567: else
3568: l_remove_future_asg_warning := FALSE;
3569: end if;
3570: --
3571: hr_utility.set_location(l_proc,80);
3572: --
3573: -- Update person and ptu records
3574: --
3575: hr_applicant_internal.Update_PER_PTU_To_EX_APL
3580: ,p_per_effective_start_date => l_effective_start_date
3581: ,p_per_effective_end_date => l_effective_end_date
3582: );
3583: --
3584: hr_utility.set_location(l_proc,90);
3585: --
3586: -- End the application
3587: --
3588: UPDATE per_applications
3599: ,p_termination_reason => p_termination_reason
3600: );
3601: */
3602: --
3603: hr_utility.set_location(l_proc,100);
3604:
3605: -- PTU : Added
3606: -- l_person_type_id1 :=
3607: -- hr_person_type_usage_info.get_default_person_type_id
3646: -- );
3647: --
3648: -- PTU : Following Code has been added
3649: --
3650: -- hr_utility.set_location(l_proc,100);
3651: --
3652: -- hr_per_type_usage_internal.maintain_person_type_usage
3653: -- (p_effective_date => l_effective_date + 1
3654: -- ,p_person_id => p_person_id
3656: -- );
3657:
3658: -- PTU : End of changes
3659:
3660: -- hr_utility.set_location(l_proc,110);
3661: --
3662: -- Call After Process User Hook
3663: --
3664: BEGIN
3680: ,p_hook_type => 'A'
3681: );
3682: END;
3683: --
3684: hr_utility.set_location(l_proc,120);
3685: --
3686: -- When in validation only mode raise validate enabled exception
3687: --
3688: IF p_validate
3695: p_effective_start_date := l_effective_start_date;
3696: p_effective_end_date := l_effective_end_date;
3697: p_remove_fut_asg_warning := l_remove_future_asg_warning;
3698: --
3699: hr_utility.set_location(' Leaving:'||l_proc,1000);
3700: --
3701: EXCEPTION
3702: WHEN hr_api.validate_enabled
3703: THEN
3845: l_per_details_rec csr_per_details%ROWTYPE;
3846: --
3847: BEGIN
3848: --
3849: hr_utility.set_location('Entering:'||l_proc,10);
3850: --
3851: -- Ensure mandatory arguments have been passed
3852: --
3853: hr_api.mandatory_arg_error
3869: -- Issue savepoint
3870: --
3871: SAVEPOINT convert_to_applicant;
3872: --
3873: hr_utility.set_location(l_proc,20);
3874: --
3875: -- Get dervied details for person on effective date
3876: --
3877: OPEN csr_per_details
3881: FETCH csr_per_details INTO l_per_details_rec;
3882: IF csr_per_details%NOTFOUND
3883: THEN
3884: CLOSE csr_per_details;
3885: hr_utility.set_message(800,'PER_52097_APL_INV_PERSON_ID');
3886: hr_utility.raise_error;
3887: END IF;
3888: CLOSE csr_per_details;
3889: --
3882: IF csr_per_details%NOTFOUND
3883: THEN
3884: CLOSE csr_per_details;
3885: hr_utility.set_message(800,'PER_52097_APL_INV_PERSON_ID');
3886: hr_utility.raise_error;
3887: END IF;
3888: CLOSE csr_per_details;
3889: --
3890: hr_utility.set_location(l_proc,30);
3886: hr_utility.raise_error;
3887: END IF;
3888: CLOSE csr_per_details;
3889: --
3890: hr_utility.set_location(l_proc,30);
3891: --
3892: -- Call Before Process User Hook
3893: --
3894: BEGIN
3908: ,p_hook_type => 'BP'
3909: );
3910: END;
3911: --
3912: -- hr_utility.set_location(l_proc,40);
3913: --
3914: -- Check the person is of a correct system person type
3915: --
3916: IF l_per_details_rec.system_person_type NOT IN ('EX_APL','EX_EMP','OTHER')
3914: -- Check the person is of a correct system person type
3915: --
3916: IF l_per_details_rec.system_person_type NOT IN ('EX_APL','EX_EMP','OTHER')
3917: THEN
3918: hr_utility.set_location(l_proc,50);
3919: hr_utility.set_message(800,'PER_52096_APL_INV_PERSON_TYPE');
3920: hr_utility.raise_error;
3921: END IF;
3922: --
3915: --
3916: IF l_per_details_rec.system_person_type NOT IN ('EX_APL','EX_EMP','OTHER')
3917: THEN
3918: hr_utility.set_location(l_proc,50);
3919: hr_utility.set_message(800,'PER_52096_APL_INV_PERSON_TYPE');
3920: hr_utility.raise_error;
3921: END IF;
3922: --
3923: hr_utility.set_location(l_proc,60);
3916: IF l_per_details_rec.system_person_type NOT IN ('EX_APL','EX_EMP','OTHER')
3917: THEN
3918: hr_utility.set_location(l_proc,50);
3919: hr_utility.set_message(800,'PER_52096_APL_INV_PERSON_TYPE');
3920: hr_utility.raise_error;
3921: END IF;
3922: --
3923: hr_utility.set_location(l_proc,60);
3924: --
3919: hr_utility.set_message(800,'PER_52096_APL_INV_PERSON_TYPE');
3920: hr_utility.raise_error;
3921: END IF;
3922: --
3923: hr_utility.set_location(l_proc,60);
3924: --
3925: -- Ensure the applicant number will not be changed if it exists
3926: --
3927: IF l_per_details_rec.applicant_number IS NOT NULL
3926: --
3927: IF l_per_details_rec.applicant_number IS NOT NULL
3928: AND NVL(p_applicant_number,hr_api.g_number) <> l_per_details_rec.applicant_number
3929: THEN
3930: hr_utility.set_location(l_proc,70);
3931: p_applicant_number := l_per_details_rec.applicant_number;
3932: END IF;
3933: --
3934: hr_utility.set_location(l_proc,80);
3930: hr_utility.set_location(l_proc,70);
3931: p_applicant_number := l_per_details_rec.applicant_number;
3932: END IF;
3933: --
3934: hr_utility.set_location(l_proc,80);
3935: --
3936: -- 3652025: Create an applicant, generate the application and
3937: -- the applicant assignment
3938: --
3952: ,p_per_effective_start_date => l_effective_start_date
3953: ,p_per_effective_end_date => l_effective_end_date
3954: ,p_appl_override_warning => l_appl_override_warning);
3955: --
3956: hr_utility.set_location(l_proc,90);
3957: --
3958: -- Update the security lists
3959: --
3960: hr_security_internal.populate_new_person(l_per_details_rec.business_group_id,p_person_id);
3958: -- Update the security lists
3959: --
3960: hr_security_internal.populate_new_person(l_per_details_rec.business_group_id,p_person_id);
3961: --
3962: hr_utility.set_location(l_proc,100);
3963: --
3964: -- Call After Process User Hook
3965: --
3966: BEGIN
3983: ,p_hook_type => 'AP'
3984: );
3985: END;
3986: --
3987: hr_utility.set_location(l_proc,180);
3988: --
3989: -- When in validation only mode raise validate_enabled exception
3990: --
3991: IF p_validate
3998: p_effective_start_date := l_effective_start_date;
3999: p_effective_end_date := l_effective_end_date;
4000: p_appl_override_warning := l_appl_override_warning;
4001: --
4002: hr_utility.set_location(' Leaving:'||l_proc,1000);
4003: --
4004: EXCEPTION
4005: --
4006: WHEN hr_api.validate_enabled
4196: savepoint apply_for_job_anytime;
4197: end if;
4198: --
4199: if g_debug then
4200: hr_utility.set_location('Entering:'|| l_proc, 5);
4201: end if;
4202: --
4203: -- Truncate p_effective_date
4204: --
4219: ,p_argument => 'person id'
4220: ,p_argument_value => p_person_id);
4221: --
4222: if g_debug then
4223: hr_utility.set_location(' Leaving:'||l_proc, 10);
4224: end if;
4225: --
4226: -- Check that this person (p_person_id) exists as of l_effective_date
4227: -- the current person type (per_people_f.person_type_id)
4233: ,l_npw_number
4234: ,l_system_person_type;
4235: if csr_chk_person_exists%notfound then
4236: close csr_chk_person_exists;
4237: hr_utility.set_message(800, 'HR_51011_PER_NOT_EXIST_DATE');
4238: hr_utility.raise_error;
4239: end if;
4240: close csr_chk_person_exists;
4241: --
4234: ,l_system_person_type;
4235: if csr_chk_person_exists%notfound then
4236: close csr_chk_person_exists;
4237: hr_utility.set_message(800, 'HR_51011_PER_NOT_EXIST_DATE');
4238: hr_utility.raise_error;
4239: end if;
4240: close csr_chk_person_exists;
4241: --
4242: --
4240: close csr_chk_person_exists;
4241: --
4242: --
4243: if g_debug then
4244: hr_utility.set_location(l_proc, 15);
4245: end if;
4246:
4247: --
4248: -- Initialise local variables
4277: end;
4278: -- processing logic
4279: --
4280: if g_debug then
4281: hr_utility.set_location(l_proc, 20);
4282: end if;
4283: --
4284:
4285: -- Validate that the person_type_id passed is a flavour of 'APL' or derive the default
4289: p_business_group_id => l_business_group_id,
4290: p_expected_sys_type => 'APL');
4291: --
4292: if g_debug then
4293: hr_utility.set_location(l_proc, 25);
4294: end if;
4295: --
4296: hr_applicant_internal.create_applicant_anytime
4297: (p_effective_date => l_effective_date
4312: --
4313: hr_security_internal.add_to_person_list(l_effective_date,l_assignment_id);
4314: --
4315: if g_debug then
4316: hr_utility.set_location(l_proc, 30);
4317: end if;
4318: --
4319: --
4320: begin
4374: raise hr_api.validate_enabled;
4375: end if;
4376: --
4377: if g_debug then
4378: hr_utility.set_location(' Leaving:'||l_proc, 50);
4379: end if;
4380: exception
4381: when hr_api.validate_enabled then
4382: --
4401: p_per_effective_end_date := null;
4402: p_appl_override_warning := null;
4403: --
4404: if g_debug then
4405: hr_utility.set_location(' Leaving:'||l_proc, 55);
4406: end if;
4407: --
4408: end apply_for_job_anytime;
4409: --