[Home] [Help]
PACKAGE BODY: APPS.PAY_CA_ISETUP_EARN_DEDN
Source
1 package body pay_ca_isetup_earn_dedn as
2 /* $Header: paycaisetuped.pkb 120.0 2005/05/29 11:09 appldev noship $ */
3 /*
4 */
5 --
6 /*
7 ******************************************************************
8 * *
9 * Copyright (C) 2004 Oracle Corporation. *
10 * All rights reserved. *
11 * *
12 * This material has been provided pursuant to an agreement *
13 * containing restrictions on its use. The material is also *
14 * protected by copyright law. No part of this material may *
15 * be copied or distributed, transmitted or transcribed, in *
16 * any form or by any means, electronic, mechanical, magnetic, *
17 * manual, or otherwise, or disclosed to third parties without *
18 * the express written permission of Oracle Corporation, *
19 * 500 Oracle Parkway, Redwood City, CA, 94065. *
20 * *
21 ******************************************************************
22
23 Name : pay_ca_isetup_earn_dedn
24 Filename : paycaisetuped.pkb
25 Change List
26 -----------
27 Date Name Vers Bug No Description
28 ---- ---- ---- ------ -----------
29 13-JUL-04 P.Ganguly 115.0 First Created.
30 */
31
32 --
33 PROCEDURE compile_formula (p_element_type_id IN NUMBER) IS
34
35 CURSOR csr_formula_name IS
36 SELECT
37 ff.formula_name,
38 ft.formula_type_name
39 FROM
40 pay_status_processing_rules_f spr,
41 ff_formulas_f ff,
42 ff_formula_types ft
43 WHERE
44 spr.element_type_id = p_element_type_id AND
45 spr.formula_id = ff.formula_id AND
46 ff.formula_type_id = ft.formula_type_id;
47 --
48 l_req_id NUMBER(10);
49
50 BEGIN
51
52 FOR csr_formula_name_rec IN csr_formula_name LOOP
53
54 l_req_id :=
55 fnd_request.submit_request(
56 application => 'FF',
57 program => 'SINGLECOMPILE',
58 argument1 => csr_formula_name_rec.formula_type_name,
59 argument2 => csr_formula_name_rec.formula_name);
60 END LOOP;
61
62 END compile_formula;
63 --
64 FUNCTION create_isetup_earnings (
65 p_ele_name in varchar2,
66 p_ele_reporting_name in varchar2,
67 p_ele_description in varchar2 default NULL,
68 p_ele_classification in varchar2,
69 p_ele_category in varchar2 default NULL,
70 p_ele_calc_method in varchar2,
71 p_ele_eoy_type in varchar2,
72 p_ele_t4a_footnote in varchar2,
73 p_ele_rl1_footnote in varchar2,
74 p_ele_registration_number in varchar2,
75 p_ele_ot_earnings in varchar2 default 'N',
76 p_ele_ot_hours in varchar2 default 'N',
77 p_ele_ei_hours in varchar2 default 'N',
78 p_ele_processing_type in varchar2,
79 p_ele_priority in number default NULL,
80 p_ele_standard_link in varchar2 default 'N',
81 p_ele_calc_rule in varchar2,
82 p_ele_calc_rule_code in varchar2 default NULL,
83 p_sep_check_option in varchar2 default 'N',
84 p_reduce_regular in varchar2 default 'N',
85 p_ele_eff_start_date in date default NULL,
86 p_ele_eff_end_date in date default NULL,
87 p_bg_id in number,
88 p_termination_rule in varchar2 default 'F')
89 RETURN NUMBER IS
90 BEGIN
91
92 DECLARE
93
94 l_element_type_id pay_element_types_f.element_type_id%TYPE;
95
96 BEGIN
97 l_element_type_id :=
98 pay_ca_user_init_earn.create_user_init_earning(
99 p_ele_name => p_ele_name,
100 p_ele_reporting_name => p_ele_reporting_name,
101 p_ele_description => p_ele_description,
102 p_ele_classification => p_ele_classification,
103 p_ele_category => p_ele_category,
104 p_ele_calc_method => p_ele_calc_method,
105 p_ele_eoy_type => p_ele_eoy_type,
106 p_ele_t4a_footnote => p_ele_t4a_footnote,
107 p_ele_rl1_footnote => p_ele_rl1_footnote,
108 p_ele_registration_number => p_ele_registration_number,
109 p_ele_ot_earnings => p_ele_ot_earnings,
110 p_ele_ot_hours => p_ele_ot_hours,
111 p_ele_ei_hours => p_ele_ei_hours,
112 p_ele_processing_type => p_ele_processing_type,
113 p_ele_priority => p_ele_priority,
114 p_ele_standard_link => p_ele_standard_link,
115 p_ele_calc_rule => p_ele_calc_rule,
116 p_ele_calc_rule_code => p_ele_calc_rule_code,
117 p_sep_check_option => p_sep_check_option,
118 p_reduce_regular => p_reduce_regular,
119 p_ele_eff_start_date => p_ele_eff_start_date,
120 p_ele_eff_end_date => p_ele_eff_end_date,
121 p_bg_id => p_bg_id,
122 p_termination_rule => p_termination_rule) ;
123
124 compile_formula(l_element_type_id);
125 RETURN l_element_type_id;
126
127 END;
128
129 END create_isetup_earnings;
130 --
131
132 FUNCTION create_isetup_deductions (
133 p_ele_name in varchar2,
134 p_ele_reporting_name in varchar2,
135 p_ele_description in varchar2 default NULL,
136 p_ele_classification in varchar2,
137 p_ben_class_id in number,
138 p_ele_category in varchar2 default NULL,
139 p_ele_processing_type in varchar2,
140 p_ele_priority in number default NULL,
141 p_ele_standard_link in varchar2 default 'N',
142 p_ele_proc_runtype in varchar2,
143 p_ele_start_rule in varchar2,
144 p_ele_stop_rule in varchar2,
145 p_ele_calc_rule in varchar2,
146 p_ele_calc_rule_code in varchar2,
147 p_ele_insuff_funds in varchar2,
148 p_ele_insuff_funds_code in varchar2,
149 p_ele_t4a_footnote in varchar2,
150 p_ele_rl1_footnote in varchar2,
151 p_ele_registration_number in varchar2,
152 p_ele_eff_start_date in date default NULL,
153 p_ele_eff_end_date in date default NULL,
154 p_bg_id in number) RETURN NUMBER IS
155 BEGIN
156
157 DECLARE
158
159 l_element_type_id pay_element_types_f.element_type_id%TYPE;
160
161 BEGIN
162
163 IF UPPER(p_ele_classification) = 'INVOLUNTARY DEDUCTIONS' THEN
164
165 l_element_type_id :=
166 pay_ca_user_init_dedn.create_user_init_garnishment(
167 p_ele_name => p_ele_name,
168 p_ele_reporting_name => p_ele_reporting_name,
169 p_ele_description => p_ele_description,
170 p_ele_classification => p_ele_classification,
171 p_ben_class_id => p_ben_class_id,
172 p_ele_category => p_ele_category,
173 p_ele_processing_type => p_ele_processing_type,
174 p_ele_priority => p_ele_priority,
175 p_ele_standard_link => p_ele_standard_link,
176 p_ele_proc_runtype => p_ele_proc_runtype,
177 p_ele_start_rule => p_ele_start_rule,
178 p_ele_stop_rule => p_ele_stop_rule,
179 p_ele_calc_rule => p_ele_calc_rule,
180 p_ele_calc_rule_code => p_ele_calc_rule_code,
181 p_ele_insuff_funds => p_ele_insuff_funds,
182 p_ele_insuff_funds_code => p_ele_insuff_funds_code,
183 p_ele_t4a_footnote => p_ele_t4a_footnote,
184 p_ele_rl1_footnote => p_ele_rl1_footnote,
185 p_ele_registration_number => p_ele_registration_number,
186 p_ele_eff_start_date => p_ele_eff_start_date,
187 p_ele_eff_end_date => p_ele_eff_end_date,
188 p_bg_id => p_bg_id);
189
190 ELSE
191
192 l_element_type_id :=
193 pay_ca_user_init_dedn.create_user_init_deduction(
194 p_ele_name => p_ele_name,
195 p_ele_reporting_name => p_ele_reporting_name,
196 p_ele_description => p_ele_description,
197 p_ele_classification => p_ele_classification,
198 p_ben_class_id => p_ben_class_id,
199 p_ele_category => p_ele_category,
200 p_ele_processing_type => p_ele_processing_type,
201 p_ele_priority => p_ele_priority,
202 p_ele_standard_link => p_ele_standard_link,
203 p_ele_proc_runtype => p_ele_proc_runtype,
204 p_ele_start_rule => p_ele_start_rule,
205 p_ele_stop_rule => p_ele_stop_rule,
206 p_ele_calc_rule => p_ele_calc_rule,
207 p_ele_calc_rule_code => p_ele_calc_rule_code,
208 p_ele_insuff_funds => p_ele_insuff_funds,
209 p_ele_insuff_funds_code => p_ele_insuff_funds_code,
210 p_ele_t4a_footnote => p_ele_t4a_footnote,
211 p_ele_rl1_footnote => p_ele_rl1_footnote,
212 p_ele_registration_number => p_ele_registration_number,
213 p_ele_eff_start_date => p_ele_eff_start_date,
214 p_ele_eff_end_date => p_ele_eff_end_date,
215 p_bg_id => p_bg_id);
216 END IF;
217
218 compile_formula(l_element_type_id);
219 RETURN l_element_type_id;
220
221 END;
222
223 END create_isetup_deductions;
224
225 END pay_ca_isetup_earn_dedn;