DBA Data[Home] [Help]

PACKAGE BODY: APPS.HR_EX_EMPLOYEE_BK4

Source


1 package body HR_EX_EMPLOYEE_BK4 as
2 /* $Header: peexeapi.pkb 120.12.12020000.5 2013/02/14 13:08:03 generated ship $ */
3 -- Code generated by the Oracle HRMS API Hook Pre-processor
4 -- Created on 2013/08/13 18:42:21 (YYYY/MM/DD HH24:MI:SS)
5 procedure REVERSE_TERMINATE_EMPLOYEE_A
6 (P_PERSON_ID in NUMBER
7 ,P_ACTUAL_TERMINATION_DATE in DATE
8 ,P_CLEAR_DETAILS in VARCHAR2
9 )is
10 l_commit_unit_number number;
11 l_legislation_code   varchar2(30);
12 begin
13 hr_utility.set_location('Entering: HR_EX_EMPLOYEE_BK4.REVERSE_TERMINATE_EMPLOYEE_A', 10);
14 l_commit_unit_number := hr_api.return_commit_unit;
15 if hr_api.call_app_hooks then
16 hr_ex_employee_be4.REVERSE_TERMINATE_EMPLOYEE_A
17 (P_PERSON_ID => P_PERSON_ID
18 ,P_ACTUAL_TERMINATION_DATE => P_ACTUAL_TERMINATION_DATE
19 ,P_CLEAR_DETAILS => P_CLEAR_DETAILS
20 );
21 end if;
22 hr_multi_message.end_validation_set;
23 hr_api.validate_commit_unit(l_commit_unit_number, 'REVERSE_TERMINATE_EMPLOYEE', 'AP');
24 hr_utility.set_location(' Leaving: HR_EX_EMPLOYEE_BK4.REVERSE_TERMINATE_EMPLOYEE_A', 20);
25 end REVERSE_TERMINATE_EMPLOYEE_A;
26 procedure REVERSE_TERMINATE_EMPLOYEE_B
27 (P_PERSON_ID in NUMBER
28 ,P_ACTUAL_TERMINATION_DATE in DATE
29 ,P_CLEAR_DETAILS in VARCHAR2
30 )is
31 l_commit_unit_number number;
32 l_legislation_code   varchar2(30);
33 begin
34 hr_utility.set_location('Entering: HR_EX_EMPLOYEE_BK4.REVERSE_TERMINATE_EMPLOYEE_B', 10);
35 l_commit_unit_number := hr_api.return_commit_unit;
36 if hr_api.call_leg_hooks then
37 l_legislation_code := per_per_bus.return_legislation_code(P_PERSON_ID => P_PERSON_ID
38 );
39 if l_legislation_code = 'GB' then
40 PER_GB_REVERSE_TERM_RULES.VALIDATE_REVERSE_TERMINATION
41 (P_PERSON_ID => P_PERSON_ID
42 ,P_ACTUAL_TERMINATION_DATE => P_ACTUAL_TERMINATION_DATE
43 );
44 end if;
45 end if;
46 hr_api.validate_commit_unit(l_commit_unit_number, 'REVERSE_TERMINATE_EMPLOYEE', 'BP');
47 hr_utility.set_location(' Leaving: HR_EX_EMPLOYEE_BK4.REVERSE_TERMINATE_EMPLOYEE_B', 20);
48 end REVERSE_TERMINATE_EMPLOYEE_B;
49 end HR_EX_EMPLOYEE_BK4;