[Home] [Help]
PACKAGE: APPS.PQP_GB_PSI_SCH
Source
1 PACKAGE PQP_GB_PSI_SCH
2 /* $Header: pqpgbpsisch.pkh 120.0.12020000.4 2013/01/02 13:21:01 achandwa noship $ */
3 AS
4 g_proc_name VARCHAR2(61) := 'PQP_GB_PSI_SCHEME_CONTRIB_HISTORY.';
5 g_debug BOOLEAN := hr_utility.debug_enabled;
6 c_application_id CONSTANT NUMBER := 8303;
7 c_highest_date CONSTANT DATE := hr_api.g_eot;
8 g_person_id NUMBER := NULL;
9 g_business_group_id NUMBER := NULL; -- IMPORTANT TO KEEP NULL
10 g_assignment_id NUMBER := NULL; -- IMPORTANT TO KEEP NULL
11 g_person_dtl per_all_people_f%rowtype;
12 g_assignment_dtl per_all_assignments_f%rowtype;
13 g_altkey VARCHAR2(12) := NULL;
14 g_current_run VARCHAR2(20) := NULL;
15 g_prev_event_dtl_rec ben_ext_person.t_detailed_output_tab_rec;
16 g_pension_element_type_id NUMBER;
17 g_notional_pay NUMBER; -- used while calculating actual pay
18 g_effective_date DATE; -- for cutover run this will be the cutover date
19 g_extract_type VARCHAR2(100);
20 g_legislation_code per_business_groups.legislation_code%TYPE := 'GB';
21 g_pay_proc_evt_tab ben_ext_person.t_detailed_output_table;
22 g_is_terminated VARCHAR2(1) :='N';
23 g_paypoint VARCHAR2(5) := NULL;
24 g_cutover_date DATE;
25 g_ext_dfn_id NUMBER;
26 g_tab_event_map_cv pqp_utilities.t_config_values;
27 g_tab_pen_sch_map_cv pqp_utilities.t_config_values;
28 g_tab_emp_typ_map_cv pqp_utilities.t_config_values;
29 TYPE r_element_details
30 IS
31 RECORD
32 (
33 element_type_id NUMBER ,
34 input_value_name pay_input_values_f.NAME%TYPE ,
35 input_value_id NUMBER );
36 TYPE r_ele_ent_details
37 IS
38 RECORD
39 (
40 element_entry_id NUMBER ,
41 effective_start_date DATE ,
42 effective_end_date DATE ,
43 element_type_id NUMBER );
44
45 cursor csr_lgps_pension_change(p_assignment_id in per_all_assignments_f.assignment_id%type, p_effective_date in DATE)
46 is
47 select
48 lgps_pensionable_pay pensionable_pay,
49 effective_start_date,
50 effective_end_date
51 from pqp_assignment_attributes_f
52 where p_effective_date between effective_start_date and effective_end_date
53 and lgps_pensionable_pay is not null
54 and assignment_id=p_assignment_id;
55 FUNCTION chk_sch_contri_hist_per_crit(
56 p_business_group_id IN NUMBER ,
57 p_effective_date IN DATE ,
58 p_assignment_id IN NUMBER )
59 RETURN VARCHAR2;
60 FUNCTION chk_sch_contri_his_cut_crit(
61 p_business_group_id IN NUMBER ,
62 p_effective_date IN DATE ,
63 p_assignment_id IN NUMBER )
64 RETURN VARCHAR2;
65 FUNCTION sch_contrib_history_main(
66 p_business_group_id IN NUMBER -- context
67 ,
68 p_effective_date IN DATE -- context
69 ,
70 p_assignment_id IN NUMBER -- context
71 ,
72 p_rule_parameter IN VARCHAR2 -- parameter
73 ,
74 p_output OUT NOCOPY VARCHAR2 )
75 RETURN NUMBER;
76
77 FUNCTION sch_cont_history_post_process
78 RETURN VARCHAR2;
79 -- Debug
80 PROCEDURE DEBUG(
81 p_trace_message IN VARCHAR2 ,
82 p_trace_location IN NUMBER DEFAULT NULL );
83 -- Debug_Enter
84 PROCEDURE debug_enter(
85 p_proc_name IN VARCHAR2 ,
86 p_trace_on IN VARCHAR2 DEFAULT NULL );
87 -- Debug_Exit
88 PROCEDURE debug_exit(
89 p_proc_name IN VARCHAR2 ,
90 p_trace_off IN VARCHAR2 DEFAULT NULL );
91 -- Debug Others
92 PROCEDURE debug_others(
93 p_proc_name IN VARCHAR2 ,
94 p_proc_step IN NUMBER DEFAULT NULL );
95 END PQP_GB_PSI_SCH;