DBA Data[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;