[Home] [Help]
PACKAGE BODY: APPS.PAY_SHADOW_ELEMENT_API
Source
1 Package Body pay_shadow_element_api as
2 /* $Header: pysetapi.pkb 120.0 2005/05/29 08:38:16 appldev noship $ */
3 --
4 -- Package Variables
5 --
6 g_debug boolean := hr_utility.debug_enabled;
7 g_package varchar2(33) := ' pay_shadow_element_api.';
8 --
9 -- ----------------------------------------------------------------------------
10 -- |--------------------------< update_shadow_element >-----------------------|
11 -- ----------------------------------------------------------------------------
12 --
13 procedure update_shadow_element
14 (p_validate in boolean default false
15 ,p_effective_date in date
16 ,p_element_type_id in number
17 ,p_classification_name in varchar2 default hr_api.g_varchar2
18 ,p_additional_entry_allowed_fla in varchar2 default hr_api.g_varchar2
19 ,p_adjustment_only_flag in varchar2 default hr_api.g_varchar2
20 ,p_closed_for_entry_flag in varchar2 default hr_api.g_varchar2
21 ,p_element_name in varchar2 default hr_api.g_varchar2
22 ,p_indirect_only_flag in varchar2 default hr_api.g_varchar2
23 ,p_multiple_entries_allowed_fla in varchar2 default hr_api.g_varchar2
24 ,p_multiply_value_flag in varchar2 default hr_api.g_varchar2
25 ,p_post_termination_rule in varchar2 default hr_api.g_varchar2
26 ,p_process_in_run_flag in varchar2 default hr_api.g_varchar2
27 ,p_relative_processing_priority in number default hr_api.g_number
28 ,p_processing_type in varchar2 default hr_api.g_varchar2
29 ,p_standard_link_flag in varchar2 default hr_api.g_varchar2
30 ,p_input_currency_code in varchar2 default hr_api.g_varchar2
31 ,p_output_currency_code in varchar2 default hr_api.g_varchar2
32 ,p_benefit_classification_name in varchar2 default hr_api.g_varchar2
33 ,p_description in varchar2 default hr_api.g_varchar2
34 ,p_qualifying_age in number default hr_api.g_number
35 ,p_qualifying_length_of_service in number default hr_api.g_number
36 ,p_qualifying_units in varchar2 default hr_api.g_varchar2
37 ,p_reporting_name in varchar2 default hr_api.g_varchar2
38 ,p_attribute_category in varchar2 default hr_api.g_varchar2
39 ,p_attribute1 in varchar2 default hr_api.g_varchar2
40 ,p_attribute2 in varchar2 default hr_api.g_varchar2
41 ,p_attribute3 in varchar2 default hr_api.g_varchar2
42 ,p_attribute4 in varchar2 default hr_api.g_varchar2
43 ,p_attribute5 in varchar2 default hr_api.g_varchar2
44 ,p_attribute6 in varchar2 default hr_api.g_varchar2
45 ,p_attribute7 in varchar2 default hr_api.g_varchar2
46 ,p_attribute8 in varchar2 default hr_api.g_varchar2
47 ,p_attribute9 in varchar2 default hr_api.g_varchar2
48 ,p_attribute10 in varchar2 default hr_api.g_varchar2
49 ,p_attribute11 in varchar2 default hr_api.g_varchar2
50 ,p_attribute12 in varchar2 default hr_api.g_varchar2
51 ,p_attribute13 in varchar2 default hr_api.g_varchar2
52 ,p_attribute14 in varchar2 default hr_api.g_varchar2
53 ,p_attribute15 in varchar2 default hr_api.g_varchar2
54 ,p_attribute16 in varchar2 default hr_api.g_varchar2
55 ,p_attribute17 in varchar2 default hr_api.g_varchar2
56 ,p_attribute18 in varchar2 default hr_api.g_varchar2
57 ,p_attribute19 in varchar2 default hr_api.g_varchar2
58 ,p_attribute20 in varchar2 default hr_api.g_varchar2
59 ,p_element_information_category in varchar2 default hr_api.g_varchar2
60 ,p_element_information1 in varchar2 default hr_api.g_varchar2
61 ,p_element_information2 in varchar2 default hr_api.g_varchar2
62 ,p_element_information3 in varchar2 default hr_api.g_varchar2
63 ,p_element_information4 in varchar2 default hr_api.g_varchar2
64 ,p_element_information5 in varchar2 default hr_api.g_varchar2
65 ,p_element_information6 in varchar2 default hr_api.g_varchar2
66 ,p_element_information7 in varchar2 default hr_api.g_varchar2
67 ,p_element_information8 in varchar2 default hr_api.g_varchar2
68 ,p_element_information9 in varchar2 default hr_api.g_varchar2
69 ,p_element_information10 in varchar2 default hr_api.g_varchar2
70 ,p_element_information11 in varchar2 default hr_api.g_varchar2
71 ,p_element_information12 in varchar2 default hr_api.g_varchar2
72 ,p_element_information13 in varchar2 default hr_api.g_varchar2
73 ,p_element_information14 in varchar2 default hr_api.g_varchar2
74 ,p_element_information15 in varchar2 default hr_api.g_varchar2
75 ,p_element_information16 in varchar2 default hr_api.g_varchar2
76 ,p_element_information17 in varchar2 default hr_api.g_varchar2
77 ,p_element_information18 in varchar2 default hr_api.g_varchar2
78 ,p_element_information19 in varchar2 default hr_api.g_varchar2
79 ,p_element_information20 in varchar2 default hr_api.g_varchar2
80 ,p_third_party_pay_only_flag in varchar2 default hr_api.g_varchar2
81 ,p_skip_formula in varchar2 default hr_api.g_varchar2
82 ,p_payroll_formula_id in number default hr_api.g_number
83 ,p_exclusion_rule_id in number default hr_api.g_number
84 ,p_iterative_flag in varchar2 default hr_api.g_varchar2
85 ,p_iterative_priority in number default hr_api.g_number
86 ,p_iterative_formula_name in varchar2 default hr_api.g_varchar2
87 ,p_process_mode in varchar2 default hr_api.g_varchar2
88 ,p_grossup_flag in varchar2 default hr_api.g_varchar2
89 ,p_advance_indicator in varchar2 default hr_api.g_varchar2
90 ,p_advance_payable in varchar2 default hr_api.g_varchar2
91 ,p_advance_deduction in varchar2 default hr_api.g_varchar2
92 ,p_process_advance_entry in varchar2 default hr_api.g_varchar2
93 ,p_proration_group in varchar2 default hr_api.g_varchar2
94 ,p_proration_formula in varchar2 default hr_api.g_varchar2
95 ,p_recalc_event_group in varchar2 default hr_api.g_varchar2
96 ,p_once_each_period_flag in varchar2 default hr_api.g_varchar2
97 ,p_object_version_number in out nocopy number
98 ) is
99 --
100 -- Declare cursors and local variables
101 --
102 l_proc varchar2(72);
103 l_effective_date date;
104 l_ovn number;
105 begin
106 g_debug := hr_utility.debug_enabled;
107 if g_debug then
108 l_proc := g_package||'update_shadow_element';
109 hr_utility.set_location('Entering:'|| l_proc, 10);
110 end if;
111 --
112 -- Issue a savepoint
113 --
114 savepoint update_shadow_element;
115 if g_debug then
116 hr_utility.set_location(l_proc, 20);
117 end if;
118 --
119 -- Check mandatory arguments.
120 --
121 hr_api.mandatory_arg_error
122 (p_api_name => l_proc,
123 p_argument => 'p_effective_date',
124 p_argument_value => p_effective_date);
125 --
126 hr_api.mandatory_arg_error
127 (p_api_name => l_proc,
128 p_argument => 'p_element_type_id',
129 p_argument_value => p_element_type_id);
130 --
131 hr_api.mandatory_arg_error
132 (p_api_name => l_proc,
133 p_argument => 'p_object_version_number',
134 p_argument_value => p_object_version_number);
135 --
136 -- Truncate the time portion from all IN date parameters
137 --
138 l_effective_date := trunc(p_effective_date);
139 --
140 -- Call Before Process User Hook
141 --
142 if g_debug then
143 hr_utility.set_location(l_proc, 30);
144 end if;
145 --
146 -- Validation in addition to Row Handlers
147 --
148 -- Process Logic
149 --
150 l_ovn := p_object_version_number;
151 pay_set_upd.upd
152 (p_effective_date => l_effective_date
153 ,p_element_type_id => p_element_type_id
154 ,p_classification_name => p_classification_name
155 ,p_additional_entry_allowed_fla => p_additional_entry_allowed_fla
156 ,p_adjustment_only_flag => p_adjustment_only_flag
157 ,p_closed_for_entry_flag => p_closed_for_entry_flag
158 ,p_element_name => p_element_name
159 ,p_indirect_only_flag => p_indirect_only_flag
160 ,p_multiple_entries_allowed_fla => p_multiple_entries_allowed_fla
161 ,p_multiply_value_flag => p_multiply_value_flag
162 ,p_post_termination_rule => p_post_termination_rule
163 ,p_process_in_run_flag => p_process_in_run_flag
164 ,p_relative_processing_priority => p_relative_processing_priority
165 ,p_processing_type => p_processing_type
166 ,p_standard_link_flag => p_standard_link_flag
167 ,p_input_currency_code => p_input_currency_code
168 ,p_output_currency_code => p_output_currency_code
169 ,p_benefit_classification_name => p_benefit_classification_name
170 ,p_description => p_description
171 ,p_qualifying_age => p_qualifying_age
172 ,p_qualifying_length_of_service => p_qualifying_length_of_service
173 ,p_qualifying_units => p_qualifying_units
174 ,p_reporting_name => p_reporting_name
175 ,p_attribute_category => p_attribute_category
176 ,p_attribute1 => p_attribute1
177 ,p_attribute2 => p_attribute2
178 ,p_attribute3 => p_attribute3
179 ,p_attribute4 => p_attribute4
180 ,p_attribute5 => p_attribute5
181 ,p_attribute6 => p_attribute6
182 ,p_attribute7 => p_attribute7
183 ,p_attribute8 => p_attribute8
184 ,p_attribute9 => p_attribute9
185 ,p_attribute10 => p_attribute10
186 ,p_attribute11 => p_attribute11
187 ,p_attribute12 => p_attribute12
188 ,p_attribute13 => p_attribute13
189 ,p_attribute14 => p_attribute14
190 ,p_attribute15 => p_attribute15
191 ,p_attribute16 => p_attribute16
192 ,p_attribute17 => p_attribute17
193 ,p_attribute18 => p_attribute18
194 ,p_attribute19 => p_attribute19
195 ,p_attribute20 => p_attribute20
196 ,p_element_information_category => p_element_information_category
197 ,p_element_information1 => p_element_information1
198 ,p_element_information2 => p_element_information2
199 ,p_element_information3 => p_element_information3
200 ,p_element_information4 => p_element_information4
201 ,p_element_information5 => p_element_information5
202 ,p_element_information6 => p_element_information6
203 ,p_element_information7 => p_element_information7
204 ,p_element_information8 => p_element_information8
205 ,p_element_information9 => p_element_information9
206 ,p_element_information10 => p_element_information10
207 ,p_element_information11 => p_element_information11
208 ,p_element_information12 => p_element_information12
209 ,p_element_information13 => p_element_information13
210 ,p_element_information14 => p_element_information14
211 ,p_element_information15 => p_element_information15
212 ,p_element_information16 => p_element_information16
213 ,p_element_information17 => p_element_information17
214 ,p_element_information18 => p_element_information18
215 ,p_element_information19 => p_element_information19
216 ,p_element_information20 => p_element_information20
217 ,p_third_party_pay_only_flag => p_third_party_pay_only_flag
218 ,p_skip_formula => p_skip_formula
219 ,p_payroll_formula_id => p_payroll_formula_id
220 ,p_exclusion_rule_id => p_exclusion_rule_id
221 ,p_iterative_flag => p_iterative_flag
222 ,p_iterative_priority => p_iterative_priority
223 ,p_iterative_formula_name => p_iterative_formula_name
224 ,p_process_mode => p_process_mode
225 ,p_grossup_flag => p_grossup_flag
226 ,p_advance_indicator => p_advance_indicator
227 ,p_advance_payable => p_advance_payable
228 ,p_advance_deduction => p_advance_deduction
229 ,p_process_advance_entry => p_process_advance_entry
230 ,p_proration_group => p_proration_group
231 ,p_proration_formula => p_proration_formula
232 ,p_recalc_event_group => p_recalc_event_group
233 ,p_once_each_period_flag => p_once_each_period_flag
234 ,p_object_version_number => l_ovn
235 );
236 --
237 -- Call After Process User Hook
238 --
239 if g_debug then
240 hr_utility.set_location(l_proc, 60);
241 end if;
242 --
243 -- When in validation only mode raise the Validate_Enabled exception
244 --
245 if p_validate then
246 raise hr_api.validate_enabled;
247 end if;
248 --
249 -- Set all output arguments
250 --
251 p_object_version_number := l_ovn;
252 --
253 if g_debug then
254 hr_utility.set_location(' Leaving:'||l_proc, 70);
255 end if;
256 exception
257 when hr_api.validate_enabled then
258 --
259 -- As the Validate_Enabled exception has been raised
260 -- we must rollback to the savepoint
261 --
262 rollback to update_shadow_element;
263 --
264 -- Only set output warning arguments
265 -- (Any key or derived arguments must be set to null
266 -- when validation only mode is being used.)
267 p_object_version_number := l_ovn;
268 --
269 if g_debug then
270 hr_utility.set_location(' Leaving:'||l_proc, 80);
271 end if;
272 when others then
273 --
274 -- A validation or unexpected error has occured
275 --
276 rollback to update_shadow_element;
277 p_object_version_number := null;
278 if g_debug then
279 hr_utility.set_location(' Leaving:'||l_proc, 90);
280 end if;
281 raise;
282 end update_shadow_element;
283 --
284 end pay_shadow_element_api;