[Home] [Help]
2935: l_person_id per_people_f.person_id%type;
2936: l_person_type_id per_people_f.person_type_id%type;
2937: l_date1 ghr_pa_requests.effective_date%type;
2938: l_address_id per_addresses.address_id%type;
2939: l_person_type per_person_types.system_person_type%type;
2940: --l_sec_assignmemt_id per_assignments_f.assignment_id%type;
2941: --l_assignment_status_type_id per_assignment_status_types.assignment_status_type_id%type;
2942: --
2943: l_asg_trm_eff_start_date per_assignments_f.effective_start_date%type;
3063:
3064: cursor c_person_type is
3065: Select ppt.system_person_type,
3066: ppf.person_type_id
3067: from per_person_types ppt,
3068: per_all_people_f ppf
3069: where ppf.person_id = P_pa_request_rec.person_id
3070: and ppt.person_type_id = ppf.person_type_id
3071: and g_effective_date between ppf.effective_start_date
3087: -- EX_Employee person type
3088:
3089: Cursor c_ex_emp_per_type is
3090: select ppt.person_type_id
3091: from per_person_types ppt
3092: where ppt.business_group_id = l_business_group_id
3093: and ppt.system_person_type = 'EX_EMP'
3094: -- and ppt.user_person_type = 'Ex-employee'
3095: and ppt.active_flag = 'Y'
4927: l_dt_mode varchar2(200);
4928:
4929: cursor cur_ex_emp (p_person_id IN Number, p_effective_date IN Date) is
4930: select 1
4931: from per_person_types pet,
4932: per_people_f per
4933: where pet.person_type_id = per.person_type_id
4934: and per.person_id = p_person_id
4935: and p_effective_date