[Home] [Help]
180: 115.1 16-OCT-1998 CCarter New parameters added to insert into per_people_f
181: in the terminate employee procedure for OAB.
182: 115.5 19-Jul-1999 mmillmor 895018 removed some bad code and altered to use
183: internal security procedures in terminate
184: 115.6 27-Sep-1999 alogue Changed insert into per_People to per_all_people_f
185: inside terminate_employee.
186: 115.8 27-OCT-1999 rmonge Added code fixes for bug 920233 and 969491
187: Bug fix 920233 resolves the problem
188: with tax records not reversed when reverse
201: employee. Requested by John Rhodes
202: following French Phase 1.
203: 115.12 13-MAR-2000 CSimpson Added town_of_birth, region_of_birth,
204: country_of_birth and global_person_id attribs
205: into per_all_people_f insert in terminate_employee.
206: 115.13 26-Jul-2000 mmillmor 996015 Added code to delete pay proposals at the same
207: time as element entries
208: 115.14 17-Aug-2000 VTreiger 1363723 Commented out nocopy copying of ATTRIBUTEx columns
209: from EMP record to EX_EMP record.
246: 115.31 30-Oct-01 mbocutt 1271513 Change cancel terminate code to correctly
247: handle future dated assignments on reverse
248: termination.
249: 115.32 01-Nov-01 mbocutt Added som emissed variable declarations.
250: 115.33 05-NOV-01 kmullapu Modified INSERT INTO PER_ALL_PEOPLE_F in
251: terminate_employee to include
252: PER_INFORMATION 21 TO 30
253: 115.35 22-AUG-02 adhunter correct gscc warning. change msg name
254: HR_6519_CANC_ACTIONS_EXIST
780: --
781: --bug 4457651
782: --
783: L_TYPE VARCHAR2(100);
784: l_bus_id per_all_people_f.business_group_id %type;
785:
786: CURSOR fptypes_for_cwk1 IS
787: SELECT ppt.system_person_type
788: FROM
2288: OR (c_emp_rec.current_applicant_flag IS NULL
2289: AND system_person_type = 'EX_EMP'));
2290: --
2291: hr_utility.set_location(l_proc,40);
2292: INSERT INTO PER_ALL_PEOPLE_F
2293: (person_id
2294: ,effective_start_date
2295: ,effective_end_date
2296: ,business_group_id
3603: IF hrempter.check_for_future_person_rows(p_person_id,p_actual_termination_date) = 'Y'
3604: AND (nvl(fnd_profile.value('HR_ALLOW_FPT_UPDATES'),'N') = 'Y') THEN
3605:
3606: -- Updating the per table to EMP or EMP_APL according to existing data.
3607: UPDATE per_all_people_f
3608: SET person_type_id = hr_person_type_usage_info.get_default_person_type_id (l_business_group_id,'EMP')
3609: ,current_emp_or_apl_flag = 'Y'
3610: ,current_employee_flag = 'Y'
3611: WHERE person_id = p_person_id
3611: WHERE person_id = p_person_id
3612: AND person_type_id = hr_person_type_usage_info.get_default_person_type_id (l_business_group_id,'EX_EMP')
3613: AND effective_start_date >= p_actual_termination_date;
3614:
3615: UPDATE per_all_people_f
3616: SET person_type_id = hr_person_type_usage_info.get_default_person_type_id (l_business_group_id,'EMP_APL')
3617: ,current_emp_or_apl_flag = 'Y'
3618: ,current_employee_flag = 'Y'
3619: WHERE person_id = p_person_id
3629: if l_sys_per_type is not null and l_sys_per_type = 'EX_APL' then
3630: --
3631: hr_utility.set_location(l_proc,41);
3632: --
3633: UPDATE per_all_people_f pp
3634: SET CURRENT_EMP_OR_APL_FLAG = 'Y',
3635: CURRENT_EMPLOYEE_FLAG = 'Y',
3636: PERSON_TYPE_ID = hr_person_type_usage_info.get_default_person_type_id(l_business_group_id,'EMP')
3637: WHERE pp.person_id = p_person_id
3639: else
3640: --
3641: hr_utility.set_location(l_proc,42);
3642: --
3643: UPDATE per_all_people_f pp
3644: SET pp.effective_end_date = to_date('31/12/4712','DD/MM/YYYY')
3645: WHERE pp.person_id = p_person_id
3646: AND p_actual_termination_date
3647: BETWEEN pp.effective_start_date
3648: AND pp.effective_end_date;
3649: --
3650: hr_utility.set_location(l_proc,6);
3651: --
3652: DELETE per_all_people_f pp
3653: WHERE pp.person_id = p_person_id
3654: AND pp.effective_start_date > p_actual_termination_date;
3655: --
3656: hr_utility.set_location(l_proc,8);