[Home] [Help]
6: g_package varchar2(33) := 'pay_kr_sep_form_pkg.'; -- Global package name
7: g_debug boolean := hr_utility.debug_enabled;
8: g_old_rec pay_element_entries_f%ROWTYPE; -- Global record definition
9: g_run_type_id number;
10: g_run_type_name pay_run_types_f_tl.run_type_name%type;
11: g_entry_type varchar2(1) := 'E';
12: --
13: g_business_group_id number;
14: g_legislation_code varchar2(2);
44: p_effective_date in date) return varchar2
45: --------------------------------------------------------------------------------
46: is
47: --
48: l_run_type_name pay_run_types_f_tl.run_type_name%type;
49: --
50: cursor csr_run_type_name
51: is
52: select prtt.run_type_name
49: --
50: cursor csr_run_type_name
51: is
52: select prtt.run_type_name
53: from pay_run_types_f_tl prtt,
54: pay_run_types_f prt
55: where prt.run_type_id = p_run_type_id
56: and p_effective_date
57: between prt.effective_start_date and prt.effective_end_date
50: cursor csr_run_type_name
51: is
52: select prtt.run_type_name
53: from pay_run_types_f_tl prtt,
54: pay_run_types_f prt
55: where prt.run_type_id = p_run_type_id
56: and p_effective_date
57: between prt.effective_start_date and prt.effective_end_date
58: and prtt.run_type_id = prt.run_type_id
2096: --
2097: --------------------------------------------------------------------------------
2098: procedure create_entries(p_assignment_id_tbl g_assignment_id_tbl%type,
2099: p_element_set_id pay_element_type_rules.element_set_id%type,
2100: p_run_type_id pay_run_types.run_type_id%type,
2101: p_business_group_id hr_assignment_sets.business_group_id%type,
2102: p_session_date date)
2103: is
2104: i number;
2109: l_effective_end_date date;
2110: l_object_version_number number;
2111: cursor csr_get_element_type_id(p_assignment_id pay_assignment_actions.assignment_id%type,
2112: p_element_set_id pay_element_type_rules.element_set_id%type,
2113: p_run_type_id pay_run_types.run_type_id%type,
2114: p_business_group_id pay_element_types.business_group_id%type,
2115: p_session_date date)
2116: is
2117: select petr.element_type_id
2170: end create_entries;
2171: --------------------------------------------------------------------------------
2172: procedure create_entries(p_assignment_set_id hr_assignment_sets.assignment_set_id%type,
2173: p_element_set_id pay_element_type_rules.element_set_id%type,
2174: p_run_type_id pay_run_types.run_type_id%type,
2175: p_business_group_id hr_assignment_sets.business_group_id%type,
2176: p_payroll_id hr_assignment_sets.payroll_id%type,
2177: p_session_date date)
2178: is
2193: and hasa.assignment_set_id = has.assignment_set_id
2194: and hasa.include_or_exclude = 'I';
2195: cursor csr_get_element_type_id(p_assignment_id pay_assignment_actions.assignment_id%type,
2196: p_element_set_id pay_element_type_rules.element_set_id%type,
2197: p_run_type_id pay_run_types.run_type_id%type,
2198: p_business_group_id pay_element_types.business_group_id%type,
2199: p_session_date date)
2200: is
2201: select petr.element_type_id
2427: -- 'P' if an employee has an Interim Separation Pay run or Separation Pay run.
2428: --
2429: --------------------------------------------------------------------------------
2430: function get_employee_status(p_assignment_id pay_assignment_actions.assignment_id%type,
2431: p_run_type_name pay_run_types.run_type_name%type,
2432: p_date_earned date) return varchar2
2433: is
2434: status varchar2(1):='U';
2435: cursor csr_get_status
2436: is
2437: select decode(prt.run_type_name,'SEP','P','SEP_I','P','U')
2438: from pay_assignment_actions paa,
2439: pay_payroll_actions ppa,
2440: pay_run_types_f prt
2441: where ppa.payroll_action_id = paa.payroll_action_id
2442: and ppa.run_type_id = prt.run_type_id
2443: and prt.run_type_name = p_run_type_name
2444: and paa.assignment_id = p_assignment_id